CPC-CG0110U.p

• Rotina utilizada para alterar o Percentual de Desconto da Proposta de acordo com a quantidade de beneficiários com situação entre 5 e 7.
• 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 cg0110u.p no final da exclusão do usuário.

Ponto de Utilização

• "FINAL-EXCLUI"

Include das definições das tabelas temporárias

• ocpc-cg0110u.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-cg0110u-entrada

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

field in-evento-programa                      as char format "x(06)"
field nm-ponto-chamada-cpc               as char format "x(15) "
field in-est-civil                                     like usuario.in-est-civil
field cd-grau-parentesco                      like usuario.cd-grau-parentesco
field cd-modalidade                             like propost.cd-modalidade
field nr-proposta                                   like propost.nr-proposta
field cd-usuario                                    like usuario.cd-usuario
field nm-usuario                                   like usuario.nm-usuario.

Definição campo a campo da tabela de entrada

• • oin-evento-programa – Evento do programa que chama a cpc-cg0110u. Os valores desse campo podem ser:
  • "EXCLUI" e "INCLUI".
  • onm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa cg0110u.p:
  • "FINAL-EXCLUI"
  • oin-est-civil – Variavel que possui o Estado Civil do beneficiário.
  • ocd-grau-parentesco – Variável que possui o Grau de Parentesco do Beneficiario.
  • ocd-modalidade – Variavel que possui a Modalidade da Proposta.
  • onr-proposta – Variavel que possui o Numero da Proposta.
  • ocd-usuario – Variavel que possui o Codigo do Beneficiario em uma Proposta.
  • onm-usuario – Variavel que possui o Nome do Beneficiario.

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

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

field lg-undo-retry                                 as logical
field ds-mensagem                              as char
field lg-continua                                   as logical initial yes.

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

• • olg-undo-retry – Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
  • ods-mensagem – Deve conter mensagens de erro ou qualquer outro tipo de mensagem. Utilizado em conjunto com a entrada lg-mensagem-na-tela. Se lg-mensagem-na-tela for Não então esse campo deve ser preenchido.
  • olg-continua – Determina se o programa chamador da cpc vai seguir seu processo ou não.