CPC-MC0111B.P

• Rotina chamada na opção inclusão do programa de manutenção de beneficiários.
• Rotina chamada para tratamento específico de demitidos e aposentados.
• 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__7298_486694287__RefHeading__7298_486694287 Âncora__RefHeading__2509_213273755__RefHeading__2509_213273755 Âncora__RefHeading__11907_644533341__RefHeading__11907_644533341 Âncora__RefHeading__87805_1756225838__RefHeading__87805_1756225838Localização

• Dentro do programa mc0111b.p, após incluir o beneficiário.

...

Ponto de Utilização Utilização 

• "DEMAP"

...

Âncora__RefHeading__7302_486694287__RefHeading__7302_486694287 Âncora__RefHeading__2513_213273755__RefHeading__2513_213273755 Âncora__RefHeading__11911_644533341__RefHeading__11911_644533341 Âncora__RefHeading__87809_1756225838__RefHeading__87809_1756225838Include das definições das tabelas temporárias

• cpc-mc0111b.i

...

Tabelas de entrada e saída

...

Tabela de entrada tmp-cpc-mc0111b-entrada

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

field nm-ponto-chamada                 as char format "x(15)"
field in-evento-programa                 as char format "x(10)"
field nr-ter-adesao

...

                         like ter-ade.nr-ter-adesao
field cd-modalidade

...

                       like ter-ade.cd-modalidade.

...

...

Definição campo a campo da tabela de entrada

• nm-ponto-chamada – Nome do ponto de chamada que controla o tratamento específico.
• in-evento-programa – Evento do programa que chama a cpc-mc0111a, que deve ser "ALT".
• Nr-ter-adesao – Código do termo de adesão do beneficiário
• Cd-modalidade – Código da modalidade do beneficiário

...

...

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

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

field lg-undo-retry                         as log
field ds-mensagem                       as char format "x(75)".

...

...

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

• Lg-undo-retry – Controla a ocorrência de erros na execução da cpc
• Ds-mensagem – Controla a mensagem de retorno da cpc quando ocorrem erros.

...