Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 3970 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro
Postado (editado)

Estou enviando o danfe conforme segue abaixo funcionando perfeitamente

 

FDataModule.ACBrNFe1.Enviar(1, true);
      aChaveNfe              := FDataModule.ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].chNFe;
      aProcolo               := FDataModule.ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].nProt;
      aRecibo                := FDataModule.ACBrNFe1.WebServices.Retorno.NFeRetorno.nRec;
      EdtResposta.Lines.Text := FDataModule.ACBrNFe1.WebServices.Retorno.xMotivo;
      status                 := IntToStr(FDataModule.ACBrNFe1.WebServices.Retorno.cStat)

 

 

Vez em quando quando existe um grande número de notas, preciso enviar todas as notas para depois imprimir os DANFEs, ai fiz como segue abaixo

 

FDataModule.ACBrNFe1.Enviar(1, false);

FDataModule.ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].chNFe;
      aProcolo               := FDataModule.ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].nProt;
      aRecibo                := FDataModule.ACBrNFe1.WebServices.Retorno.NFeRetorno.nRec;
      EdtResposta.Lines.Text := FDataModule.ACBrNFe1.WebServices.Retorno.xMotivo;
      status                 := IntToStr(FDataModule.ACBrNFe1.WebServices.Retorno.cStat)

 

 

Quando transmito todas as notas e vou imprimir o DANFE,

 

Aparece aquele mensagem em vermelho no danfe dizendo que o DANFE não foi autorizado e não tem valor fiscal.

 

Alguem sabe porque isso acontece já que o XML é enviado ?

Editado por Arnaldo Cruz
  • Membros Pro
Postado (editado)

Faço a montagem do XML antes

 

FDataModule.ACBrNFe1.NotasFiscais.LoadFromFile(cdsEnvio.FieldByName('CAMINHOXML').AsString);
FDataModule.ACBrNFe1.Configuracoes.Geral.PathSchemas := gsAppPath + 'Schemas';
FDataModule.ACBrNFe1.NotasFiscais.Assinar;
FDataModule.ACBrNFe1.NotasFiscais.Valida;

 

Faço o Envio com impressão do DANFE

FDataModule.ACBrNFe1.Enviar(1, True);

 

Sem impressão do Danfe (Por causa  da conexão que é muito lenta ai retirei a impressão do danfe para fazer depois de todas as notas transmitidas)

 

Envio sem impressão do DANFE

FDataModule.ACBrNFe1.Enviar(1, False);

 

Todas as notas são transmitiddas Sem a impressão do danfe , faço a consulta no sefaz as notas estão lá.

 

o problema é que quando vou imprimir os xmls não estão assinados

 

Aparece aquele mensagem em vermelho no danfe dizendo que o DANFE não foi autorizado e não tem valor fiscal..

 

se eu usar FDataModule.ACBrNFe1.Enviar(1, True);

 

O danfe é impresso logo em seguida  tudo certinho.

 

 

ALguem sabe mim explicar por que a ACBR não preenche o xml com protocolo e recibo quando não é impresso o DANFE ?

Editado por Arnaldo Cruz
  • Moderadores
Postado

Então, é por isso que lhe perguntei como você está imprimindo o DANFE, mas você mostrou como está enviando.

Se você estiver lendo o XML antigo e não o novo XML após o envio, realmente vai sair como não autorizado.

 

O correto é regravar o XML após o envio, assim você o pega com o protocolo de autorização e recibo, ai sim, desse XML você lê para o componente e imprime.

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
  • Este tópico foi criado há 3970 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.