[MDF-e erro seguro da carga]

3 horas atrás, Elviro disse:

Bom dia, mesmo colocando o exemplo acima, não passa de forma alguma, sempre diz que 665 - rejeição: as informações do seguro da carga devem ser preenchidas para o modal rodoviário

Tenta Assim:

           with seg.Add do
           begin
              if ibquery1.FieldByName('SEG_RESPONSAVEL').AsInteger = 1 then
                  respSeg := rsEmitente
              else
                  respSeg := rsTomadorServico;
              CNPJCPF := trim(ibquery1.FieldByName('SEG_CNPJCPF').AsString);

              xSeg := copy(trim(ibquery1.FieldByName('SEG_SEGURADORA').AsString), 1, 30);
              CNPJ := trim(ibquery1.FieldByName('SEG_CNPJSEGURADORA').AsString);
              nApol := copy(trim(ibquery1.FieldByName('SEG_NUMAPOLICE').AsString), 1, 20);

              with aver.Add do
              begin
                  nAver := ibquery1.FieldByName('SEG_NUMAVERBACAO').AsString;
              end;
           end;