Obter transportador consultando a NF-e pelo NSU

[Renata Cunha]

Boa tarde.

Estou realizando uma consulta de NF-e através do NSU e preciso acessar os dados do transportador da nota.

Eu consigo acessar esses dados pelo componente ACBrNFe?

Desde já agradeço.

[BigWings]

Com a nota manifestada você tem acesso ao XML completo dela e todas as informações, inclusive os dados do transportador informados na nota.

Para o caso de o transportador não estar informado na nota, mas emitiu um CTe referenciando a mesma, respondi aqui:

 

[Renata Cunha]

Atráves do doczip eu consigo ter acesso as informações do transportador? Não encontrei em nenhuma propriedade.

ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[]

[BigWings]

32 minutos atrás, Renata Cunha disse:

Atráves do doczip eu consigo ter acesso as informações do transportador? Não encontrei em nenhuma propriedade.

ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[]

O ACBr te retorna o XML completo da nota, basta carregar ele no componente e fazer a leitura das propriedades:

var
  I: Integer;  
  DFe: pcnRetDistDFeInt.TdocZipCollectionItem;
begin

[...]

  ACBrNFe1.DistribuicaoDFe(StrToInt(cUFAutor), CNPJ, ultNSU, ANSU);

  for I := 0 to ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count - 1 do
  begin

    DFe := ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I];

    case DFe.schema of
      schprocNFe: begin  // nfe completa
        ACBrNFe1.NotasFiscais.Clear;
        ACBrNFe1.NotasFiscais.LoadFromString(DFe.XML);

        ShowMessage('Transportador: ' + ACBrNFe1.NotasFiscais[0].NFe.Transp.Transporta.CNPJCPF + ' - ' + ACBrNFe1.NotasFiscais[0].NFe.Transp.Transporta.xNome);
      end;

      [...]

    end;
  end;

end;