Ajuste s1200 campo indGuia

[Rodrigo - Digibyte]

Conforme layout foi acrescentado o campo acima, favor conferir a implementação.

pcesGerador.paspcesCommon.pas

[Rodrigo - Digibyte]

pcesGerador.pas

Cometi um erro pois a tag pode aparecer ou não, agora creio estar correto, favor avaliar

 

Alterado de

  if  (VersaoDF = veS01_00_00) then
    Gerador.wCampo(tcStr, '', 'indGuia', 1, 1, 1, pEvt.indGuia);

Para

  if  (VersaoDF = veS01_00_00) then
    Gerador.wCampo(tcStr, '', 'indGuia', 1, 1, 0, pEvt.indGuia);

 

[Juliana Tamizou]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

[EMBarbosa]

Em 13/08/2021 at 16:42, Digibyte disse:

pcesGerador.pas 73 kB · 0 downloads

Cometi um erro pois a tag pode aparecer ou não, agora creio estar correto, favor avaliar

 

Alterado de

  if  (VersaoDF = veS01_00_00) then
    Gerador.wCampo(tcStr, '', 'indGuia', 1, 1, 1, pEvt.indGuia);

Para

  if  (VersaoDF = veS01_00_00) then
    Gerador.wCampo(tcStr, '', 'indGuia', 1, 1, 0, pEvt.indGuia);

 

Muito obrigado pela contribuição.
Fiz a implementação baseada nela.
Subi as alterações para o SVN na Revisão  22806.
Pelo que vi está tudo certo.
Queira por favor atualizar, testar e reportar qualquer problema.

Mais uma vez obrigado.