CPC-MC0113A.P

• Rotina chamada na opção elimina 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.

Âncora__RefHeading__21107_2053127524__RefHeading__21107_2053127524 Âncora__RefHeading__7262_486694287__RefHeading__7262_486694287 Âncora__RefHeading__2473_213273755__RefHeading__2473_213273755 Âncora__RefHeading__11871_644533341__RefHeading__11871_644533341 Âncora__RefHeading__87769_1756225838__RefHeading__87769_1756225838 

Localização

• Dentro do programa mc0113a.p, antes de eliminar o beneficiário titular.

...

__RefHeading__2475_213273755__RefHeading__2475_213273755 Âncora__RefHeading__11873_644533341__RefHeading__11873_644533341 Âncora__RefHeading__87771_1756225838__RefHeading__87771_1756225838Ponto de Utilização

• "EXCLUI-TIT"

...

__RefHeading__21111_2053127524__RefHeading__21111_2053127524 Âncora__RefHeading__7266_486694287__RefHeading__7266_486694287 Âncora__RefHeading__2477_213273755__RefHeading__2477_213273755 Âncora__RefHeading__11875_644533341__RefHeading__11875_644533341 Âncora__RefHeading__87773_1756225838__RefHeading__87773_1756225838Include das definições das tabelas temporárias

• cpc-mc0113a.i

Tabelas de entrada e saída Âncora__RefHeading__21113_2053127524__RefHeading__21113_2053127524 Âncora__RefHeading__7268_486694287__RefHeading__7268_486694287 Âncora__RefHeading__2479_213273755__RefHeading__2479_213273755 Âncora__RefHeading__11877_644533341__RefHeading__11877_644533341 Âncora__RefHeading__87775_1756225838__RefHeading__87775_1756225838Tabelas de entrada e saída
Âncora__RefHeading__21115_2053127524__RefHeading__21115_2053127524 Âncora__RefHeading__7270_486694287__RefHeading__7270_486694287 Âncora__RefHeading__2481_213273755__RefHeading__2481_213273755 Âncora__RefHeading__11879_644533341__RefHeading__11879_644533341 Âncora__RefHeading__87777_1756225838__RefHeading__87777_1756225838

Tabela de entrada tmp-cpc-mc0113a-entrada

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

field in-evento-programa                 as char format "x(06)"
filed 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.

...

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-mc0113a, que deve ser "ALT".
• 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 titular que esta sendo eliminado.
• nr-proposta-tit – Número da proposta do beneficiário titular que esta sendo eliminado.
• cd-usuario-tit – Código do beneficiário titular que esta sendo eliminado.

...

...

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

def temp-table tmp-cpc-mc0113a-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 existe mensagem para informação sobre beneficiário titular a ser eliminado.
• ds-mensagem-retorno – Deve conter mensagem referente ao beneficiário titular a ser eliminado.

...