cpc-vp0111c.p1

Rotina chamada na opção inclui do programa de manutenção de beneficiários.
Rotina que permite tratamento específico de carências de beneficiários.
Rotina que altera o Percentual de Desconto da Proposta de acordo com a quantidade de beneficiários ativos com situação entre 5 e 7.
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 vp0111c.p, após criar o beneficiário e suas tabelas associadas.(FINAL-INCLUI e GERA-CARENCIA)
OBSERVAÇÂO: Para o ponto de chamada GERA-CARENCIA quando houver erro retornado pela CPC, será enviada as mensagens de erro, porém, assim mesmo, será gravado o beneficiário.
Dentro do programa vp0111c.p, após digitar a data de nascimento e calcular a idade do beneficiário.(DT-NASCIMENTO)
Dentro do programa vp0111c.p, antes de gravar os módulos opcionais dos beneficiários.(TRATA-PRO-PLA)
Dentro do programa vp0111c.p, após incluir o Grau de Parentesco do beneficiário.(INCLUI-GRAU)
Dentro do programa vp0111c.p, quando da solicitação da forma do Segmento Assistencial.(GERA-SEG-ASSIST)
Ponto de Utilização
"FINAL-INCLUI"
"GERA-CARENCIA"
"DT-NASCIMENTO"
"TRATA-PRO-PLA"
"INCLUI-GRAU"
"GERA-SEG-ASSIST"
"COBRA-PARTIC"
Include das definições das tabelas temporárias
cpc-vp0111c.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-vp0111c-entrada
def temp-table tmp-cpc-vp0111c-entrada no-undo
field cd-modalidade like usuario.cd-modalidade
field nr-proposta like usuario.nr-proposta
field cd-usuario like usuario.cd-usuario
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada as char format "x(15)"
field nr-idade as int format "999"
field r-pro-pla as rowid
field dt-inicio like usumodu.dt-inicio
field in-est-civil like usuario.in-est-civil
field cd-grau-parentesco like usuario.cd-grau-parentesco
field cd-plano like propost.cd-plano
field cd-tipo-plano like propost.cd-tipo-plano
field nm-usuario like usuario.nm-usuario
field rw-propost as rowid
field rw-usuario as rowid
field ct-repeticao as int
field cd-titular like usuario.cd-titular.
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a cpc-vp0111c, que deve ser "INC".
nm-ponto-chamada – Nome do Ponto de Utilização, que deve ser "FINAL-INCLUI".
cd-modalidade – Código da modalidade do beneficiário que foi incluído.
nr-proposta – Número da proposta do beneficiário que foi incluído.
cd-usuario – Código do beneficiário que está foi incluído.
nr-idade – Idade do beneficiário que foi incluído.
r-pro-pla – Recid da tabela pro-pla (Módulos da proposta). Não informado neste ponto.
Dt-inicio – Data de inicio do módulo que será gravado. Não informado neste ponto.
In-estado-civil – estado civil do beneficiário
Cd-grau-parentesco – grau de parentesco do beneficiário
Cd-plano – código que identifica o plano do beneficiário
Cd-tipo-plano – código que identifica o tipo de plano do beneficiário
Nm-usuario – nome do beneficiário
rw-propost – Código de identificação interna do endereço do registro da proposta do beneficiário.
rw-usuario – Código de identificação interna do endereço do registro do beneficiário.
Ct-repeticao – Controle de repetição do registro.
Cd-titular – código do titular da proposta.
Tabela de saída tmp-cpc-vp0111c-saida
def temp-table tmp-cpc-vp0111c-saida no-undo
field lg-undo-retry as logical
field ds-mensagem-relatorio as char format "x(75)"
field lg-continua as log initial yes
field nm-usuario like usuario.nm-usuario
field cd-cpf like usuario.cd-cpf
field nr-identidade like usuario.nr-identidade
field dt-emissao-doc like usuario.dt-emissao-doc
field ds-orgao-emissor-ident like usuario.ds-orgao-emissor-ident
field ds-uf-emissor like usuario.uf-emissor-doc
field nm-pais like usuario.nm-pais
field ds-nacionalidade like usuario.ds-nacionalidade
field dt-nascimento like usuario.dt-nascimento
field cd-grau-parentesco like usuario.cd-grau-parentesco
field nr-idade-benef as int format "999"
field lg-sexo like usuario.lg-sexo
field in-est-civil like usuario.in-est-civil
field nm-mae like usuario.nm-mae
field en-rua like usuario.en-rua
field en-bairro like usuario.en-bairro
field cd-cidade like usuario.cd-cidade
field en-cep like usuario.en-cep
field en-uf like usuario.en-uf
field nm-email like usuario.nm-email
field nr-telefone1 like usuario.nr-telefone1
field lg-atribui-fator as log
field lg-fator as log.
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.
lg-continua – Indica se deve continuar com a inclusão do beneficiário.
Nm-usuario – Nome do beneficiário
Cd-cpf – Indica o CPF do beneficiário
nr-identidade – Indica o número do documento de identidade do beneficiário
dt-emissao-doc – Indica a data em que o documento de identidade do beneficiário foi emitido
ds-orgao-emissor-ident – Indica o órgão emissor da identidade do beneficiário
ds-uf-emissor – Indica a Unidade Federativa emissora do documento de identidade do beneficiário
nm-pais – indica o pais de moradia do beneficiário
ds-nacionalidade – indica a nacionalidade do beneficiário
dt-nascimento – indica a data de nascimento do beneficiário
cd-grau-parentesco – indica o grau de parentesco do beneficiário em relação ao titular de seu plano
nr-idade-benef – Indica a idade em anos do beneficiário
lg-sexo – Indica o sexo do beneficiário
in-est-civil – indica o estado civil do beneficiário
nm-mae – Indica o nome da mãe do beneficiário
en-rua – Indica o nome da rua do beneficiário
en-bairro – Indica o nome do bairro do beneficiário
cd-cidade – Indica o código correspondente à cidade do beneficiário
en-cep – Indica o CEP do endereço do beneficiário
en-uf – Indica a Unidade Federativa do endereço do beneficiário
nm-email – Indica o email do beneficiário
nr-telefone1 – Indica o número do telefone do beneficiário
lg-atribui-fator – Retorna se será atribuído valor ao campo de fator.
lg-fator – Retorna o valor do campo fator.