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,antes de gravar os módulos opcionais do beneficiário.

Ponto de Utilização

• "TRATA-PRO-PLA"

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 – Os valores desse campo podem ser: "INCLUI".
• Nm-ponto-chamada - Este campo deve ser: "TRATA-PRO-PLA".
• 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).
• Dt-inicio – Data de inicio do módulo que será gravado.

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.