CPC-VP0112C.P0

• 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.

...

__RefHeading__87517_1756225838Localização

• Dentro do programa vp0112c.p, após alterar o Grau de Parentesco do beneficiário.

...

__RefHeading__20857_2053127524__RefHeading__20857_2053127524 Âncora__RefHeading__7012_486694287__RefHeading__7012_486694287 Âncora__RefHeading__2223_213273755__RefHeading__2223_213273755 Âncora__RefHeading__11621_644533341__RefHeading__11621_644533341 Âncora__RefHeading__87519_1756225838__RefHeading__87519_1756225838Ponto de Utilização

"ALTERA-GRAU"

Âncora__RefHeading__20859_2053127524__RefHeading__20859_2053127524 Âncora__RefHeading__7014_486694287__RefHeading__7014_486694287 Âncora__RefHeading__2225_213273755__RefHeading__2225_213273755 Âncora__RefHeading__11623_644533341__RefHeading__11623_644533341 Âncora__RefHeading__87521_1756225838__RefHeading__87521_1756225838Include das definições das tabelas temporárias

• cpc-vp0112c.i

...

__RefHeading__7016_486694287 Âncora__RefHeading__2227_213273755__RefHeading__2227_213273755 Âncora__RefHeading__11625_644533341__RefHeading__11625_644533341 Âncora__RefHeading__87523_1756225838__RefHeading__87523_1756225838Tabelas de entrada e saída
Âncora__RefHeading__20863_2053127524__RefHeading__20863_2053127524 Âncora__RefHeading__7018_486694287__RefHeading__7018_486694287 Âncora__RefHeading__2229_213273755__RefHeading__2229_213273755 Âncora__RefHeading__11627_644533341__RefHeading__11627_644533341 Âncora__RefHeading__87525_1756225838__RefHeading__87525_1756225838

Tabela de entrada tmp-cpc-vp0112c-entrada

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

field in-evento-programa

...

                                     as char format "x(10)"
field nm-ponto-chamada

...

                                     as char format "x(15)"
field lg-mensagem-na-tela                                   as logical
field cd-modalidade-tit

...

                                         like usuario.cd-modalidade
field nr-proposta-tit

...

                                               like usuario.nr-proposta
field cd-usuario-tit                                                 like usuario.cd-usuario
field nr-idade                                                         as int format "999"
field r-pro-pla                                                         as rowid
field dt-inicio

...

                                                         like usumodu.dt-inicio
field in-est-civil

...

                                                     like usuario.in-est-civil
field cd-grau-parentesco                                       like usuario.cd-grau-parentesco
field cd-plano                                                         like pla-sau.cd-plano
field cd-tipo-plano

...

                                                 like ti-pl-sa.cd-tipo-plano

...

...

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc-vp0112c, que deve ser "ALT".
    • nm-ponto-chamada – Nome do Ponto de Utilização, que deve ser "ALTERA-GRAU".
    • 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 esta sendo alterado.
    • nr-proposta-tit – número da proposta do beneficiário que esta sendo alterado.
    • cd-usuario-tit – código do beneficiário que esta sendo alterado.
    • nr-idade – Idade do beneficiário que está sendo alterado.
    • r-pro-pla – Recid da tabela pro-pla (Módulos da proposta). Não informado neste ponto.
    • Dt-inicio – Data de inicio do módulo que será gravado. Não informado neste ponto.
    • In-est-civil – Estado civil do beneficiário que será incluído.
    • Cd-plano – Código do plano do beneficiário que será incluído.
    • Cd-tipo-plano – Código do tipo de plano do beneficiário que será incluído.

...

...

...

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

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

field lg-tem-mensagem                   as logical
field ds-mensagem-retorno

...

           as char format "x(75)"
field lg-continua

...

                              as logical

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

• • • lg-tem-mensagem - Variável que controla se existe mensagem para informação sobre beneficiário titular a ser alterado.
    • ds-mensagem-retorno – Deve conter mensagem referente ao beneficiário titular a ser alterado.
    • lg-continua – Indica se deve continuar com alteração do beneficiário.

Âncora__RefHeading__20871_2053127524__RefHeading__20871_2053127524 Âncora__RefHeading__7026_486694287__RefHeading__7026_486694287 Âncora__RefHeading__195_1561139123__RefHeading__195_1561139123 Âncora__RefHeading__2237_213273755__RefHeading__2237_213273755 Âncora__RefHeading__11635_644533341__RefHeading__11635_644533341 Âncora__RefHeading__87533_1756225838__RefHeading__87533_1756225838