CPC-MC0111A6.P

• Rotina chamada na transferência de beneficiários de seguro assistencial.
• 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 mc0111a6.p, após transferir o beneficiário para a proposta de seguro assistencial.

Ponto de Utilização

• "FINAL-TRANSF"

Include das definições das tabelas temporárias

• cpc-mc0111a6.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-mc0111a6-entrada

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

field in-evento-programa                       as char format "x(06)"
field nm-ponto-chamada                       as char format "x(15)"
field cd-modalidade-origem                   like usuario.cd-modalidade
field nr-proposta-origem                        like usuario.nr-proposta
field cd-usuario-origem                         like usuario.cd-usuario
field cd-modalidade-destino                   like usuario.cd-modalidade
field nr-proposta-destino                       like usuario.nr-proposta
field cd-usuario-destino                         like usuario.cd-usuario
field r-pro-pla                                       as rowid
field dt-inicio                                       like usumodu.dt-inicio.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-mc0111a6. Os valores desse campo podem ser:
• "TRF".
• cd-modalidade-origem – código da modalidade origem do beneficiário.
• nr-proposta-origem – número da proposta origem do beneficiário.
• cd-usuario-origem – código do beneficiário na proposta de origem.
• cd-modalidade-destino – código da modalidade destino do beneficiário.
• nr-proposta-destino – número da proposta destino do beneficiário.
• cd-usuario-destino – código do beneficiário na proposta destino.
• r-pro-pla – Recid da tabela pro-pla (Módulos da proposta). (Neste ponto, este campo não é informado)
• Dt-inicio – Data de inicio do módulo que será gravado. (Neste ponto, este campo não é informado)

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

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

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

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

• lg-undo-retry – 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-relatorio – Deve conter mensagens de erro caso ocorram.