Caixa :: Alteração Para Cobrança Sem Protesto

[Kosvoski]

Boa tarde 

Para homologação do arquivo CNAB240 da Caixa Econômica foi necessário informar o período de Baixa dos títulos quando não protestado, ou seja:
 

Para titulos com instrução de protesto - Estava ok

linha 3 coluna 221 infomar “1” para protestar
linha 3 coluna 222 a 223 informar numero dias para protesto
linha 3 coluna 224 infomar '”2”
linha 3 coluna 225 a 227 informar ZEROS

 

Para titulos sem instrução de protesto - Ajustado

 

linha 3 coluna 221 infomar “3” para protestar
linha 3 coluna 222 a 223 informar ZEROS
linha 3 coluna 224 infomar '”1”
linha 3 coluna 225 a 227 informar numero dias para baixar o titulo.

 

...
IfThen((DataProtesto <> null) and (DataProtesto > Vencimento),

                    padR(IntToStr(DaysBetween(DataProtesto, Vencimento)), 2, '0'), '00') + //222 a 223 - Prazo para protesto (em dias corridos)

               IfThen((DataBaixa <> null) and (DataBaixa > Vencimento), '1', '2') +       ////224 - Código para baixa/devolução: Não baixar/não devolver

               IfThen((DataBaixa <> null) and (DataBaixa > Vencimento),

                    padR(IntToStr(DaysBetween(DataBaixa, Vencimento)), 3, '0'), '000') + //225 a 227 - Prazo para baixa/devolução (em dias corridos)

               '09'                                                       + //228 a 229 - Código da moeda: Real
...