CPC-RC0311A5.P
Produto: | Gestão de Planos de Saúde |
Módulo: | Todos |
Versão: | 12.x.x |
Assuntos: | cpc-rc0311a5.p |
- Rotina utilizada para:
- Mudar qualquer informação do registro da tabela moviproc no momento da inclusão do movimento;
- Controlar a digitiação de movimentos em duplicidades na base de dados.
- 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 rc0311a5.p no final do programa após a gravação do registro na tabela moviproc.
- Após validação RESTRICAO PRESTADOR PRINCIPAL X MOVIMENTO X PACOTE.
- Após digitar o código do procedimento, permite a visualização das normas técnicas do procedimento.
- Antes da chamada da rotina de validação de glosas.
- Depois da validação da carteira do beneficiário.
Ponto de Utilização
- "FIM-GRAVACAO"
- "ENTIDADE"
- "HORA-URGENCIA"
- "VALIDA-GLOSA"
- "MOSTRA-MENSAGEM"
- "ANT-INC-PACOTE"
- "ANT-GRAVA-PROC" - a partir da versão 12.1.2407.
Include das definições das tabelas temporárias
- cpc-rc0311a5.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rc0311a5-entrada
def temp-table tmp-cpc-rc0311a5-entrada no-undo
field in-evento-programa as char format "x(06)"
field nm-ponto-chamada-cpc as char format "x(15) "
field lg-mensagem-na-tela as logical
field nr-rowid-moviproc as rowed
field cd-unidade-prest like preserv.cd-unidade
field cd-prestador like preserv.cd-prestador
field cd-procedimento like ambcbhpm.cd-cbhpm
field cd-unidade-carteira like moviproc.cd-unidade-carteira
field cd-transacao like docusos.cd-transacao
field cd-unidade-guia like guiautor.cd-unidade
field aa-guia-atend like guiautor.aa-guia-atendimento
field nr-guia-atend like guiautor.nr-guia-atendimento
field cd-tipo-guia like guiautor.cd-tipo-guia
field in-nivel-prestador like moviproc.in-nivel-prestador
field lg-urgencia as log
field lg-rtvalglo-cpc as log
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field nr-rowid-tranrevi as rowid
field cd-tipo-cob-cpc like moviproc.cd-tipo-cob
field vl-uso-indevido-cpc like moviproc.vl-perc-usu-indevido
field cd-validacao-cpc like moviproc.cd-validacao
field cd-user-validacao-cpc like moviproc.cd-user-validacao
field cd-forma-pagto-cob-cpc like formpaga.cd-forma-pagto
field cd-tipo-pagamento-cpc like moviproc.cd-tipo-pagamento
field dt-realizacao-cpc like moviproc.dt-realizacao
field cd-unidade-cpc like moviproc.cd-unidade
field cd-unidade-prestadora-cpc like moviproc.cd-unidade-prestadora
field cd-transacao-cpc like moviproc.cd-transacao
field nr-serie-doc-original-cpc like moviproc.nr-serie-doc-original
field nr-doc-original-cpc like moviproc.nr-doc-original
field nr-doc-sistema-cpc like moviproc.nr-doc-sistema
field nr-processo-cpc like moviproc.nr-processo
field nr-seq-digitacao-cpc like moviproc.nr-seq-digitacao
field lg-mostra-mensagem as log
field in-obriga-para like presmovt.int-1
field cd-prestador-executante like preserv.cd-prestador
field cd-unidade-executante like unimed.cd-unimed
field lg-inclui-pacote as log
field cd-unidade-principal like unimed.cd-unimed
field cd-prestador-principal like preserv.cd-prestador
field cd-local-atendimento like locaaten.cd-local-atendimento
field nm-prestador-exec as char
field cd-conselho-pre-exec as char
field nr-conselho-exec as char
field en-uf-conselho-exec as char
field cd-cpf-exec as char
field hr-realizacao-ini as char
field cod-fatur-ap as char.
Definição campo a campo da tabela de entrada
- in-evento-programa – Evento do programa que chama a cpc-rc0311a5.p. Os valores desse campo podem ser:
- "INCLUI".
- nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rc0311a5.p:
- "FIM-GRAVACAO"
- "VERIF-EXIS"
- "VALIDA-GLOSA"
- lg-mensagem-na-ela – Indica se as mensagens de erro devem ser dispostas na tela ou não. Caso o indicador for não o campo da tabela de saída ds-mensagem-relatorio deve ser preenchido. (não obrigatório).
- nr-rowid-moviproc – Rowid da tabela moviproc;
- cd-unidade-prest – Código da undiade do prestador executante;
- cd-prestador – Código do prestador;
- cd-procedimento –Código do procedimento;
- cd-unidade-carteira – Código da unidade da carteira do beneficiário;
- cd-transação – Código da Transação;
- cd-unidade-guia – Código da Undiade da GUIA (AIH);
- aa-guia-atend – Ano da Guia de atendimento (AIH);
- nr-guia-atend – Número da Guia de atendimento (AIH);
- cd-tipo-guia – Código do tipo da Guia de autorização (AIH);
- in-nivel-prestador – Indicador do nível do prestador;
- lg urgencia – Log que indica se o procedimento é de urgência;
- lg-rtvalglo-cpc - Campo que informa se o movimento foi validado ou não;
- aa-guia-atendimento - Ano da guia de atendimento;
- nr-guia-atendimento - Número da guia de atendimento;
- nr-rowid-tranrevi - Campo que envia o registro completo da tabela tranrevi;
- cd-tipo-cob-cpc - Tipo de cobrança;
- vl-uso-indevido-cpc - Valor do uso indevido pelo beneficiário;
- cd-validacao-cpc - Código de validação do movimento;
- cd-user-validacao-cpc - Código do usuário de validação;
- cd-forma-pagto-cob-cpc - Forma de pagamento;
- cd-tipo-pagamento-cpc - Tipo de pagamento;
- dt-realizacao-cpc - Data de realização;
- cd-unidade-cpc - Código da unidade da operadora que esta digitando o movimento;
- cd-unidade-prestadora-cpc - Código da unidade da operadora que prestou o serviço;
- cd-transacao-cpc - Código da transação;
- nr-serie-doc-original-cpc - Número de série do documento original;
- nr-doc-original-cpc - Número do documento original;
- nr-doc-sistema-cpc - Número do documento;
- nr-processo-cpc - Número do processo;
- nr-seq-digitacao-cpc - Número da sequência da digitação.
- lg-mostra-mensagem – Indica se será exibida mensagem.
- in-obriga-para - Indica se utiliza regra parametrizada
- cd-prestador-executante Código do prestador executante.
- cd-unidade-executante - Código unidade do prestador executante.
- lg-inclui-pacote - indica se o movimento está sendo incluído por um pacote.
- cd-unidade-principal - Código unidade principal.
- cd-prestador-principal - Código do prestador principal.
- cd-local-atendimento - Local de atendimento.
- nm-prestador-exec - Nome prestador executante.
- cd-conselho-pre-exec - Código conselho prestador executante.
- nr-conselho-exe - Número conselho prestador executante.
- en-uf-conselho-exec - UF conselho prestador executante.
- cd-cpf-exec - CPF prestador executante.
- hr-realizacao-ini - Hora realizacao inicial.
- cod-fatur-ap - Número da fatura.
Tabela de saída tmp-cpc-rc0311a5-saida
def temp-table tmp-cpc-rc0311a5-saida no-undo
fields lg-undo-retry as logical
fields ds-mensagem-relatorio as char format "x(75)"
fields lg-existe-base as log
field lg-urgencia as log
field lg-rtvalglo-cpc as log
field cd-tipo-cob-cpc like moviproc.cd-tipo-cob
field vl-uso-indevido-cpc like moviproc.vl-perc-usu-indevido
field cd-validacao-cpc like moviproc.cd-validacao
field cd-user-validacao-cpc like moviproc.cd-user-validacao
field cd-forma-pagto-cob-cpc like formpaga.cd-forma-pagto
field cd-tipo-pagamento-cpc like moviproc.cd-tipo-pagamento
field lg-cpc-ant-inc-pacote-restr 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 ou qualquer outro tipo de mensagem. Utilizado em conjunto com a entrada lg-mensagem-na-tela. Se lg-mensagem-na-tela for Não então esse campo deve ser preenchido.
- Lg-existe-base – Indica se movimento correspondente já existe na base de dados.
- lg urgencia – Log que indica se o procedimento é de urgência.
- lg-rtvalglo-cpc - Campo que informa se o movimento foi validado ou não.
- cd-tipo-cob-cpc - Tipo de cobrança.
- vl-uso-indevido-cpc - Valor do uso indevido pelo beneficiário.
- cd-validacao-cpc - Código de validação do movimento.
- cd-user-validacao-cpc - Código do usuário de validação.
- cd-forma-pagto-cob-cpc - Forma de pagamento.
- cd-tipo-pagamento-cpc - Tipo de pagamento.
- lg-cpc-ant-inc-pacote-restr – indica se o movimento deve ser restringido.