Criar Chave NFCe com ACBrLib

[João Paulo Pires]

Boa tarde, minha duvida é a seguinte, uso tbm o ACBRMonitorPlus, que tem uma função(Gerar Chave) que ajuda bastante para controlar as NFe caso o SEFAZ esteja lento.

Assim eu consigo Gerar a chave da NFe antes de enviar o xml para o sefaz,  caso o Sefaz esteja lento ou por algum motivo a NFe não é enviada, eu consigo fazer a consulta da NFe pela chave, e dependendo da situação do retorno da consulta, eu envio novamente o XML ou então se tiver Autorizada eu mando imprimir.

Agora na DLL ACBrLib não achei essa função para Gerar a Chave da NFe. isso é importante para ter o controle da situação. Depois que fiz isso no meu sistema, acabou a questão de Duplicidade na NFe ou Rejeição.

 

a Rotina do meu envio é a seguinte.

1 - Crio a Chave da NFe usando a Função do ACBRMonitorPlus

2 - Faço a consulta da Nfe com a chave.

3 - Se a a Consultar me retorna que a NFe não consta na base de dados do sefaz, envio o XML SE consta na Base de dados capturo o Retorno q pode ser Autorizada, Cancelada, etc...

Mas para isso, teria que ter a Chave da NFe antes de Enviar o XML. 

Tem essa função na DLL? 

Editado 6 Novembro, 2019 por João Paulo Pires

[Juliana Tamizou]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

[Rafael Dias]

Função já foi adicionada na ACBrLibNFe, favor atualizar sua classe e baixar a nova versão da dll.

 

[João Paulo Pires]

21 horas atrás, Rafael Dias disse:

Função já foi adicionada na ACBrLibNFe, favor atualizar sua classe e baixar a nova versão da dll.

 

ok, rafael, vou verfiicar aqui, obrigado, essa função ajuda bastante.

[João Paulo Pires]

@Rafael Dias Bom dia, me da um ajuda aqui... não consigo recuperar a chave gerada.

' na função gerar_chave

    abreConfigDLL
    
    nfe.LimparLista
    SetResposta nfe.GerarChave(UF, cod_nf, modelo, serie, nnf, tipo_emissao, data, CNPJ)
 

o arquivo de log retornaACBrLibNFE-20191115.log

 

porém nessa função, retornar vazio

 

Private Sub SetResposta(ByRef resposta As String)
Dim msgRetorno As String

    If msgRetorno <> vbNullString Then
      msgRetorno = msgRetorno + vbCrLf + resposta
    Else
      msgRetorno = resposta
    End If
  
End Sub

 

Teria que retornar a chave da NF gerada.

[Rafael Dias]

Foi enviado uma correção favor baixar a dll novamente.

[Juliana Tamizou]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado