CTe Cancelados pelo Emitente

[daniel_mirassol]

bom dia,

Fiz um programa para manifestar CTE, utilizando componente ACBRCTE, no entando quando o transportador, cancela o conhecimento não aparece nas requisições, existe alguma maneira de pegar os CT-e cancelados , haja visto que  tenho cliente que utiliza um programa chamado Arquivei e o mesmo consegue puxar os cancelados. Alguém tem alguma sugestão ?

 

Obrigado. 

[BigWings]

Não existe manifestação para CTe, existe apenas o evento de prestação de serviço em desacordo, que é semelhante a uma manifestação.

Acredito que esteja falando do sistema de distribuição de documentos fiscais, pelo método ACBrCTe.DistribuicaoDFe.

Quando o CTe é emitido o ambiente nacional gera um NSU para o XML do CTe.

Quando ele é cancelado é gerado novo NSU para o XML do evento de cancelamento pelo emitente.

Os dois XML devem estar disponíveis pelo método DistribuicaoDFe.

Qual documento você não está recebendo?

[daniel_mirassol]

bom dia , 

é isso mesmo , não estou recebendo o cancelamento do CTE.

[Juliomar Marchetti]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

[antonio.carlos]

@daniel_mirassol tudo bem ?

Quando você cancela um documento, no caso o CT-e, você tem como obrigação, enviar para o tomador do serviço seja ele remetente ou destinatário da mercadoria. O arquivo *-procEventoCTe.xml gerado pelo cancelamento.
Este XML contém o pedido de cancelamento assinado digitalmente e o protocolo da SEFAZ que atesta o cancelamento do CT-e.
O tomador do serviço poderá se utilizar do DistribuicaoDFePorUltNSU que existe no componente ACBrCTe para obter o XML do CT-e, Evento de Cancelamento, Evento de Carta de Correção, Evento MDF-e (Autorização/Cancelamento) e o Evento de Comprovante de Entrega. 

[BigWings]

6 horas atrás, daniel_mirassol disse:

bom dia , 

é isso mesmo , não estou recebendo o cancelamento do CTE.

Está fazendo o tratamento no retorno do DistribuicaoDFe pra saber se está recebendo o XML do CTe ou do evento de cancelamento?

Algo assim:

ACBrCTe1.DistribuicaoDFePorUltNSU(cUF, CNPJCPF, IntToStr(nUltNSU));
case ACBrCTe1.WebServices.DistribuicaoDFe.retDistDFeInt.cStat of
  138: begin
    for I := 0 to ACBrCTe1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count - 1 do
    begin
      doc := ACBrCTe1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[I];
      case doc.schema of
        schprocCTe, schprocCTeOS: begin
          XMLCTe := doc.XML;
        end;
        schprocEventoCTe: begin
          XMLEvento := doc.XML;
        end;
		
		[...]

 

[daniel_mirassol]

Big , bom dia !

Não fiz o tratamento , estou passando somente o "básico" ,  código abaixo. Minha dúvida é o seguinte, a viável "doc"  que tipo ela é ?

 

if (cStat = 138) then
        begin
          // Percorre a lista de NFe
          for i := 0 to AcbrCte.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count - 1 do
          begin
            // Armazena o NSU
            if (Trim(AcbrCte.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[i].NSU) <> '') then
              ultNSU := AcbrCte.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[i].NSU;

            Mensagem('Chave CTE:' + ZQueryCTCHAVE.AsString);

            // Verifica se tem NSU e Chave da NFe
            if (AcbrCte.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[i].NSU <> '') and               (AcbrCte.WebServices.DistribuicaoDFe.retDistDFeInt.docZip[i].resDFe.chDFe <> '') then
            begin
               ...

 

[BigWings]

Mesmo tipo do ACBrCte.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[i] que está sendo atribuído: TdocZipCollectionItem.

Não precisa usar ela se não quiser, é apenas pra simplificar o código e melhorar a leitura.