CPC-MC0210O.P
Produto: | Gestão de Planos de Saúde |
Módulo: | Todos |
Versão: | 12.x.x |
Assuntos: | cpc-mc0210o.p |
Rotina utilizada para:
- Processar atualização da lista de preço ou
- Alteração de dados no momento do reajuste da proposta
- 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
- Para o ponto "ATUALIZA-PROP", dentro do mc0210o.p ao atualizar as listas de preços.
- Para o ponto "ALTERA-DADOS", dentro do mc0210o.p quando da aplicação do reajuste na proposta.
- Para o ponto "MARCA-PROPOSTA", dentro do mc0210o.p quando da aplicação do reajuste na proposta, se o parâmetro "Informa Novo % de Reajuste" estiver marcado e quando não for Simulação.
- Para o ponto "ANTES-DEF-PAR", dentro do mc0210o.p, quando abrir a tela de Parãmetros da função Troca Tabela de Preco/Reajuste da Proposta.
- Para o ponto "APOS-EVE-MOD", dentro do mc0210o.p quando da leitura dos módulos de cobertura.
Ponto de Utilização
- "ATUALIZA-PROP", "ALTERA-DADOS", "MARCA-PROPOSTA", "ANTES-DEF-PAR" e "APOS-EVE-MOD".
Include das definições das tabelas temporárias
- cpc-mc0210o.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-mc0210o-entrada
def temp-table tmp-cpc-mc0210o-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-modalidade like propost.cd-modalidade
field nr-proposta like propost.nr-proposta
field cd-tab-preco-ori like tabpremo.cd-tab-preco
field cd-tab-preco-des like tabpremo.cd-tab-preco
field aa-referencia like notaserv.aa-referencia
field mm-referencia like notaserv.mm-referencia
field pc-reajuste like histabpreco.pc-reajuste
field nr-ter-adesao like usuario.nr-ter-adesão
field lg-cons-contrt-exc-prog as log
field lg-cons-contrt-seg-assist as log
field lg-carga-tab-autom as log
field lg-aplica-perc-contrte-orig as log
field lg-cons-mod-descons-anter as log
field in-aplica-reaj as int
field lg-atual-propo-fat-superior as log
field in-nivel-reaj as int
field lg-informa-reaj-tab as log
field in-mes-vig as int
field in-ano-vig as int
field in-mes-reaj as int
field in-ano-reaj as int
field vl-perc as dec
field ds-num-oficio as char
field h-tmp-mod-cob as handle
field cd-modulo as int.
Definição campo a campo da tabela de entrada
- in-evento-programa – Evento do programa
- nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza
- cd-modalidade – Código da modalidade de comercialização
- nr-proposta – Numero da proposta
- cd-tab-preco-ori – Código da tabela de preço origem da proposta
- cd-tab-preco-des – Código da tabela de preço destino
- aa-referencia – Ano de referencia
- mm-referencia – Mês de referencia
- pc-reajuste – Percentual de reajuste para a tabela de preço
- nr-ter-adesao – Número do termo de adesão do beneficiário
- lg-cons-contrt-seg-assist - Considerar termos que usufruem de seguro assistencial
- lg-carga-tab-autom- Carregar Tabelas Automaticamente
- lg-aplica-perc-contrte-orig - Aplicar mesmo % contratos associados ao contratante origem
- lg-cons-mod-descons-anter - Considera Seleção de Módulos Desconsiderados Anteriormente
- in-aplica-reaj - Troca Tabela de Preco, quando igual a 1
- in-aplica-reaj - Informa Novo % de Reajuste quando igual a 2
- in-aplica-reaj - Aplica reajuste conforme tipo de índice associado ao contrato quando igual a 3
- lg-atual-propo-fat-superior - Atualiza propostas c/fat.superior ao ano/mes de reajuste
- in-nivel-reaj - Nível de Reajuste: 0 para contrato; 1 para grau de parentesco; 2 para beneficiário
- lg-informa-reaj-tab - Informar Dados do Reajuste por Tabela
- in-mes-vig / in-ano-vig - Mês/Ano Vigência
- in-mes-reaj / in-ano-reaj - Mês/Ano Reajuste
- vl-perc - Percentual
- ds-num-oficio - Numero do Oficio
- h-tmp-mod-cob - handle para a tabela temporária "tmp-mod-cob", que armazena os módulos selecionados em tela.
- cd-modulo - Código do módulo de cobertura.
Tabela de saída tmp-cpc-mc0210o–saida
def temp-table tmp-cpc-mc0210o-saida no-undo
field lg-undo-retry as log
field ds-mensagem-retorno as char format "x(75)"
field lg-reajustar as log
field pc-reajuste as dec
field lg-perc-alterado as log
field lg-atualiza-proposta as log
field ds-parametros as char
field lg-fecha-parametros as log init yes
field lg-considera-benef-cj as log
field ds-benef-cj as char
field lg-cons-contrt-exc-prog as log
field lg-cons-contrt-seg-assist as log
field lg-carga-tab-autom as log
field lg-aplica-perc-contrte-orig as log
field lg-cons-mod-descons-anter as log
field in-aplica-reaj as int
field lg-atual-propo-fat-superior as log
field in-nivel-reaj as int
field lg-informa-reaj-tab as log
field in-mes-vig as int
field in-ano-vig as int
field in-mes-reaj as int
field in-ano-reaj as int
field vl-perc as dec
field ds-num-oficio as char
field lg-mensalidade 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
- ds-mensagem-retorno - Retorna a mensagem da cpc
- lg-reajustar – Parâmetro indicador para aplicar ou não reajuste na proposta
- pc-reajuste – Percentual de reajuste a ser aplicado na reajuste na proposta.
- Considerar termos com exclusão programada
- lg-cons-contrt-seg-assist - Considerar termos que usufruem de seguro assistencial
- lg-carga-tab-autom- Carregar Tabelas Automaticamente
- lg-aplica-perc-contrte-orig - Aplicar mesmo % contratos associados ao contratante origem
- lg-cons-mod-descons-anter - Considera Seleção de Módulos Desconsiderados Anteriormente
- in-aplica-reaj - Troca Tabela de Preco, quando igual a 1
- in-aplica-reaj - Informa Novo % de Reajuste quando igual a 2
- in-aplica-reaj - Aplica reajuste conforme tipo de índice associado ao contrato quando igual a 3
- lg-atual-propo-fat-superior - Atualiza propostas c/fat.superior ao ano/mes de reajuste
- in-nivel-reaj - Nível de Reajuste: 0 para contrato; 1 para grau de parentesco; 2 para beneficiário
- lg-informa-reaj-tab - Informar Dados do Reajuste por Tabela
- in-mes-vig / in-ano-vig - Mês/Ano Vigência
- in-mes-reaj / in-ano-reaj - Mês/Ano Reajuste
- vl-perc - Percentual de reajuste
- ds-num-oficio - Numero do Oficio
- lg-mensalidade - Variável que indica se é módulo associado a evento de mensalidade.
Tabela de entrada e saída tmp-grupo-economico
def temp-table tmp-grupo-economico no-undo
field cd-grupo-econom as int format 99999
field ds-grupo-econom as char format "x(50)"
field dt-inicio-vigencia as date
field dt-fim-vigencia as date
field cd-userid-gestor as char format "x(12)"
field dt-atualizacao as date
field cd-userid as char format "x(12)".
Definição campo a campo da tabela de saída
- cd-grupo-econom - Código do grupo econômico.
- ds-grupo-econom - Descrição do grupo econômico.
- dt-inicio-vigencia - Data início vigência.
- dt-fim-vigencia - Data fim vigência.
- cd-userid-gestor - Código do usuário gestor.
- dt-atualizacao - Data de atualização
- cd-userid - Código do usuário
Tabela de entrada e saída tmp-usuario-cj
def temp-table tmp-usuario-cj no-undo
field cd-modalidade like usuario.cd-modalidade
field nr-proposta like usuario.nr-proposta
field cd-usuario like usuario.cd-usuario
field nm-usuario like usuario.nm-usuario.
Definição campo a campo da tabela de saída
- cd-modalidade – Código da modalidade de comercialização
- nr-proposta – Numero da proposta
- cd-usuario – Código do beneficiário
- nm-usuario – Nome do beneficiário