CPC-VP0111B2.P

• Rotina chamada na inclusão de faixa etária especial por convênio.
• 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__10592_486694287 Âncora__RefHeading__5803_213273755__RefHeading__5803_213273755 Âncora__RefHeading__15201_644533341__RefHeading__15201_644533341 Âncora__RefHeading__91099_1756225838__RefHeading__91099_1756225838Localização

• Dentro do programa vp0111b2.p, após confirmar a inclusão da faixa etária especial por convênio.

...

Âncora__RefHeading__24439_2053127524__RefHeading__24439_2053127524 Âncora__RefHeading__10594_486694287__RefHeading__10594_486694287 Âncora__RefHeading__5805_213273755__RefHeading__5805_213273755 Âncora__RefHeading__15203_644533341__RefHeading__15203_644533341 Âncora__RefHeading__91101_1756225838__RefHeading__91101_1756225838Ponto de Utilização

"FX-CONVENIO"

...

Âncora__RefHeading__10596_486694287__RefHeading__10596_486694287 Âncora__RefHeading__5807_213273755__RefHeading__5807_213273755 Âncora__RefHeading__15205_644533341__RefHeading__15205_644533341 Âncora__RefHeading__91103_1756225838__RefHeading__91103_1756225838Include das definições das tabelas temporárias

• cpc-vp0111b2.i

...

__RefHeading__5809_213273755 Âncora__RefHeading__15207_644533341__RefHeading__15207_644533341 Âncora__RefHeading__91105_1756225838__RefHeading__91105_1756225838Tabelas de entrada e saída Âncora__RefHeading__24445_2053127524__RefHeading__24445_2053127524 Âncora__RefHeading__10600_486694287__RefHeading__10600_486694287 Âncora__RefHeading__5811_213273755__RefHeading__5811_213273755 Âncora__RefHeading__15209_644533341__RefHeading__15209_644533341 Âncora__RefHeading__91107_1756225838__RefHeading__91107_1756225838

Tabela de entrada tmp-cpc-vp0111b2-entrada

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

field cd-convenio                           as int
field cd-modalidade                       as int
field cd-plano                                 as int
field cd-tipo-plano

...

                         as int
field nm-ponto-chamada-cpc         as char format "x(15)"

...

...

Definição campo a campo da tabela de entrada

...

• • • • cd-convenio – Código do convênio da proposta.
      • cd-modalidade – Código da modalidade da proposta.
      • cd-plano – Código do plano da proposta.
      • cd-tipo-plano – Código do tipo de plano da proposta.
      • nm-ponto-chamada-cpc – Nome do ponto de chamada, que deve ser "FX-CONVENIO".

...

...

...

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

def temp-table tmp-cpc-vp0111b2-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 – Variável que controla os erros dentro da CPC. Deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
      • ds-mensagem-relatorio – Deve conter mensagens de erro caso ocorram.

...