Mark Apollo

Sendo assim, interessante também!

Isaque, não seria interessante (apesar de trabalhoso) criar uma função no ACBr em que fosse passado um parâmetro inteiro, ou string e a mesma retornasse o tipo equivalente? algo do tipo: function TFrmSPED.IntToNaturezaFrtContratado(Tipo:integer): TACBrNaturezaFrtContratado; begin case Tipo of 0 : IntToNaturezaFrtContratado := nfcVendaOnusEstVendedor; //0 - Operações de vendas, com ônus suportado pelo estabelecimento vendedor 1 : IntToNaturezaFrtContratado := nfcVendaOnusAdquirente; //1 - Operações de vendas, com ônus suportado pelo adquirente 2 : IntToNaturezaFrtContratado := nfcCompraGeraCred; //2 - Operações de compras (bens para revenda, matériasprima e outros produtos, geradores de crédito) 3 : IntToNaturezaFrtContratado := nfcCompraNaoGeraCred; //3 - Operações de compras (bens para revenda, matériasprima e outros produtos, não geradores de crédito) 4 : IntToNaturezaFrtContratado := nfcTransfAcabadosPJ; //4 - Transferência de produtos acabados entre estabelecimentos da pessoa jurídica 5 : IntToNaturezaFrtContratado := nfcTransfNaoAcabadosPJ; //5 - Transferência de produtos em elaboração entre estabelecimentos da pessoa jurídica 9 : IntToNaturezaFrtContratado := nfcOutras; //9 - Outras. end; end; ou ainda atualizarmos os tipos para que fiquem desta forma: //INDICADOR DE NATUREZA DE FRETE CONTRATADO TACBrNaturezaFrtContratado = ( nfcVendaOnusEstVendedor = 0, //0 - Operações de vendas, com ônus suportado pelo estabelecimento vendedor nfcVendaOnusAdquirente = 1, //1 - Operações de vendas, com ônus suportado pelo adquirente nfcCompraGeraCred = 2, //2 - Operações de compras (bens para revenda, matériasprima e outros produtos, geradores de crédito) nfcCompraNaoGeraCred = 3, //3 - Operações de compras (bens para revenda, matériasprima e outros produtos, não geradores de crédito) nfcTransfAcabadosPJ = 4, //4 - Transferência de produtos acabados entre estabelecimentos da pessoa jurídica nfcTransfNaoAcabadosPJ = 5, //5 - Transferência de produtos em elaboração entre estabelecimentos da pessoa jurídica nfcOutras = 9 //9 - Outras. ); Desta última forma poderíamos receber o tipo utilizando-se desta forma: IND_NAT_FRT := TACBrNaturezaFrtContratado(sp_d101.FieldByName('IND_NAT_FRT').AsInteger) Gosto da tipificação para evitar erros, pois evitaria que alguém passe um código não definido ainda.

Existem duas soluções: a primeira seria alterar os tipos enumerando-os, assim como já é feito em outros, a segunda seria fazer um switch(case) para retornar a opção correta, eu optei pela segunda. abraços.

iteknologika, segue o link com o código do componente para SPED Pis Cofins que comecei. qualquer dúvida estou a disposição. http://www.baixamusica.org/ACBr.zip

iteknologika, tenho boa parte dos componentes do SPED adiantado para o C#, se concordar, poderíamos juntar e terminar, desde que, após isso, publiquemos o código aqui. o que acha? Abraços.

Não lembro bem, mas acredito que seja necessário habilitar conexões SMTP e POP no hotmail, sei que no gmail existe esta opção, já no hotmail não lembro bem.

Se está utilizando o ACBrMonitor acredito que não acontecerá, já que o segundo comando só será executado quando o primeiro terminar. Caso cada estação seja responsável pelo envio, também não acontecerá! Acredito que só acontecerá se trabalhar com theads mal estruturadas.

Acredito que a melhor saida seja a que o horuss sugeriu, eu iria além, teria um usuário "virtual", algo como um usuário de serviços, onde todos os serviços que eu instalo com este login, desta forma, quando preciso de instalar um certificado, ou coisa do tipo, eu logo com este usuário na máquina, faço as alterações necessárias e reinicio o serviço. Verifique e poste se conseguiu!!!

Amigos realizei uma alteração no Bloco C, mais especificamente nos registros C181 e C185, pois no caso de base PIS/COFINS igual a 0 estava indo zerado, sendo que o validador estava alegando preenchimento obrigatório, logo, tirei o parâmetro para zerar estes campos e passou no validador. Abraços

Alguem tem um exemplo de cliente e servidor utilizando o componente ACBrTCPServer? consigo colocar o servidor exemplo para rodar, mas quando envio um comando, utilizando o indy (TIdTCPClient) ele simplesmente trava no sendcmd e não faz mais nada. var comando: string; begin comando := Format('NFe.Enviar(%s,%s,%s);'+#13,[ DMNFe.QryNfeNF_CODIGOFILIAL.AsString, DMNFe.QryNfeNF_NUMERONOTAFISCAL.AsString, DMNFe.QryNfeNF_NUMEROSERIENOTA.AsString ]); with TCPClient do begin Connect('localhost',3434); SendCmd(comando); //Aqui fica travando. Disconnect; end; end; Agradeceria se alguém pudesse postar o exemplo da conexão aqui. abraços

Sim, justamente este, mas, por alguma questão o meu pacote synapse do acbr estava desatualizado.

Após um dia com este problema e ter postado a dúvida atualizei o synapse e funcionou, fala sério!!!

Olá amigos, estou tentando utilizar o ACBrTCPServer mas ocorre o seguinte erro ao compilar o projeto de teste: Alguém tem alguma sugestão? Estou utilizando BDS2006 e os componentes atualizados. fico no aguardo.

Boa simons!!! pena que não está na meta de desenvolvimento da minha equipe, se não testaria, com certeza

Juarez, esta informação está no guia prático do sped, que pode ser obtido através do link http://www1.receita.fazenda.gov.br/sistemas/efd-pis-cofins/download/download.htm importantíssimo para quem está desenvolvendo o SPED Pis Cofins!

antonio_petrolina, Boa tarde, poderia postar o código onde está gerando o bloco C100? pois não encontrei este problema que está citando, já estou em processo de validação e não tive este problema!

Boa Isaque, tenho desenvolvido com o ACBrSpedPisCofins e já estou em faze de validação dos dados, pois não necessito informar tantos registros, de acordo com a contabilidade da empresa, ajudei da forma que pude e sempre atualizado, volta e meia eu atualizo o componente para estar sempre com a versão mais nova, e ainda tenho o "trabalho" de fazer uma comparação com as novas atualizações para estar ciente do que foi mudado!! Estamos de parabéns com o trabalho, digo "estamos" pois deixei minha contribuição também, mínima, minúscula, mas deixei!! Vamos respirar com este prazo agora, mas vamos continuar ativos, daqui a pouco parto para o SPED Contábil, e logo para o Fiscal, desta forma, provavelmente contribuirei mais um bucado!! Abraços

Para nós aqui já foi, mas, hoje consegui validar abril sem nenhum erro técnico, nem aviso, agora é só passar para a contabilidade validar os dados!! Acredito que aqui vamos manter o prazo!

Galera, realizei uma alteração no arquivo Bloco_0_Class, pois no momento de gerar o registro 0500 não estava sendo gerado os campos COD_CTA_REF e CNPJ_EST; segue o arquivo com a alteração.

Eu comecei a geração do mesmo também, mas, assim como você recebi esta notícia e resolvi testar, realmente ele já gera o bloco M, algumas software houses daqui, inclusive, não fazem a geração deste arquivo. Decidi também não fazer a geração, já que faço o detalhamento no C100 e C170, entre outros...

Ok, não tinha me atentado à estrutura, só achei estranho de dar este problema ontem, e não quando eu atualizei o componente. Mas tá valendo, agora é ficar no aguardo da atualização da não dependência!! Abraços

acho que deixei passar alguma coisa, bom vamos lá: já atualizei, estou compilando normalmente, mas, para executar no cliente ele solicita esta dll, mesmo eu não utilizando nfe nem outra coisa que necessite dela, estranhamente aconteceu quase um mês após a atualização do componente. há alguma forma de não necessitar desta dll no cliente? já que não utilizo nfe ou algum componente que utilize a dll?

Amigos, atualmente desenvolvo 2 ERP's em delphi para a empresa que trabalho, basicamente os dois são iguais, mas com a diferença de um ser para transportadora e outro para atacadista. Também utilizo os componentes do ACBR, os quais atualizei a mais ou menos 1 mês, mas estranhamente ontem pela tarde um dos ERP passou a sentir a necessidade desta biblioteca, dizendo que ela não foi encontrada toda vez que executamos a mesma. O estranho é que só utilizo o acbrchq nele, igualmente no outro projeto, mas somente ele passou a pedir esta dll> Já varri o sistema para ver se estou utilizando outro componente do acbr que possa solicitar esta dll, mas não consigo achar o problema. alguém já passou por isso e pode me dar uma luz? abraços

Isaque, segue o código que alterei, bem como o arquivo. Quando envio uma nota cancelada o validador diz que eu não posso preencher o valor da mercadoria, logo alterei a linha 803 de LFill( VL_MERC,0,2 ) + para LFill( VL_MERC,0,2, booNFCancelada ) + alterei também a procedure de escrita do registro C170, pois aqui o validador diz que, ou eu informo o valor de base e aliquota, ou informo o valor em quantidade, logo deixei a procedure WriteRegistroC170(linha 1102) desta forma: {28} DFill( QUANT_BC_PIS,3,true ) + {29} DFill( ALIQ_PIS_R,4,true ) + {30} LFill( VL_PIS,0,2 ) + {31} LFill( strCST_COFINS ) + {32} LFill( VL_BC_COFINS,0,2 ) + {33} LFill( ALIQ_COFINS_PERC,0,2 ) + {34} DFill( QUANT_BC_COFINS,3,true )+ {35} DFill( ALIQ_COFINS_R,4,true ) + se tiver que postar em outro lugar, ou caso tenham outra solução estou a disposição, no mais, o que eu puder ajudar, estarei por aqui.

Olá, Isaque, verifique na outra thread sobre o PisCofins o arquivo que eu enviei sobre o Bloco C, baixei as atualizações hoje e não encontrei o mesmo lá! Abraços.