Rejeição: Referenciar o CT-e Multimodal que foi emitido pelo OTM.

[André Franco]

Boa tarde!

Na versão 3.0 transmite normal com o código abaixo.

          infCTeNorm.infServVinc.infCTeMultimodal.New;
          infCTeNorm.infServVinc.infCTeMultimodal[0].chCTeMultimodal := DM.qryCtechavectereferenciado.AsString;

 

Já na versão 4.0, o mesmo código acima retorna a seguinte mensagem abaixo:

Rejeição: Referenciar o CT-e Multimodal que foi emitido pelo OTM.

 

Onde estou errando?

 

Atenciosamente.

[André Franco]

Em tempo é um ct-e complementar e nele tem que referenciar o CT-e multimodal que foi emitido pelo OTM

O CT-e está referenciado.

[André Franco]

Segue o XML.

A Tag (infServVinc/infCTeMultimodal/chCTeMultimodal) não está no XML em anexo.

xml.xml

[André Franco]

Me desculpem fiz confusão, mas o problema ainda existe.

O CT-e referenciado está no XML, tanto na versão 3.0 como na versão 4.0.

Será algo na SEFAZ?

[Italo Giurizzato Junior]

Boa tarde André,

O XML que você anexou não tem o grupo infServVinc, porque você não alimentou ou mesmo alimentando ele não gera na versão 4?

Analisando a unit responsável por gerar o XML temos o seguinte:

      if VersaoDF >= ve300 then
        GerarInfServVinc;

Isso significa que a partir da versão 3.00 em diante é para gerar.

[André Franco]

Mesmo alimentando ele não gera!

[Italo Giurizzato Junior]

Boa tarde André,

O componente só vai gerar o grupo infServVinc se for adicionado as informações do multimodal, veja:

procedure TCTeW.GerarInfServVinc;
var
  i: Integer;
begin
  if CTe.infCTeNorm.infServVinc.infCTeMultimodal.Count > 0 then
  begin
    Gerador.wGrupo('infServVinc', '#388');

    for i := 0 to CTe.infCTeNorm.infServVinc.infCTeMultimodal.Count - 1 do
    begin
      Gerador.wGrupo('infCTeMultimodal', '#389');
      Gerador.wCampo(tcStr, '#390', 'chCTeMultimodal', 44, 44, 1, CTe.infCTeNorm.infServVinc.infCTeMultimodal.Items[i].chCTeMultimodal, DSC_CHCTEMULTIMODAL);
      Gerador.wGrupo('/infCTeMultimodal');
    end;

    if CTe.infCTeNorm.infServVinc.infCTeMultimodal.Count > 999 then
      Gerador.wAlerta('#389', 'infCTeMultimodal', DSC_INFCTEMULTIMODAL, ERR_MSG_MAIOR_MAXIMO + '999');

    Gerador.wGrupo('/infServVinc');
  end;
end;

 

[André Franco]

 if (CTe.Ide.tpCTe = tcNormal) or (CTe.Ide.tpCTe = tcSubstituto) then

 

Analisando o código acima vejo que só entra se for ct-e normal ou substituto, quando é complemento não entra.

E no caso que tenho é um ct=e complemento.

[Italo Giurizzato Junior]

André,

Estude a procedure GerarInfCTeComp que se encontra na unit pcteCTeW.

Você vai ver o que é gerado quando é um CT-e de Complementação.

Sempre tenha em mãos o manual que contem o layout.