Ir para conteúdo
  • Cadastre-se

jdazevedo

Membros
  • Total de ítens

    89
  • Registro em

  • Última visita

Tudo que jdazevedo postou

  1. Ao tentar enviar uma Carta Correção, tive a Rejeição: Motivo: 493 - Envio não atende o Schema XML especifico. Já verifiquei os schemas, aparentemente estão corretos. Anexei os XMLs. 7983-ped-eve.xml 7983-eve.xml
  2. Eu consigo importar o arquivo no Formato .INI, também ACBrNfe ou só no ACBrMonitor?
  3. jdazevedo

    GerarTXT

    Olá Amigos, Alguém inclui o Layout TXT da versão 4.0?
  4. Valeu Elazer. Agora funcionou. Muito grato.
  5. Olá Amigos, Como o ACBrInstall_Trunk2 não funciona no Delphi7, teremos que fazer a instalação manualmente. Alguém tem uma sequencia dos procedimentos de compilação, instalação e cópia de arquivos?
  6. Atualizei para para Trunc2, a atualização transcorreu normalmente. Mas ao tentar usar alguma função da NFE, sempre ocorre o erro "EResNotFound ... Resource ACBrNFEServicos not found". Alguém pode me das uma luz do que estou fazendo de errado?
  7. Olá Ítalo, Obrigado pela atenção! Sim, estamos gerando o TXT usando o ACBrNFe e depois é importado pelo programa gratuito da SEFAZ, para emitir. Concordo contigo é muito mais fácil fazer tudo no ACBrNFe. O usuário tem algumas situações que ele prefere usar o Emissor gratuito. Como tive que dar uma solução imediata, segui a orientacao do manual do Emissor e alterei na Unit: pcnLayoutTXT.pas, as linhas a seguir e deu certo: linha: 322 ....LoadLayout('<O07> O10|VBC¨|PIPI¨|VIPI¨'); mudei para: ....LoadLayout('<O07> O10|VBC¨|PIPI¨'); linha: 323 ....LoadLayout('<O07> O11|QUnid¨|VUnid¨|VIPI¨'); mudei para: ....LoadLayout('<O07> O11|QUnid¨|VUnid¨'); Não fiz outras análises.
  8. Olá Carbox, muito grato pela atenção. O arquivo TXT é gerado usando o pacote ACBrNFE para emissão da NFE através do emissor gratuito da SEFAZ.
  9. Olá Amigos, Estou com um problema na geração do arquivo NFE TXT. Sempre está gerando o registro "O10" e "O11". Ao validar o arquivo ele é rejeitado com a mensagem "Registro O11 não pode vir após o registro O10. Alguém já passou por isto, poderia me dar uma dica de como resolver.
  10. Oi Marcio, Vc ainda tem o executável para Unificar o SPED Pis/Cofins?
  11. Olá Edson, Eu fiz uma function que funciona quando já tenho o número de SERIE do certificado já registrado e só preciso saber se o certificado está ativo. Com as informações obtidas é possível fazer outros testes. Mas, a E.Message, já traz tudo o que preciso. E quando não tem exception a resposta IsValid.Result também satisfaz. function CertificadoValido(Serie: string): Boolean; var xCert : ICertificate2; DtVal: TdateTime; SerieEncontrada: string; begin result := false; if trim(Serie) = '' then exit; try Form1.USNfe_Aux.Configuracoes.Certificados.NumeroSerie := Serie; try xCert := Form1.USNfe_Aux.Configuracoes.Certificados.GetCertificado; DtVal := xCert.ValidToDate; SerieEncontrada := xCert.SerialNumber; result := xCert.IsValid.Result; except on e: Exception do MessageDlg('Erro: '+e.Message, mtError, [mbOK], 0); end; finally end; ...
  12. Olá Gabriel, após atualizar os Fontes que vc postou, os XMLs gerados não validam mais. Erro Completo: Falha na validação dos dados da nota 2451 Element '{http://www.portalfis....br/nfe}versao'is unexpected according to content model of parent element
  13. Olá Amigos, Estou sofrendo com um problema que está me incomodando muito, e não estou achando a causa. Erro: Falha na validação dos dados da nota 2451 Erro Completo: Falha na validação dos dados da nota 2451 Element '{http://www.portalfiscal.inf.br/nfe}versao'is unexpected according to content model of parent element '{http://www.portalfiscal.inf.br/nfe}ide'. Anexei a imagem do erro e o XML gerado. A mensagem indica algo errado com relação a <versao>, Estou usando a versão 3.10. Já passei e repassei pelas informações tanto no sistema como no XML e não consigo encontrar nada estranho, Tentei informar valores de várias formas e nenhum passa. Parece ser algo simples, mas acho que já estou em loop e não consigo sair do lugar. Desde já muito grato por uma dica. 35150359201707000109550000000024511000008646-nfe.xml
  14. Complementando o Post anterior. Ao invez de alterar ACBrNFeNotasFiscais, preferi resolver o problema da duplicidade da primeira linha, alterando no pcnLayoutTXT ... else if versao = '3.10' then begin LoadLayout('<B> NOTA FISCAL|1'); //ok LoadLayout('<B01> A|versao¨|^id^'); //ok ...
  15. Olá Gabriel, Baixei as Units que vc postou, só que ao gerar o TXT, usando a function <NotasFiscais.SaveToTXT> a primeira linha está aparecendo duplicada. Veja como ficou: ... NOTA FISCAL|1 NOTA FISCAL|1 A|3.10|NFe42150301927520000298550010000040711000053780 B|42|00005378|VENDA|1|55|1|4071|2015-03-17T00:00:00-03:00|2015-03-17T00:00:00-03:00|1|1|4202404|1|1|0|1|1|0|0|3|2.2|| ... Em algumas versões antigas ocorria isto, mas foi resolvido. Ao fazer um DEBUG, percebi que logo após a geração do TXT, tem os seguintes procedimentos: ... if loSTR.Count > 0 then begin loSTR.Insert(0,'NOTA FISCAL|'+IntToStr(Self.Count)); J:=loSTR.Count; .. Comentei estas linhas e resolveu. Alguém já passou por isto?
  16. Valeu Gabriel. Baixei. Vou testar e te dou feed-back.
  17. Olá Carbox, Muito grato pela atenção. No arquivo zipado, contem 2 arquivos TXT, um como estava sendo gerado e outro como está gerando após minha alteração. Contém também a Unit pcnLayoutTXT com a alteração. Nfe_txts.zip
  18. Boa Noite, Sei que este post está há muito tempo parado. Mas, estou enfrentando este problema. Atualizei tudo, mudei a versão para ve310 e ao gerar o Arquivo TXT, não aparece a a linha A|3.10|.... Fiz um DEBUG e percebi que não estava gerando a linha porque na function a seguir: function CarregarLayoutTXT(const versao: string): AnsiString; ... else if versao = '2.00' then begin LoadLayout('<B01> NOTA FISCAL|1'); LoadLayout('<B01> A|2.00|^id^'); //ok ... else if versao = '3.10' then begin LoadLayout('<B> NOTA FISCAL|1'); LoadLayout('<B01> A|versao¨|^id^'); ... Simplesmente substituí o campo <versao¨> por <3.10> e recompilei o pacote: PCN2 e funcionou. Ficou assim: ... else if versao = '3.10' then begin LoadLayout('<B> NOTA FISCAL|1'); LoadLayout('<B01> A|3.10|^id^'); ... Não sei se esta é a melhor solução. Também não pesquisei mais para ver porque o campo <versao¨> não estava sendo substituído. Se alguém que conhece melhor esta rotina puder dar uma olhada e me indicar uma melhor solução eu ficaria muito grato.
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.