cpc-vp0111b.p1

Rotina utilizada para estabelecer o valor default a ser carregado em campos da tela de inclusão de propostas.
Rotina utilizada para tratar estabelecimento da proposta.
Rotina utilizada para processamento ao final da inclusão da proposta.
Rotina utilizada para, na inclusão de uma nova proposta, conforme a cidade informada no cadastro do contratante bloquear o cadastro da proposta caso a empresa/estabelecimento informado não sejam a empresa/estabelecimento parametrizado para aquela cidade.
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 vp0111b.p após o ser informado o tipo de plano.
Dentro do programa vp0111b.p após o ser informado o estabelecimento.
Dentro do programa vp0111b.p ao final da inclusão da proposta.
Dentro do programa vp0111b.p após a realização das consistências do contratante.
Dentro do programa vp0111b.p, antes da alteração nos campos de percentual de desconto.
Ponto de Utilização
"APOS-LER-TPPLAN"
"APOS-LER-ESTAB"
"FINAL-INCLUI"
"VALIDA-CONTRAT"
"PERFIL-USUARIO"
"CRIA-PROP-DEST"
Include das definições das tabelas temporárias
cpc-vp0111b.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-vp0111b-entrada
def temp-table tmp-cpc-vp0111b-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
fields ep-codigo like propost.ep-codigo
fields cd-estabel like propost.cod-estabel
fields cd-modalidade like propost.cd-modalidade
fields nr-insc-contratante like propost.nr-insc-contratante
fields nr-insc-contratante-origem like propost.nr-insc-contrat-origem
fields cd-plano like propost.cd-plano
fields cd-tipo-plano like propost.cd-tipo-plano
field nr-rowid-propost as rowid
field nr-proposta like propost.nr-proposta.
Definição campo a campo da tabela de entrada
in-evento-programa – Identifica qual procedimento a cpc deve executar no momento que está sendo chamada
nm-ponto-chamada-cpc – Ponto de chamada de cpc que deve ser "APOS-LER-TPPLAN" , "APOS-LER-ESTAB","FINAL-INCLUI", "VALIDA-CONTRAT".
ep-codigo – Código da empresa.
cd-estabel – Código do estabelecimento.
cd-modaliade – Código da Modalidade.
nr-insc-contratante – Núemro de inscrição do contratante.
nr-insc-contratante-origem – Núemro de inscrição do contratante origem.
cd-plano – Código do plano.
cd-tipo-plano – Código do tipo de plano.
Nr-rowid-propost – Rowid da proposta
Nr-proposta – número da proposta.
Tabela de saída tmp-cpc-vp0111b-saida
def temp-table tmp-cpc-vp0111b-saida no-undo
fields lg-erro as logical
fields ds-mensagem-retorno as char format "x(75)"
fields mostra-participacao as char
fields mostra-tipo-validade as char
fields mostra-doc-identif as char
fields lg-prop-regulamentada as log
fields lg-permite-alterar as log.
Definição campo a campo da tabela de saída
lg-erro – Variável que controla os erros que podem ocorrer na CPC.
ds-mensagem-retorno – Variável que recebe a descrição dos erros que ocorreram na CPC.
mostra-participacao – Variável que recebe o valor do campo participação, de acordo com a tabela tipopart.
mostra-tipo-validade – Variável que recebe o valor do campo tipo validade, o valor da variável deve ser extamente, '1-Termo Adesao' ou '2-Grau/Faixa Etaria'.
mostra-doc-identif – Variável que recebe o valor do campo identificação, o valor desta variável deve ser extamente, 'CARTEIRA' ou 'CARTAO'.
lg-prop-regulamentada – Variável que recebe o valor do campo suspensão reajuste troca de faixa, variável de valor lógico.
lg-permite-alterar – Variável que controla se será permitido o usuário alterar ou não determinado campo.