como tratar o retorno

[felipeiw]

pessoal

no provedor Giap estou pegando o retorno da seguinte maneira e esta funcionando:

  ACBrNFs.Emitir(CdsNotas1NUMERO.AsString,meAutomatico,False);

  if (ACBrNFs.WebService.Emite.Sucesso = True) then
  begin
    if (Length1(ACBrNFs.WebService.Emite.CodVerificacao) > 0) then
    begin
      CdsNotas1.Edit;
      CdsNotas1NFECHA.Value := Copy(ExtractFileName(ACBrNFs.NotasFiscais.Items[0].NomeArq),1,PosEx('-',ExtractFileName(ACBrNFs.NotasFiscais.Items[0].NomeArq))-1);
      CdsNotas1NFEPRO.Value := ACBrNFs.WebService.Emite.Protocolo;
      CdsNotas1NFEREC.Value := ACBrNFs.WebService.Emite.CodVerificacao;
      CdsNotas1NUMSER.Value := StrToInt(ACBrNFs.WebService.Emite.NumeroNota);
      CdsNotas1.Post;
      CdsNotas1.ApplyUpdates(0);
    end
    else
      ShowMessage('1-Erro ao enviar a Nota  ');
end;

porem no provedor Fiorilli nao entra no primeiro IF (sucesso = True), como devo pegar o retorno desse provedor, tem diferença mesmo entre os provedores ?

Obrigado

 

[Italo Giurizzato Junior]

Boa tarde Felipe,

A diferença que pode ocorrer é nas informações retornadas.

Se não entra no primeiro IF vai ser necessário do XML de retorno para que possamos analisar.

[felipeiw]

oi Italo segue

380-lista-nfse-sinc-soap.xml

[Italo Giurizzato Junior]

Felipe,

Muito obrigado, já inclui na minha lista de tarefas. TK-2064

[Italo Giurizzato Junior]

Boa tarde Felipe,

Analisando o código não encontrei nada que pudesse estar gerando o valor false a propriedade Sucesso.

Favor realizar um teste usando o programa exemplo, pois quero saber a mensagem exata que esta sendo gerada na lista de erros.