-
Total de ítens
112 -
Registro em
-
Última visita
-
Days Won
1
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que prismars postou
-
Juliomar, Verifiquei e não encontrei bpl do ACBr 'perdidas'. Fiz então uma nova instalação do ACBr: - Apaguei o diretorio do ACBr - Baixei o ACBr de novo - Rodei o bat 'apagarAcbr.bat' - Instalei o ACBr novamente (ACBrInstall_Trunk2.exe) - Re-compilei o meu aplicativo e o erro persistia. Mas ao verificar no diretorio do meu aplicativo identifiquei duas DLL´s: - libeay32.dll - ssleay32.dll Bastou exclui-las e o meu aplicativo voltou a funcionar !!! Eram estas DLL´s mais antigas perdidas ali que estavam causando o problema ! Deixo aqui o registro caso mais alguem venha a ter este problema. Agradeço demais a ajuda e o interesse na resolução de meu problema, Gratidão a todos !
-
Italo, Tente IMPRIMIR usando estes arquivos pelo programa exemplo e voce verá o erro acontecer. Meu programa existe a alguns anos usando o ACBr e sempre funcionou bem, até a refactory feito. Métodos utilizados mas com erro: MeuExemploBPe.BPe.Bilhetes.Add.LerXML(StringComXML); MeuExemploBPe.BPe.Bilhetes.LoadFromString(ArquivoXML); MeuExemploBPe.BPe.Bilhetes.Items[0].LerXML(StringComXML); Se eu gerar um novo Bpe o erro NÃO ocorre, então pressuponho que não possa ser algo do componente. De qualquer forma esta é a configuração corrente: SSLLib = libWinCrypt SSCrypLib = cryWinCrypt SSHttpLib = httpWinHttp SSLXmlSignLib = xsLibXml2 Caso esta configuração esteja incorreta, por favor, me informe a correta. Ou pode ser alguma outra configuração ?? Qualquer dica ou comentário é bemvindo... Moacir
-
Juliomar, Fiz alguns testes e descobri que o erro ocorre na unit ACBrXMLDocument, na função LoadFromXML: "procedure TACBrXmlDocument.LoadFromXml(AXmlDocument: string); var loadedDoc: xmlDocPtr; loadedRoot: xmlNodePtr; begin // a linha abaixo foi comentada pois segundo o DSA consome muito a CPU e causa lentidão // AXmlDocument := NativeStringToUTF8(AXmlDocument); loadedDoc := xmlParseDoc(PAnsiChar(ansistring(AXmlDocument))); <- O erro ocorre aqui ! if loadedDoc <> nil then begin xmlFreeDoc(xmlDocInternal); xmlDocInternal := loadedDoc; loadedRoot := xmlDocGetRootElement(xmlDocInternal); if loadedRoot <> nil then begin xmlRootElement.Free; xmlRootElement := TACBrXmlNode.Create(Self, loadedRoot); end else raise EACBrXmlException.Create(xmlGetLastError()^.message); end else RaizeExceptionTratandoNaoCarregamentoDLL; end;" Caso voce tenha alguma novidade, me avise ! Moacir
-
Juliomar, Ao testar com o exemplo do ACBrBPe, o mesmo problema ocorre. Após uma pesquisa na internet encontrei um outro usuário do ACBr reportando o mesmo erro, mas no caso dele era na NFe, Abaixo o teor da mensagem dele: " Boa Tarde! No meu XML, gero o Nome Fantasia do Destinatário nos Dados Adicionais: tag <infCpl> Quando este nome tem & está trocando para "&" que é correto, então salva corretamente. Quando carrego um XML por: ACBrNFe.NotasFiscais.LoadFromFile(PathArquivoXML); E Logo em seguida realizo a Assinatura: ACBrNFe.NotasFiscais.Assinar; Ocorre o Erro: Falha ao interpretar o XML "xmlParseDoc" --> 23 - EntityRef: expecting ';' Analisando o Código fonte da ACBr observei que no TNotasFiscais.LoadFromFile é executado: 1- TNotasFiscais.LoadFromString; 2- NotaFiscal.LerXML; 3-ACBrUtil.XMLHTML.ParseText; na Function ParseText é executado: Astr := InternalStringReplace(AStr, '&' , '&'); Voltando para somente "&" Depois ainda executa o: 4- TNFeR.LerXml 5- Leitor.rCampo na Function rCampo quando o campo é tcStr É executado o pcnAuxiliar.ReverterFiltroTextoXML Que contém o código: aTexto := StringReplace(aTexto, '&', '&', [rfReplaceAll]); Ou seja, quando eu for realizar a Assinatura vai ocorrer o Erro: Falha ao interpretar o XML "xmlParseDoc" --> 23 - EntityRef: expecting ';' Se eu comentar as duas linhas desse código que fazem o replace, só para testar, Funciona Perfeitamente. Mas Também entendo que esta não é a Solução pois o LoadFromfile é usado em Inúmeras situações e se comentar essa parte pode ocorrer outro tipo de erro. Como devo proceder nesse caso? utilizo a montagem do XML pelo TXMLDocument, Salvo no Disco, Utilizo os fontes da ACBr para Assinar, Validar e Enviar os Documentos. Tem uma outra opção que não seja ACBrNFe1.NotasFiscais.Add, tendo em vista que eu precisaria refatorar todo o código somente por conta do "&" Alguém poderia me sugerir algo? " Fico no aguardo e agradeço desde já, Moacir
-
Senhores, Após atualizar o ACBr estou com este problema ao tentar imprimir uma 2a via do BPe. Métodos utilizados mas com erro: MeuExemploBPe.BPe.Bilhetes.Add.LerXML(StringComXML); MeuExemploBPe.BPe.Bilhetes.LoadFromString(ArquivoXML); MeuExemploBPe.BPe.Bilhetes.Items[0].LerXML(StringComXML); Qualquer dica ou orientação será bem vinda. Grato desde já.
-
Bom Dia Senhores, Atualizando sobre este erro: O erro só ocorre no ambiente de HOMOLOGAÇÃO... Se mais alguem passar por isto já sabe, basta testar no ambiente de PRODUÇÃO. Grato pela atenção de todos.
-
Italo, Grato pelo retorno. Venho a 2 dias obtendo este erro. Inclusive agora a poucos minutos tentei novamente e retorna sempre este erro. Alguem teria um XML de uma nota emitida para PESSOA FISICA que pudesse disponibilizar ?? Seria de grande ajuda. Acredito que tenha algo a ver com a configuração que uso. Grato desde já
-
Bom Dia Senhores, Estou me deparando com o erro "E0168 - CPF do tomador não encontrado no cadastro CPF" ao tentar emitir NFSe, provedor Nacional, para pessoa física. As emissões para pessoas jurídicas estão OK. Alguem já passou por isto ou tem alguma dica ? Grato desde já.
-
Bingo! Era este o problema. Bastou ajustar a escala para 100% e tudo funciona muito bem. Agradeço a resposta. Abraços, Moacir
- 3 replies
-
- 1
-
-
- danfe
- windows 11
-
(e 1 mais)
Tags:
-
Bom Dia, Cenário: Delphi 10.3, acbr completamente atualizado Ao imprimir ou visualizar uma Danfe no WIndows 11 a mesma fica desconfigurada (pdf em anexo), mas em outras versões do windows continua perfeita. Alguma dica ou sugestão ? Grato, Moacir 43221248373354000108550020000000051000000068.pdf
- 3 replies
-
- danfe
- windows 11
-
(e 1 mais)
Tags:
-
Boa Tarde, Após analisar o problema com calma consegui soluciona-lo. SEMPRE que o seu MDFe tiver um único CTe basta informar mais dois campos a saber: if iQtdCte=1 then begin // Informações do Local de Carregamento // Informar somente quando MDF-e for de carga lotação (1 unico CTe) prodPred.infLocalCarrega.CEP := StrToInt(sCepOri) ; prodPred.infLocalDescarrega.CEP := StrToInt(sCepDes) ; end Alem dos campos obrigatórios em qualquer caso, prodPred.tpCarga e prodPred.xProd No meu caso uso o Cep da agência expedidora e da agência recebedora da carga. Espero ter colaborado de alguma forma.
-
Boa Noite, Estou aqui passando pelas mesmas dificuldades do colega Eduardo. Se houver somente um CTe no MDFe ele apresenta o erro reportado, quando existem mais CTe´s a emissão ocorre sem problemas. O que deveria ser alterado no caso de somente 1 CTe para que o mesmo seja aceito ? Anexo os dois XML´s, um com o erro citado e com somente um CTe e outro que emitiu corretamente com mais de 1 CTe. Grato desde já, MDFe_Erro.xml MDFe_OK.xml
-
Graça, Obrigado pelo retorno e desculpe pela demora em dar um retorno. Problema totalmente resolvido!
-
Boa Noite senhores, Ao gerar a Dacte do Cte de substituição observei pequenas distorções na largura de alguns campos. Em anexo o PDF gerado. Grato ! NIMEC_CTe_Substituicao58115.pdf
-
Senhores, erro encontrado! Ao informar o CTe de anulação e o CTe a ser substituído eu INVERTI as chaves passando o CTe de anulação como o CTe a ser substituído !! Agradeço desde já atenção dispensada e acredito que podemos encerrar este post. Grato a todos que de uma forma ou de outra colaboraram!
-
Italo, Fiz nova geração agora e realmente a tag esta lá no XML. Falha minha ao verificar um XML antigo, peço desculpas. Mas curiosamente o erro persiste... ("511-Rejeição: CNPJ/CPF do remetente do CT-e substituto deve ser igual ao informado no CT-e substituído"). Mais alguma dica ? Grato!