CPC-FP0112F.p

• Rotina para permitir que seja inserida quantidade de parcelas.
• 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 programa fp0112f.p, antes de ser alterado os dados, é executado o evento FINAL-MODIFICA, onde um novo frame abre e é possível adicionar a quantidade de parcelas, desde que esta seja maior do que zero e menor que os meses de faturamento.

Pontos de Utilização

• "FINAL-MODIFICA";

Include das definições das tabelas temporárias

• cpc-fp0112f.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-fp0112f-entrada

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

field in-evento-programa                           as char format "x(10)"
field nm-ponto-chamada-cpc                    as char format "x(15)"
field cd-modalidade                                   like perftter.cd-modalidade
field nr-ter-adesao                                     like perftter.nr-ter-adesao
field aa-mm-fim-validade                         like perftter.aa-mm-fim-validade
field qt-parcelas                                        like perftter.u-int-1
field r-proposta                                        as rowid
field r-perftter                                           as rowid.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-fp0112f.p. O valor desse campo pode ser:
• "MODIFICA".
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa fp0112f.p:
• "FINAL-MODIFICA"
• cd-modalidade – Código da Modalidade;
• nr-ter-adesao – Numero do termo de adesão;
• aa-mm-fim-validade – Ano e mês do calculo periódico;
• qt-parcelas – Periodicidade de faturamente em meses (quantidade de meses);
• r-proposta – ROWID do registro de movimentação da tabela PROPOST.
• r-perftter – ROWID do registro de movimentação da tabela PERFTTER.

Tabela de saída tmp-cpc-fp0112f-saida

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

field lg-erro                                          as log
field lg-perm-inc                                  as log
field lg-continua                                   as log
field ds-mensagem                             as char format "x(75)".

Definição campo a campo da tabela de saída tmp-cpc-fp0112f-saida

• lg-erro – 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;
• lg-perm-inc – Parâmetro que permite indicar se pemite incluir tabela na PERFTTER, mesmo que a proposta já encomtre-se na situação '5' (já faturada).
• lg-continua -Variável que controla se o valor da quantidade de parcelas digitado for valido e dar enter, retorna SIM. E se for dado esc no frame de qtd de parcelas, ele retorna NÃO;
• ds-mensagem – Deve conter mensagem de erro ou qualquer outro tipo de mensagem.