Manager Client Descartar CT-e

Para realizar o descarte de um CT-e basta utilizar o método DescartarCTe informando a chave de acesso. Segue abaixo os detalhes do método e de seu retorno.

Detalhes DescartarCTe

Função:  Realiza o descarte de um CT-e.
Classe:  TspdCTeClientX
Método:  DescartarCTe
Tipo Retorno: spdRetDescartaX

Parâmetros aceitos:

Atenção! Somente conhecimentos com status REJEITADA, REGISTRADA E INUTILIZADA poderão ser descartados.

Delphi

procedure TfrmExemplo.btnDescartarCTeClick(Sender: TObject);
var
  _Retorno: spdRetDescartaX;
  _ChaveCTe: string;
begin
  if not InputQuery('Chave do Conhecimento', 'Chave do Conhecimento:', _ChaveCTe) then exit;

  //Esse método faz o descarte do conhecimento no Manager eDoc através do Componente Manager Client
  _Retorno := CTe.DescartarCTe(_ChaveCTe);
  
  //Exibe o retorno no memo
  memoRetorno.Clear;
  if _Retorno.Status = Sucesso then
    memoRetorno.Lines.Add('Mensagem: ' + _Retorno.Mensagem)
  else
    memoRetorno.Lines.Add('Erro: ' + _Retorno.NomeExcecao + ', ' + _Retorno.Mensagem);
end;

C#

private void btnDescartarCTe_Click(object sender, EventArgs e)
{
  spdRetDescartaX Retorno = null;
  string _ChaveCTe = InputBox("Chave do Conhecimento", "Chave do Conhecimento:", "");
  if (_ChaveCTe != "")
  {
    //Esse método faz o descarte de um conhecimento através do Componente Manager Client
    Retorno = CTe.DescartarCTe(_ChaveCTe);
   
    //Exibe o retorno no memo
    memoRetorno.Text = "";
    if (Retorno.Status == spdManagerClientX.TStatus.Sucesso)
      memoRetorno.Text = ("Mensagem: " + Retorno.Mensagem);
    else
      memoRetorno.Text = ("Erro: " + Retorno.NomeExcecao + ", " + Retorno.Mensagem); 
  }
}

Visual Basic 6

Private Sub btnDescartarCTe_Click()
  Dim Retorno As spdRetDescartaX
  Dim Chave As String
 
  Chave = InputBox("Chave do Conhecimento:", "Chave do Conhecimento", "")
 
  'Esse método faz o descarte do CTe através do Componente Manager Client
  Set Retorno = CTe.DescartarCTe(Chave)
 
  'Exibe o retorno do memo
  If Retorno.Status = Sucesso Then
    memoRetorno.Text = "Mensagem: " + Retorno.Mensagem + vbCrLf
  Else
    memoRetorno.Text = "Erro: " + Retorno.NomeExcecao + ", " + Retorno.Mensagem
  End If
End Sub

Retorno

O tipo spdRetDescartaX possui os seguintes campos:

A mensagem traz o resultado da comunicação, em caso de sucesso, a mensagem será "OK Operação realizada com sucesso" e no caso de falha, ele terá a mensagem do motivo da falha.