CPC-MC0112T.P

• 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 mc0112t.p.

Ponto de Utilização

• "CAMPOS-ESPEC"

Include das definições das tabelas temporárias

• cpc-mc0112t.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-mc0112t-entrada

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

fields nm-ponto-chamada                   as char format "x(15)"
fields in-evento                                 as char format "x(10)"
fields cd-modalidade                         like desplaus.cd-modalidade
fields nr-ter-adesao                           like desplaus.nr-ter-adesao
fields cd-usuario                               like desplaus.cd-usuario
fields lg-espec1                                like desplaus.u-log-1
fields lg-espec2                                like desplaus.u-log-2.

Definição campo a campo da tabela de entrada

• nm-ponto-chamada – Nome do ponto de chamada.
• In-evento – Nome do evento chamado dentro da CPC.
• Cd-modalidade – Código da modalidade de comercialização.
• Nr-ter-adesao – Número do termo de adesão.
• Cd-usuario – Código do beneficiário no plano de saúde.
• LG-espec1 – Campo lógico específico.
• LG-espec2 – Campo lógico específico.

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

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

fields lg-undo-retry                         as logical
fields ds-mensagem                       as char format "x(75)"
fields lg-espec1                             like desplaus.u-log-1
fields lg-espec2                             like desplaus.u-log-2.

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 – Deve conter mensagens de erro caso ocorram.
• LG-espec1 – Campo lógico específico.
• LG-espec2 – Campo lógico específico.