Histórico da Página
CPC-CG0210O.p
Produto: | Gestão de Planos de Saúde |
Módulo: | Todos |
Versão: | 12.x.x |
Assuntos: | cpc-cg0210o.p |
- Rotina utlizada ao criar, alterar e eliminar a associação CID x Beneficiario.
- 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.
Âncora
- Dentro do programa de manutenção da declaração de saúde do beneficiário, ao incluir, alterar ou excluir cids do beneficiário.(USUCID)
- Após a inclusão de CPT do beneficiário. (EMITE-CPT).
Âncora
- "USUCID"
- "EMITE-CPT"
Âncora
- cpc-cg0210o.i
...
Âncora
Tabela de entrada tmp-cpc-cg0210o-entrada
def temp-table tmp-cpc-cg0210o-entrada no-undo
field nm-ponto-chamada-cpc
...
as char
field in-evento-programa as char
field cd-modalidade like modalid.cd-modalidade
field nr-proposta like propost.nr-proposta
field cd-usuario like usuario.cd-usuario
field cd-modalidade-fim like modalid.cd-modalidade
field nr-proposta-fim like propost.nr-proposta
field cd-usuario-fim like usuario.cd-usuario
field cd-cid like dzdeccid.cd-cid
field cd-cid-fim like dzdeccid.cd-cid
field cd-condicao-saude like dzdeccid.cd-condicao-saude
field cd-condicao-saude-fim like dzdeccid.cd-condicao-saude
field nr-carencia-cpt like dzdeccid.nr-carencia-cpt
field lg-verifica-procedimento like dzdeccid.lg-verifica-procedimento
field ds-observacao1 as char
field ds-observacao2 as char
field ds-observacao3
...
as char.
Definição campo a campo da tabela de entrada
- nm-ponto-chamada-cpc – "USUCID".
- in-evento-programa – Identifica qual procedimento a cpc deve executar no momento que está sendo chamada. Valores possíveis:
- "ELICID" – chamado quando uma associação CID x Beneficiário é eliminada.
- "MANTMP" – chamado quando uma associação CID x Beneficiário é incluída ou alterada.
- "ATUSIS" – chamada no momento em que o beneficiário confirma atualização dos dados.
- "ELITMP" – chamada no momento em que o beneficiário confirma atualização dos dados, para limpar a tabela temporária tmp-cpc-cg0210o.
- "GERTMP" – chamada na opção geração, para cada associação CID x Beneficiário criada.
- cd-modalidade – modalidade do beneficiário que esta tendo a declaração de saúde alterada.
- nr-proposta - proposta do beneficiário que esta tendo a declaração de saúde alterada.
- cd-usuario – beneficiário que esta tendo a declaração de saúde alterada.
- cd-modalidade-fim – modalidade final do beneficiário que esta tendo a declaração de saúde alterada (utilizado no evento GERTMP).
- nr-proposta-fim - proposta final do beneficiário que esta tendo a declaração de saúde alterada (utilizado no evento GERTMP).
- cd-usuario-fim – beneficiário final que esta tendo a declaração de saúde alterada (utilizado no evento GERTMP).
- cd-cid – CID que está sendo alterado.
- cd-cid-fim – CID final que está sendo incluído (utilizado no evento GERTMP).
- cd-condicao-saude – condição de saúde do beneficiário.
- cd-condicao-saude – condição de saúde final para o beneficiário (utilizado no evento GERTMP).
- nr-carencia-cpt – numero de dias de carência para a cobertura parcial temporária.
- lg-verifica-procedimento – indica se o calculo da CPT deve verificar cobertura do procedimento.
- ds-observação – 3 campos para observações gerais.
...
...
Tabela temporaria tmp-cpc-cg0210o (para armazenamento temporário de informações)
def temp-table tmp-cpc-cg0210o no-undo
fields cd-cid
...
as char
fields cd-procedimento as inte
fields ds-procedimento like ambproce.ds-procedimento-reduz
fields nr-carencia-cpt
...
as inte
fields ds-observacao
...
as char extent 3
fields lg-elimina as log.
...
...
Definição campo a campo da tabela temporaria
- cd-cid – código do Cid.
- cd-procedimento – código do procedimento.
- ds-procedimento – descrição do procedimento.
- nr-carencia-cpt – numero de dias de carência para cpt.
- ds-observação – observações gerais.
- lg-elimina – indicador se deve eliminar o registro.
...
...
Tabela de saída tmp-cpc-cg0210o-saida
def temp-table tmp-cpc-cg0210o-saida no-undo
fields lg-erro as logical
fields ds-mensagem-retorno
...
as char format "x(75)".
...
Definição campo a campo da tabela de saída
- lg-erro – indica que ocorreu algum erro durante o processamento.
- ds-mensagem-retorno – retorna a mensagem correspondente ao erro, caso o campo lg-erro esteja ligado.