Correcao de Digitacao DoACBrNFeUnit

[Alberto.Leal]

Na unit DoACBrNFeUnit do projeto Monitor plus
metodo consultarNFe
tem um erro no grupo RETEVENTO

onde na linha 255 esta 
'chNFe='+ACBrNFe1.WebServices.Consulta.procEventoNFe.Items.RetEventoNFe.retEvento.Items[J].RetInfEvento.NomeArquivo+sLineBreak+
de vez
'chNFe='+ACBrNFe1.WebServices.Consulta.procEventoNFe.Items.RetEventoNFe.retEvento.Items[J].RetInfEvento.chNFe+sLineBreak+        
e na linha 256 esta 
'tpEvento='+ACBrNFe1.WebServices.Consulta.procEventoNFe.Items.RetEventoNFe.retEvento.Items[J].RetInfEvento.chNFe+sLineBreak+
de vez
'tpEvento='+TpEventoToStr(ACBrNFe1.WebServices.Consulta.procEventoNFe.Items.RetEventoNFe.retEvento.Items[J].RetInfEvento.tpEvento)+sLineBreak+

em anexo a unit corrigida

 

DoACBrNFeUnit.pas

[Celso Marigo Junior]

Obrigado pela contribuição, devo avaliar e enviar para o SVN.