CPC-VP0113C_P

• Rotina chamada na opção elimina do programa de manutenção de beneficiários.
• Rotina que altera o Percentual de Desconto da Proposta de acordo com a quantidade de beneficiários ativos 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 programa vp0113c.p, após eliminar o beneficiário e suas tabelas associadas.

...

__RefHeading__87573_1756225838__RefHeading__87573_1756225838Ponto de Utilização

"FINAL-ELIMINA"

Âncora__RefHeading__20913_2053127524__RefHeading__20913_2053127524 Âncora__RefHeading__7068_486694287__RefHeading__7068_486694287 Âncora__RefHeading__2279_213273755__RefHeading__2279_213273755 Âncora__RefHeading__11677_644533341__RefHeading__11677_644533341 Âncora__RefHeading__87575_1756225838__RefHeading__87575_1756225838Include das definições das tabelas temporárias

• cpc-vp0113c.i

...

__RefHeading__7070_486694287__RefHeading__7070_486694287 Âncora__RefHeading__2281_213273755__RefHeading__2281_213273755 Âncora__RefHeading__11679_644533341__RefHeading__11679_644533341 Âncora__RefHeading__87577_1756225838__RefHeading__87577_1756225838Tabelas de entrada e saída Âncora__RefHeading__20917_2053127524__RefHeading__20917_2053127524 Âncora__RefHeading__7072_486694287__RefHeading__7072_486694287 Âncora__RefHeading__2283_213273755__RefHeading__2283_213273755 Âncora__RefHeading__11681_644533341__RefHeading__11681_644533341 Âncora__RefHeading__87579_1756225838__RefHeading__87579_1756225838

Tabela de entrada tmp-cpc-vp0113c-entrada

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

field in-evento-programa

...

                       as char format "x(06)"
field lg-mensagem-na-tela                     as log
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 nm-usuario

...

                                     like usuario.nm-usuario

...

...

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc-vp0113c, que deve ser "ELI".
    • 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 foi eliminado.
    • nr-proposta-tit – número da proposta do beneficiário que foi eliminado.
    • cd-usuario-tit – código do beneficiário que foi eliminado.
    • nm-usuario – Nome do usuário que foi eliminado.

...

...

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

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

field lg-tem-mensagem

...

                 as logical
field ds-mensagem-retorno

...

           as char format "x(75)".

...

...

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.

...