Pequena melhoria na EspecieDoc do Bancoob [GerarRegistroTransacao240].

[José Nilton Pace]

Olá pessoal, precisei alterar a EspecieDoc no Bancoob [GerarRegistroTransacao240]

Antes:

if EspecieDoc = 'DM' then
   AEspecieTitulo := '02'
else if EspecieDoc = 'DMI' then      // DMI Duplicata Mercantil indicada para protesto
   AEspecieTitulo := '03'             // no campo 107 e 108 tem que sair 03 - GR7 automação em 17.03.2017
else
   AEspecieTitulo := EspecieDoc;

Depois:

      {Pegando especie do titulo}
      case AnsiIndexStr(EspecieDoc, ['CH', 'DM', 'DMI', 'DS', 'DSI', 'DR', 'LC', 'NCC', 'NCE', 'NCI', 'NCR', 'NP', 'NPR', 'TM', 'TS', 'NS', 'RC', 'FAT', 'ND', 'AP', 'ME', 'PC', 'NF', 'DD']) of
         0 : AEspecieTitulo := '01';
         1 : AEspecieTitulo := '02';
         2 : AEspecieTitulo := '03';
         3 : AEspecieTitulo := '04';
         4 : AEspecieTitulo := '05';
         5 : AEspecieTitulo := '06';
         6 : AEspecieTitulo := '07';
         7 : AEspecieTitulo := '08';
         8 : AEspecieTitulo := '09';
         9 : AEspecieTitulo := '10';
         10: AEspecieTitulo := '11';
         11: AEspecieTitulo := '12';
         12: AEspecieTitulo := '13';
         13: AEspecieTitulo := '14';
         14: AEspecieTitulo := '15';
         15: AEspecieTitulo := '16';
         16: AEspecieTitulo := '17';
         17: AEspecieTitulo := '18';
         18: AEspecieTitulo := '19';
         19: AEspecieTitulo := '20';
         20: AEspecieTitulo := '21';
         21: AEspecieTitulo := '22';
         22: AEspecieTitulo := '23';
         23: AEspecieTitulo := '24';
         24: AEspecieTitulo := '25';

         -1: AEspecieTitulo := EspecieDoc;
      end;

 

[Juliomar Marchetti]

anexe a alteração para avaliação

[José Nilton Pace]

Opa, claro. Em anexo.

 

ACBrBancoBancoob.pas

[Nilton Godoy]

Olá tenho um problema com a mudança da espécie nos boletos Bancoob. Só aceita a espécie DM, se informo qualquer outra espécie no TXT de remessa aparece preenchido em branco as colunas 107 e 108 do Semento P.

No PDF aparece normal com a opção que escolho, mas no TXT não.

Alguém pode me ajudar? Obrigado