Modificação Na Unit Acbrbancosicredi

[guilhermeservice]

Adicionei na linha 527 o seguinte linha:

Logo abaixo de :

ValorOutrosCreditos  := StrToFloatDef(Copy(Linha,280,13),0)/100;

 

 

PercentualMulta      := StrToFloatDef(Copy(Linha,281,13),0)/100;

 

 

Acima de de:

if StrToIntDef(Copy(Linha,329,8),0) <> 0 then

        DataCredito:= StringToDateTimeDef( Copy(Linha,335,2)+'/'+

                                          Copy(Linha,333,2)+'/'+

                                          Copy(Linha,329,4),0, 'DD/MM/YYYY' );

 

Obrigado desde já!

[Juliana Tamizou]

Boa tarde.

 

Qual foi o motivo da alteração? Qual função foi alterada?

 

Favor anexar o arquivo pas alterado para análise.

 

Att.

[guilhermeservice]

É que nao estava sendo repassado o valor da multa quando era feito a leitura do arquivo de retorno. 

ACBrBancoSicredi.pas

[Juliana Tamizou]

Bom dia.

 

Alterações disponíveis no svn.

 

Att.

[Moroni]

Boa tarde!

 

acredito que a alteração realizada pelo 'guilhermeservice' tem uma incoerência, pois 'ValorOutrosCreditos' está na posição 280 com 13 caracteres e 'PercentualMulta'  está na posição 281 com 13 caracteres. O percentual de multa eu não localizei no layout do Sicredi.

 

 

Att.,

Rafael Moroni

[Juliana Tamizou]

Bom dia.

 

De acordo com o manual disponível no svn estas posições são referentes a multa, verifique se o manual que está utilizando é anterior a este.

 

 

Att.

[Moroni]

Bom dia!

 

Juliana, talvez eu me expressei mal, na verdade o que eu me refiro são as posições em que está sendo lido o arquivo recebido do banco:

 

ValorOutrosCreditos  := StrToFloatDef(Copy(Linha,280,13),0)/100;    //Multa estava faltando
PercentualMulta      := StrToFloatDef(Copy(Linha,281,13),0)/100;

 

Posições 280 e 281 cada uma com 13 caracteres, tem algo que não está correto.

Att.,

Rafael Moroni