Bom dia,
estou implementando o metodo de contigencia scan, utilizando o delphi 2007,
consegui fazer as transmissoes das notas, mas não encontrei como eu implemento
a consulta da situação da nota pelo SCAN. O metodo antigo para consulta no ambiente
normal e o seguinte:
procedure TConsulta.consultaNormal;
var
sl : TStringList;
begin
Acbr.Consultar;
ACBr.NotasFiscais.Items[0].SaveToFile(FormPrincipal.Conf.pathNFXML+'\'+chave+'-NFe.xml');
sl := TStringList.Create;
sl.LoadFromFile(FormPrincipal.Conf.pathNFACBR+'\'+chave+'-sit.xml');
sl.SaveToFile(FormPrincipal.Conf.pathNFACBR+'\'+chave+'-sit.xml');
FormPrincipal.GravaBancoNFe(Acbr,Acbr.NotasFiscais.Items[0].NFe.procNFe.xMotivo);
end;
No SCAN é da mesma forma?
Att. Bruno