Função Acbrnfe1Gerarlog

[bnobre]

Olá,

 

No projeto de exemplo, temos  o procedimento ACBrNFe1GerarLog que retorna no memoLog informações pertinentes ao retorno da SEFAZ referente a nota.

 

Não consegui localizar em que momento/unit essa função é chamada no programa. Sei que é depois da linha "ACBrNFe1.Enviar(vNumLote,True,Sincrono);" e antes da linha "MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetWS);" da "procedure TForm1.btnCriarEnviarNFCeClick(Sender: TObject);".

 

Mas não localizo a UNIT onde a mesma é usada, para analisar como são escritas tais informações.

 

Alguém poderia me indicar???

Edited June 17, 2015 by doidopb

[Régys Silveira]

ACBrNFe1GerarLog é um evento do componente ACBrNFe, este evento possui um retorno que é a string mensagem, se você clicar no componente, e no delphi mudar no object inspector para "events", vai ver dois eventos, um deles é o OnGerarLog clicando duas vezes nele você vai ver o método criado para o evento (ACBrNFe1GerarLog) e lá verá a atribuição da mensagem ao memo.

Linha 1374
procedure TForm1.ACBrNFe1GerarLog(const Mensagem: String);begin
 memoLog.Lines.Add(Mensagem);
end;

Para ver quando o evento é chamado, ai você precisa estudar o componente ACBrNFe procurando todas as chamadas ao evento onGerarLog.