Impressão - Fs-Da(Sugestão)

[Moroni]

Boa noite!

 

Estou testando a geração/impressão de CT-e utilizando FS-DA e nos casos em que existem mais de três(3) linhas de observações no CT-e ocorre que na impressão não está sendo impresso a mensagem que é obrigatória :

'DACTE em Contingência - Impresso em decorrência de problemas técnicos.'

 

Obs.: mesmo sendo CT-e normal, está sendo impresso somente as três primeiras linhas das observações.

 

Com isto temos duas opções :

1) a mais fácil, trocar de posição a mensagem obrigatória, ou seja, colocar esta mensagem na primeira linha.

No QR, na unit ACBrCTeDACTeQRRetrato colocar a seguinte linha :

 

  qrmObs.Lines.Add(StringReplace( FCTe.Compl.xObs, '<BR>', #13#10, [rfReplaceAll,rfIgnoreCase] ) );

 

após o bloco seguinte :

 

  if FCTe.Ide.tpEmis in [teContingencia, teFSDA]
   then begin
    // Incluido por Italo em 20/04/2012
    if not (FCTe.procCTe.cStat in [100, 101, 110])
     then qrmObs.Lines.Add('DACTE em Contingência - Impresso em decorrência de problemas técnicos.');
   end;

  if FCTe.Ide.tpEmis = teDPEC
   then qrmObs.Lines.Add('DACTE em Contingência - DPEC regularmente recebida pela Receita Federal do Brasil');

2) a segunda opção e a mais correta seria verificar se existem mais de três(3) linhas nas observações e realizar a impressão de uma segunda folha.

 

Abraços,

Rafael Moroni
 

[Moroni]

Bom dia!

 

Mais um detalhe em relação a impressão do DACTE no modo FS-DA, isto depois do CT-e já ter sido autorizado pela SEFAZ:

 

- se a empresa por algum motivo tiver que imprimir novamente o DACTE, este está sendo impresso na forma de um CT-e normal, ou seja, sem o segundo código de barras e sem a observação 'DACTE em Contingência - Impresso em decorrência de problemas técnicos';

 

Na minha opinião, não achei nada que dissesse ao contrário no MOC, seria imprimir na forma original do DACTE, ou seja, no modo FS-DA.

 

 

Em função do segundo código de barras fiz a seguinte alteração

    if FCTe.procCTe.cStat in [100, 101, 110]      ---->>>> if FCTe.procCTe.cStat in [101, 110]
     then begin
      qrlVariavel1.Enabled := True;
      qriBarCode2.Enabled  := False;
      if FCTe.procCTe.cStat = 100
       then qrlDescricao.Caption := 'PROTOCOLO DE AUTORIZAÇÃO DE USO';
 

e em função da observação alterei

   if not (FCTe.procCTe.cStat in [100, 101, 110])   ----->>>> if not (FCTe.procCTe.cStat in [101, 110])
     then qrmObs.Lines.Add('DACTE em Contingência - Impresso em decorrência de problemas técnicos.');
   end;
 

Abraços,

Moroni

  

[JLuis]

Bom dia!

 

Mais um detalhe em relação a impressão do DACTE no modo FS-DA, isto depois do CT-e já ter sido autorizado pela SEFAZ:

 

- se a empresa por algum motivo tiver que imprimir novamente o DACTE, este está sendo impresso na forma de um CT-e normal, ou seja, sem o segundo código de barras e sem a observação 'DACTE em Contingência - Impresso em decorrência de problemas técnicos';

 

Na minha opinião, não achei nada que dissesse ao contrário no MOC, seria imprimir na forma original do DACTE, ou seja, no modo FS-DA.

 

 

Em função do segundo código de barras fiz a seguinte alteração

    if FCTe.procCTe.cStat in [100, 101, 110]      ---->>>> if FCTe.procCTe.cStat in [101, 110]

     then begin

      qrlVariavel1.Enabled := True;

      qriBarCode2.Enabled  := False;

      if FCTe.procCTe.cStat = 100

       then qrlDescricao.Caption := 'PROTOCOLO DE AUTORIZAÇÃO DE USO';

 

e em função da observação alterei

   if not (FCTe.procCTe.cStat in [100, 101, 110])   ----->>>> if not (FCTe.procCTe.cStat in [101, 110])

     then qrmObs.Lines.Add('DACTE em Contingência - Impresso em decorrência de problemas técnicos.');

   end;

 

Abraços,

Moroni

 

Boa tarde Moroni,

Verifiquei a mesma situação e gostaria de saber se já chegou a alguma conclusão a respeito do caso...

Na minha opinião, não somente no modo FS-DA mas também no modo EPEC e no modo SVC deveria imprimir na forma original do DACTE.

Por favor se alguém mais tiver conhecimento do caso e puder contribuir...

Editado 25 Setembro, 2013 por sysbase