CPC-FP0511R.p

Rotina utilizada para:

• Verificar o tipo de cobrança, se é normal ou especial, na integração dos títulos.
• Calcular o valor do abatimento na integração dos títulos.
• Liberação de faturas, considerando o intervalo de convenio (inicial e final).
• Altera a condição de cobrança juntamente com os juros e multas.
• Altera as instruções bancarias.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será permitido para esta CPC apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.

Localização

• Dentro do fp0511r.p após o tratamento do tipo de cobrança de cada fatura, para o ponto de chamada "VERIF-TIPO-COB";
• Dentro do fp0511r.p após a criação das tabelas temporárias utilizadas na integração dos titulos, para o ponto de chamada "VALOR-ABATIMENT" e;
• Dentro do fp0511r.p quando da informação dos parametros de seleção, para o ponto de chamada "SEL-CONV".

Ponto de Utilização

• "VERIF-TIPO-COB";
• "VALOR-ABATIMENT" ;
• "SEL-CONV";
• "COND-COBRANCA"
• "INSTRUCAO-BANC" e
• "BUSC-UNID-NEG"

Include das definições das tabelas temporárias

• cpc-fp0511r.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-fp0511r-entrada

def temp-table tmp-cpc-fp0511r-entrada no-undo

field in-evento-programa                        as char format "x(06)"
field nm-ponto-chamada-cpc                 as char format "x(15) "
field cod-empresa                                   like paramecp.ep-codigo
field cd-contratante                                 like fatura.cd-contratante
field nr-fatura                                           like fatura.nr-fatura
field dt-vencimento                                 like fatura.dt-vencimento
field r-fatura                                            as rowid
field cd-convenio-ini                               like propost.cd-convenio
field cd-convenio-fim                              like propost.cd-convenio
field cd-unidade-negocio                        like unidnegocfp.cd-unidade-negocio.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-fp0511r.p.
• "VERIFICA", "CALCULA"; "SELEÇÃO" e "GERAÇÃO"
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa fp0511r.p:
• "VERIF-TIPO-COB"; "VALOR-ABATIMENT" ; "SEL-CONV" ; "COND-COBRANCA" ; "INSTRUCAO-BANC" e "BUSC-UNID-NEG".
• cod-empresa – Código da Empresa Paramentrizada no Cadastros Geriasi.
• cd-contratante – Código do Contratante da Fatura.
• nr-fatura – Número da fatura.
• dt-vencimento – Data de vencimento da Fatura.
• r-fatura – rowid da Fatura.
• cd-convenio-ini – Código do convênio inicial.
• cd-convenio-fim – Código do convênio final.
• cd-unidade-negocio – Código da Unidade de Negócio.

Tabela de saída tmp-cpc-fp0511r –saida

def temp-table tmp-cpc-fp0511r-saida no-undo

field in-tipo-cob                             as char format "x(08)"
field cod_portador                         as char format "x(5)"
field cod_cart_bcia                       as char format "x(3)"
field cod_banco                             as char format "x(8)"
field cod_agenc_bcia                    as char format "x(10)"
field cod_digito_agenc_bcia         as char format "x(2)"
field cod_cta_corren_bco             as char format "x(20)"
field cod_digito_cta_corren          as char format "x(2)"
field lg-undo-retry                         as log
field ds-mensagem                       as char
field vl-abatimento                        as dec format ">>>>,>>>,>>9.99"
field dt-abatimento                        as date format "99/99/9999"
field lg-rest-conv                           as logical
field cd-convenio-ini                     like propost.cd-convenio
field cd-convenio-fim                    like propost.cd-convenio
field cd-condicao-cobranca          as char
field pc-juros-dia                           as dec
field pc-multa-dia                           as dec
field qt-dias-carencia-juros            as int
field qt-dias-carencia-multa           as int
field cd-instr-bcia1                          as char
field cd-instr-bcia2                          as char.

Definição campo a campo da tabela de saída

• in-tipo-cob – Indicador do tipo de cobrança.
• cod_portador – Código do Portador.
• cod_cart_bcia – Código da carteira bancaria
• cod_banco – Código do banco
• cod_agenc_bcia – Código da Agencia Bancaria
• cod_digito_agenc_bcia – Dígito da Agencia Bancaria
• cod_cta_corren_bco – Código da Conta Corrente
• cod_digito_cta-corren – Digito da Conta Corrente
• lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros acontecerem e NÃO se o processo foi concluído por completo.
• ds-mensagem – Descrição dos erros ocorridos na dentro da CPC.
• vl-abatimento – Valor do abatimento.
• dt-abatimento – Data limite do abatimento.
• lg-rest-conv – Variável que controla se o movimento deverá ou não ser desconsiderado no processo de seleção de movimentos.
• cd-convenio-ini – Código do convênio inicial.
• cd-convenio-fim – Código do convênio final.
• cd-condicao-cobranca – Condição de cobrança parametrizada no E.M.S
• pc-juros-dia – Percentual de Juros informada na condição de cobrança
• pc-multa-dia - Percentual de Multa informada na condição de cobrança
• qt-dias-carencia-juros – Qt. de dias de carência de Juros informada na condição de cobrança
• qt-dias-carencia-multa – Qt. de dias de carência de Multa informada na condição de cobrança
• cd-instr-bcia1 – Codigo da instrução bancária 1
• cd-instr-bcia2 – Codigo da instrução bancária 2.