CPC-MC0112A.P

• Rotina chamada na opção modifica do programa de manutenção de beneficiários.
• 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 mc0112a.p, após alterar o beneficiário e suas tabelas associadas.

Ponto de Utilização

• "FINAL-MODIFICA"
• "COBRA-PARTIC"
• "GERA-CARENCIA"

Include das definições das tabelas temporárias

• cpc-mc0112a.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-mc0112a-entrada

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

fields in-evento-programa               as char format "x(10)"
fields nm-ponto-chamada               as char format "x(15)"
fields lg-mensagem-na-tela             as logical
fields cd-modalidade-tit                  like usuario.cd-modalidade
fields nr-proposta-tit                       like usuario.nr-proposta
fields cd-usuario-tit                        like usuario.cd-usuario
fields nr-idade                               as int format "999"
fields r-pro-pla                               as rowid
fields dt-inicio                               like usumodu.dt-inicio
fields in-est-civil                            like usuario.in-est-civil
fields cd-grau-parentesco               like usuario.cd-grau-parentesco
fields rw-usuario                            as rowid
fields rw-propost                            as rowid.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-mc0112a. O valor desse campo deve ser "MOD".
• nm-ponto-chamada – Nome do ponto de chamada, que deve ser "FINAL-MODIFICA".
• lg-mensagem-na-tela – Indica se o programa deverá mostrar mensagens na tela ou executar em batch.
• cd-modalidade-tit – Código da modalidade do beneficiário que está sendo alterado.
• nr-proposta-tit – Número da proposta do beneficiário que está sendo alterado.
• cd-usuario-tit – Código do beneficiário que está sendo alterado.
• nr-idade – Idade do beneficiário que vai ser incluído.
• r-pro-pla – Recid da tabela de módulos da proposta. (Campo sem conteúdo neste ponto).
• Dt-inicio – Data de inicio do módulo opcional. (Campo sem conteúdo neste ponto).
• In-est-civil – Estado civil.
• Cd-grau-parentesco – indicação do grau de parentesco.
• Rw-Usuario – Identificador do beneficiário
• Rw-propost – Identificador da proposta

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

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

field lg-tem-mensagem               as logical
field ds-mensagem-retorno         as char format "x(75)"
field lg-continua                        as logical
fields lg-undo-retry                    as log
field lg-atribui-fator                   as log
field lg-fator                             as log.

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

• lg-tem-mensagem – 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.
• ds-mensagem-retorno – Deve conter mensagens de erro caso ocorram.
• lg-continua – Indica se deve continuar com a alteração do beneficiário.
• LG-undo-retry – indica se deve continuar ou desfazer e voltar.
• LG-atribui-fator – Retorna se será atribuído valor ao campo de fator.
• LG-fator – Retorna o valor do campo fator.