ACBrANe - Cancelamento de averbação AT&M

[Adileine Carla Ferraz]

Boa tarde

Gostaria de saber se alguém esta fazendo via Web Service o cancelamento da averbação do CTE junto a ATM utilizando o componente.

URL: webserver.averba.com.br/20

Nome: averbaCTe

Input ou entrada:
Usuário: xsd.string
Senha: xsd.string
Codatm: xsd.string
xmlCTe: xsd.string (XML do Cancelamento do CT-e protocolado no SEFAZ)

Output ou retorno:

<Response>
        <Numero></Numero>
        <Serie></Serie>
        <Filial></Filial>
        <CNPJCli></CNPJCli>
        <Averbado>
                <dhAverbacao></dhAverbacao>
                <Protocolo></Protocolo>
        </Averbado>
</Response>

 

[Italo Giurizzato Junior]

Boa tarde Adileine,

Pelo que entendi para efetuar o cancelamento da averbação em vez de você enviar o XML do CT-e assinado e com o protocolo de autorização, você deve enviar o XML *-procEventoCTe.xml referente ao cancelamento do CT-e.

O arquivo *-procEventoCTe.xml contem o pedido de cancelamento assinado e o protocolo da SEFAZ que homologa o cancelamento.

[Adileine Carla Ferraz]

16 horas atrás, Italo Jurisato Junior disse:

Boa tarde Adileine,

Pelo que entendi para efetuar o cancelamento da averbação em vez de você enviar o XML do CT-e assinado e com o protocolo de autorização, você deve enviar o XML *-procEventoCTe.xml referente ao cancelamento do CT-e.

O arquivo *-procEventoCTe.xml contem o pedido de cancelamento assinado e o protocolo da SEFAZ que homologa o cancelamento.

Sim isso mesmo que eu também entendi, tentei passar da forma abaixo e deu tudo  certo.

      OpenDialog1.Title := 'Selecione o ProcEventoCTe';
      OpenDialog1.DefaultExt := '*-procEventoCTe.xml';
      OpenDialog1.Filter := 'Arquivos ProcEventoCTe (*-procEventoCTe.xml)|*-procEventoCTe.xml|Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*';
      OpenDialog1.InitialDir := ACBrCTe1.Configuracoes.Arquivos.PathSalvar;
      if OpenDialog1.Execute then
      begin
         Documento := TStringList.Create;
         Documento.LoadFromFile(OpenDialog1.FileName);
         DocNFeCTe := Documento.Text;
         Documento.Free;
         ACBrANe1.Documentos.Clear;
         GerarANe;

         ACBrANe1.Enviar 
         ACBrANe1.Documentos.Clear;

sendo o GerarANe...

      with ACBrANe1.Documentos.Add.ANe do
      begin
         Usuario := tabelaUsuarioATM .Value;
         Senha   := tabelaSenhaATM.Value;
         codatm  := tabelaCodigoATM.Value;
         xmlDFe  := DocNFeCTe;
      end;
      ACBrANe1.Documentos.GerarANe;

Perfeito Obrigada.

 

[Italo Giurizzato Junior]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.