LEANDRODOCOUTO

Estou tentando compilar opacote AcbrLibNFE no Lazarus e ele não encontra essa Unit.. DFeReportConfig.. pesquisei e ela não existe nos fontes do Acbr

Tive muitos problemas de erro 12002 depois das ultimas atualizações. Uma forma que resolveu em todos os clientes, foi indo nas Opções de Internet / Avançadas e desmarcar todas as opções TLS ( 1.1 e 1.2 ) e deixando marcada somente SSL 2.0 e 3.0. No Download da XML ainda dá muitos erros 12002 ( timeout ), mas creio que isso é problema de infra pois o que tem que ser priorizado é a validação das notas fiscais, portanto os demais serviços ficam em segundo plano.

Vamos compartilhar nossos exemplos de uso da ACBRLib... Tenho funcionando em C# exemplos de Inutilização, Consulta de status do Sefaz e consulta de CEP... CEPImports.cs NFEImports.cs ConsultaCEP.cs NFEletronica.cs NFEUtil.cs CEPUtil.cs

Quando a inutilização não dava certo ( tentando inutilizar um numero que ja existia, por exemplo ), a rotina devolvia a constante "InutilizarNFe" ( Result := SetRetornoWebService(SSL.HTTPResultCode, 'InutilizarNFe') só substitui a contante 'InutilizarNFe' por xMotivo, pra trazer o motivo da inutilização não deu certo. Quando a inutilização não dá certo, XMotivo traz a mensagem de erro.

Atualizei agora... revisão 16133 e o erro não ocorre mais...

Atualizei o ACBR hoje 18/12 e passei a ter erro de Assinatura diferente do calculado ( erro 297 ). Volto para a versão do dia 15/12 e não acontece o erro.. segue em anexo o xml.. 43181290205691000152550010000480671364040094-nfe.xml

boa tarde... segue a Unit Alterarda... ACBrLibNFeClass.pas

Na Unit AcbrLibNfeClass.. no médodo NFE_Inutilizar o result estava como Result := SetRetornoWebService(SSL.HTTPResultCode, 'InutilizarNFe'); ( linha 1027 ) quando a inutilização não dava certo.. Então a mensagem de retorno sempre tinha como InutilizarNFe. Isso dificultava o entendimento. Mudei para Result := SetRetornoWebService(SSL.HTTPResultCode, Inutilizacao.XMotivo ); Isso retorna a mensagem correta de retorno do WebService

Não precisa... faz desse jeito.. nesse caso, tem que colocar um item na tag PAG com o valor sem faturamento... if( vSemFaturamento > 0 ) then With Pag.Add do begin tPag := fpSemPagamento ; vPag := vSemFaturamento; end; a soma dos itens da tag PAG têm que fechar com o total da nota..mesmo uma nf de remessa tem que ter essa tag ... Citar

Fiz dessa forma.. ( POG puro...) if( nf.ValorDesconto > 0 ) then vDesc := nf.ValorDesconto else begin if ( nfe.configuracoes.webservices.Ambiente = taHomologacao ) then vDesc := 0.001; end; vOrig := tFat + vDesc; vLiq := tFat; end; Funciona em homologação e produção.. claro.. depois de setembro vai dar erro de novo... mas ai tira-se o condicional.. Finalmente validando nfe 4.0 em produção e homologação...

nesse caso, tem que colocar um item na tag PAG com o valor sem faturamento... if( vSemFaturamento > 0 ) then With Pag.Add do begin tPag := fpSemPagamento ; vPag := vSemFaturamento; end; a soma dos itens da tag PAG têm que fechar com o total da nota..mesmo uma nf de remessa tem que ter essa tag ...

Vou colocar um condicional.. se for homologação faz assim.. se for produção faz assim...

Galera.. uma sugestão.. voltem pra versão 3.1.. até o dia 09/07 ..aonde essas validações vão valer pro ambiente de produção.. eu, por exemplo, colocando 0.001 no vdesc não funcionou, e não tive problema nenhum com as tags de pagamento ..

Unit pcnNfeW Linha 2208.. trocar Gerador.wCampo(tcDe2, 'Y05', 'vDesc ', 01, 15, 0, nfe.Cobr.Fat.vDesc, DSC_VDESC); por Gerador.wCampo(tcDe2, 'Y05', 'vDesc ', 01, 15, 1, nfe.Cobr.Fat.vDesc, DSC_VDESC); Dessa forma a tag vDesc sempre será gerada..