Antonio Sidinei Schug
Membros-
Total de ítens
8 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que Antonio Sidinei Schug postou
-
O commit revision 10822, na tentativa de melhorar ou otimizar o código, introduziu um BUG na leitura de alguns XMLs. Considerando o XML que contenham ' misturado com ", a leitura por exemplo da versao=, retorna http://www.portalfiscal.inf.br/nfe, que é um valor errado para o atributo Sugestão, voltar o código antigo iPos1 := Pos('"' , ConteudoTag); iPos2 := Pos('''', ConteudoTag); if iPos1 <> 0 then Aspas := '"'; if (iPos2 <> 0) and (iPos2 < iPos1) then Aspas := ''''; ou otimizando um pouquinho, iPos1 := Pos('"' , ConteudoTag); iPos2 := Pos('''', ConteudoTag); if (iPos2 <> 0) and (iPos2 < iPos1) then Aspas := '''' else Aspas := '"';
-
CoInitialize
Antonio Sidinei Schug replied to Antonio Sidinei Schug's tópico in Dúvidas Gerais sobre o ACBr
Obrigado, amigo... Um feliz natal pra você -
CoInitialize
Antonio Sidinei Schug replied to Antonio Sidinei Schug's tópico in Dúvidas Gerais sobre o ACBr
Desculpe... O correto é este código em anexo... Ele deve ser finalizado se retornar S_OK ou S_FALSE.. Contudo, a aplicação falharia de qualquer jeito se retornar outro erro qualquer... modificacoes.diff -
CoInitialize
Antonio Sidinei Schug replied to Antonio Sidinei Schug's tópico in Dúvidas Gerais sobre o ACBr
Segue diff sugerida Antonio modificacoes.diff -
Problemas com a aplicação podem ocorrer, se chamar alguma função do ACBR que usa CoInitialize; CoUninitialize só deve ser usado se CoInitialize retornar S_OK sugestão: var inicializado: boolean; begin inicializado := CoInitialize(nil) = S_OK; try ..... finally if inicializado then CoUninitialize ; end; end;
-
Problema Com Download Nfe
Antonio Sidinei Schug replied to Antonio Sidinei Schug's tópico in ACBrNFe
Talvez seria interessante tentarmos fazer algo diferente para cobrir as duas situações... Vou tentar simular algumas situações e postar os resultado... Obrigado. -
Problema Com Download Nfe
Antonio Sidinei Schug replied to Antonio Sidinei Schug's tópico in ACBrNFe
Mais o mais importante por enquanto seria a integridade do XML da NFe original -
Problema com o Download NFe. O Download da NFe está alterando o XML, por consequência, está dando erro quando vamos autenticar sua assinatura, em alguns XMLs. Revisando o código verifiquei que em ( por volta da linha 4314 ) function TNFeDownloadNFe.Executar: Boolean; ... FRetornoWS := TiraAcentos(ParseText(StrStream.DataString{, True)); ... Está causando o problema. Mesmo o XML salvo com o retorno fica um XML inválido. Substitui por FRetornoWS := StrStream.DataString; e aparentemente resolveu o problema. Antonio