Mensagem de retorno do status 539 (duplicidade)

[geovanesilveira]

Quando tento enviar uma numeração de conhecimento, que por ventura, já foi processada, recebo a seguinte mensagem:

Project cte.exe raised exception class EACBrDFeException with message 'Conhecimento(s) não confirmados:
7000->Rejeição: Duplicidade de CT-e  [nRec:423000006816472]

Até ai tudo certo, afinal ocorreu a exceção como esperado. Porém o número de recibo do lote (nRec) que vem junto da imagem não me serve muito, já que a consulta de CTe é feita pela chave. Então procurei pelo local aonde da o raise na exceção e encontrei na unit ACBrCTeWebServices, localizada na rotina TCTeRetRecepcao.TratarRespostaFinal:

  //Montando a mensagem de retorno para os Conhecimentos nao confirmados
  for I :=  to FConhecimentos.Count - 1 do
  begin
    if not FConhecimentos.Items[I].Confirmado then
      FPMsg := FPMsg + IntToStr(FConhecimentos.Items[I].CTe.Ide.nCT) +
        '->' + FConhecimentos.Items[I].Msg + LineBreak;
  end;

Procurei o local aonde é montade o FConhecimentos.Items.Msg mas não encontrei, então para mostrar a chave fiz o seguinte:

  //Montando a mensagem de retorno para os Conhecimentos nao confirmados
  for I :=  to FConhecimentos.Count - 1 do
  begin
    if not FConhecimentos.Items[I].Confirmado then
      FPMsg := FPMsg + IntToStr(FConhecimentos.Items[I].CTe.Ide.nCT) +
        '->' + FConhecimentos.Items[I].Msg +' [Chave: '+ FConhecimentos.Items[I].NumID +']'+ LineBreak;
  end;

Apesar de ainda achar que o certo seria arrumar a propriedade .Msg essa solução já me serve. 

Creio que trazer a chave é melhor do que não traze-la, já que com ela consigo consulta-la na fazenda sem precisar de debug ou códigos adicionais afins.

[Italo Giurizzato Junior]

Bom dia Geovane,

A propriedade Msg contem exclusivamente o conteúdo da TAG xMotivo que contem no XML de retorno.

[geovanesilveira]

Italo,

após dar uma pesquisada, vi que cometi um erro. A mensagem do status 539 está vindo do jeito como eu havia descrito acima:

Rejeicao: Duplicidade de CT-e, com diferença na Chave de Acesso [chCTe: 99999999999999999999999999999999999999999999][nRec:999999999999999] 

E a mensagem da qual eu estava falando, era na verdade a 204:

Rejeição: Duplicidade de CT-e [nRec:999999999999999] 

E quanto ao xMotivo não trazer a chave na mensagem 204, sendo que vem do XML de retorno, o único jeito seria falar com a fazenda?

[JoaoPauloRicardo]

basta ler as mensagens que se compreende a diferença.

msg 539 reporta o envio pra a sefaz de uma cte já processada, contudo a chave indicada difere da chave da base de dados do sefaz. para resolver a situação basta alterar a chave pela indicada na mensagem e consultar a cte para atualizar a situacao.

msg 204 é o caso tipico de reenviar os dados de uma nota já processada, para resolver a situação basta consultar a cte para atualizar a sua situação

Editado 30 Março, 2016 por 3Soft Sistemas

[geovanesilveira]

3Soft,

entendi a diferença entre elas, porém no segundo caso, 204, a mensagem não traz a chave, apena o número de recibo do lote, ao qual propus a alteração para fazer trazer, mas ja que a mensagem vem do XML, o único jeito seria fazer um condição só pra ela (o que não é legal):

for I := 0 to FConhecimentos.Count - 1 do
begin
  if not FConhecimentos.Items[I].Confirmado then
  begin
    FPMsg := FPMsg + IntToStr(FConhecimentos.Items[I].CTe.Ide.nCT) +'->'+ FConhecimentos.Items[I].Msg;

    if (FcStat = 204) then
      FPMsg := FPMsg +' [chCTE: '+ FConhecimentos.Items[I].NumID +']';

    FPMsg := FPMsg + LineBreak;
  end;
end;

 

Editado 30 Março, 2016 por geovanesilveira

[JoaoPauloRicardo]

não precisa trazer chave pois a mesma na sefaz é igual á reenviada

[geovanesilveira]

3Soft,

sim, mas por questões de facilitação, traze-la na mensagem não deveria ser um problema, não?

[JoaoPauloRicardo]

essa é uma questão que terás de colocar ao SEFAZ

Editado 30 Março, 2016 por 3Soft Sistemas