Ir para conteúdo
  • Cadastre-se

dev botao

NFC-e Chave de acesso


Ver Solução Respondido por Renato Rubinho,
  • Este tópico foi criado há 473 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

boa tarde 

Estou precisando gerar a chave de acesso da NFC-e manualmente para fazer alguns testes mas não esta ficando certo. 

       schave := ACBrDFeUtil.GerarChaveAcesso(
                            35,
                            dataemissao,
                            CNPJ,
                            1,
                            Sequencial,
                            0,
                            Sequencial,// este campo não sei se é certo passar assim 
                            65);

desde já agradeço

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa noite,

Veja cada parâmetro a seguir.

function GerarChaveAcesso(AUF: Integer; ADataEmissao: TDateTime; const ACNPJ:String;
                          ASerie, ANumero, AtpEmi, ACodigo: Integer;
                          AModelo: Integer = 55; ASiteAutorizador: Integer = -1): String;

Veja no link a seguir como é a composição da chave

O ACodigo é o cNf, da composição da chave.

Se você está tentando gerar chaves de documentos já emitidos anteriormente, precisará saber qual foi o cNf utilizado para gerar a mesma chave.

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Membros Pro

boa tarde!

Deu certo a geração da chave de acesso, obrigado.

Apos gerar a chave de acesso estou gerando o xml novamente e consultando o nfce esta vindo o retorno q ele for transmitido.

mas eu não estou conseguindo gravar o xml completo com a autorização.

NFe.NotasFiscais.GravarXML(caminho+nomearquivo);

desde ja agradeço.

 

 

 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro

obrigado @Renato Rubinho

NFE.Configuracoes.Arquivos.Salvar             :=  true;
NFE.Configuracoes.Geral.Salvar                := true;

eu testei os 2 results mas esta vindo o json da consulta e eu queria o xml com a autorização de uso

MemoResp.Lines.Text := ACBrNFe1.WebServices.Consulta.RetWS;
memoRespWS.Lines.Text := ACBrNFe1.WebServices.Consulta.RetornoWS;

Editado por AG Sistemas
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 473 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.