Retorno - Leitura do campo SeuNumero Caixa 240 SIGCB

[GustavoKato]

Bom dia, identifiquei um problema na leitura do layout da Caixa SIGCB 240.

A leitura do campo "SeuNumero" está pegando a mesma informação do campo "NumeroDocumento"

         if Copy(Linha,14,1)= 'T' then
          begin
            SeuNumero                   := Trim(copy(Linha,59,11));
            NumeroDocumento             := copy(Linha,59,11);

segundo o manual:

Número Documento (Seu Nº)  | Número do Documento de Cobrança |    59 | 69  | 11

Uso da Empresa                     | Identificação do Título na Empresa     | 106 | 130 | 25

 

Trecho alterado:

         if Copy(Linha,14,1)= 'T' then
          begin
            SeuNumero                   := Trim(copy(Linha,106,25));
            NumeroDocumento             := copy(Linha,59,11);

 

[Juliana Tamizou]

Boa noite.

Favor anexar a unit alterada.

Att.

[GustavoKato]

Segue Unit

ACBrBancoCaixa.pas