Histórico da Página
CPC-RCAPI021.P
Produto: | Gestão de Planos de Saúde |
| Módulo: | Todos |
| Versão: | 12.x.x |
| Assuntos: | cpc-rcapi021.p |
- Rotina utilizada para efetuar a substituição do Prestador Executante no Modulo de Revisão de Contas.
- Verificar se o prestador é de alto custo e desconsiderar glosa.
- 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 no máximo um registro na tabela temporária de saída.
...
- Dentro do programa rcapi021.P na inclusão de movimentos no Revisão de Contas.
Ponto de Utilização
- "SUBST-PRES-EXEC"
- "CONTA-ANEST"
- "HORA-URGENCIA"
- "DATA-BASE-MOVTO"
- "MUDA-VEZES-TAB"
...
- : Utilizado para modificar a quantidade de vezes que será aplicada a tabela de moedas.
- "ALTERA-VALOR"
...
- : Utilizado para modificar o valor do procedimento
- "MODULO-COBERT"
...
- permitir : Permitir valorizar determinados procedimentos de pediatria, considerando o modulo de cobertura relacionado a outro procedimento.
- "
...
- APOS-VALORIZA"
- "CONS-PRESTADOR"
- "CONS-PRAZO"
- "ANTES-CARENCIA"
- "VERIF-ANEST"
- "ANTES-GLOSAR"
- "APOS-GLOSA-53"
- "CONTR-QUANT"
...
- : Utilizado para indicar se será feito o controle quantitativo do movimento.
- "COMPL-MOVTO"
...
- :Utilizado para criar complemento do movimento.
- "ALT-VALOR-COB"
...
- :Utilizado para alterar o valor de cobrança do movimento.
Include das definições das tabelas temporárias
- cpc-rcapi021.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rcapi021-entrada
def temp-table tmp-cpc-rcapi021-entrada no-undo
- "ANTES-GLO-BASE"
- "ANTES-GLO-PROC"
- "TRAB-COOPERADO"
- "ANT-RTVIGENCIA"
- "ANT-VERI-DUPLO": liberação a partir da 12.1.2301.
- "APOS-CRIA-COMPL": liberação a partir da 12.1.2301.
- "ANT-HR-URG-PAG" - a partir da versão 12.1.2301.
- "FIM-MANUTENCAO" - a partir da versão 12.1.2407.
Include das definições das tabelas temporárias
- cpc-rcapi021.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rcapi021-entrada
def temp-table tmp-cpc-rcapi021-entrada no-undo
field in-evento-programa field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field in-entidade as char format "x(0210)"
field dt-realizacao nm-ponto-chamada-cpc as char format "x(15)"
field in-entidade as char format "x(02)"
field dt-realizacao like moviproc.dt-base-valor
field dt-emissao like moviproc.dt-base-valor
field r-recid-periodo as recid
field r-recid-transacao as as recid
field cd-uni-cart-ben like like previesp.cd-unidade
field cd-uni-pres-exec like previesp.cd-unidade
field cd-pres-exec like previesp.cd-prestador
field dt-base-valor like moviproc.dt-base-valor
field dt-informada like like moviproc.dt-base-valor
field cd-unidade-executante like moviproc.cd-unidade-prestador
field cd-prestador-executante like like moviproc.cd-prestador
field cd-procedimento as int format 99999999
field lg-urgencia as log
field lg-anestesista as log
field cd-unidade like docrecon.cd-unidade
field cd-unidade-prestadora like docrecon.cd-unidade-prestadora
field cd-transacao like docrecon.cd-transacao
field nr-serie-doc-original like docrecon.nr-serie-doc-original
field nr-doc-original like docrecon.nr-doc-original
field nr-doc-sistema like docrecon.nr-doc-sistema
field qt-fat-rep-urg like like precproc.qt-fat-rep-urgencia
field vl-principal like moviproc.vl-principal
field vl-base-valor-sistema like moviproc.vl-base-valor-sistema
field vl-honorarios-medicos like moviproc.vl-honorarios-medicos
field qt-repasse like like moviproc.qt-repasse
field qt-repasse-cob like moviproc.qt-repasse-cob
field lg-muda-qt-repasse like tranrevi.lg-muda-qt-repasse
field nr-rowid-precproc as rowid
field vl-cobrado like like moviproc.vl-cobrado
field vl-auxiliar like moviproc.vl-auxiliar
field vl-taxa-out-uni-prin like moviproc.vl-taxa-out-uni-prin
field vl-taxa-out-uni-auxi like moviproc.vl-taxa-out-uni-auxi
field aa-guia-atendimento like docrecon.aa-guia-atendimento
field nr-guia-atendimento like docrecon.nr-guia-atendimento
field lg-trab-cooperado like moviproc.lg-trab-cooperado
field pc-taxa-acp like moviproc.pc-aplicado
field pc-taxa-aca like moviproc.pc-aplicado
field nr-processo like like moviproc.nr-processo
field nr-seq-digitacao like like moviproc.nr-seq-digitacao
field vl-taxa-out-uni-cobrado like like moviproc.vl-taxa-out-uni-cobrado.
Definição campo a campo da tabela de entrada
- in-evento-programa – Evento do programa que chama a cpc-rcapi021.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 rcapi021.p:
"DATA-BASE-MOVTO", "CONTR-QUANT", "CRIA-COMPL-MOVTO" e "ALT-VALOR-COB" - in-entidade – Identifica o modulo do sistema SERIOUS que esta efetuando acesso a rotina;
- dt-realização – Data de realização do movimento;
- dt-emissão – Data de emissão do movimento, se controle por fatura.
- r-recid-periodo – Recid da tabela PERIMOVI (Períodos de Movimentação);
- r-recid-transacao – Recid da tabela TRANREVI (Transação);
- cd-uni-cart-ben – Unidade da carteira do beneficiário;
- cd-uni-pres-exec – Unidade do prestador executante;
- cd-pres-exec – Prestador executante;
- dt-base-valor – Data base de valorização, selecionda pelo sistema;
- dt-informada – Data base para calculo informada.
- cd-unidade-executante – Código da unidade do prestador Executante.
- cd-prestador-executante – Código do prestador Executante.
- cd-procedimento – Código do procedimento atual.
- lg-urgencia – Log que define se o movimento é de urgência.
- cd-unidade – Código da unidade do beneficiário.
- cd-unidade-prestadora – Código da unidade prestadora.
- cd-transacao – Código da Transação.
- nr-serie-doc-original – Número da Série do documento Original.
- nr-doc-original – Número do documento Original.
- nr-doc-sistema – Número do documento no sistema.
- qt-fatrep-urgencia – Quantidade de vezes de pagamento da tabela quando estiver em urgência
- vl-principal – Valor do procedimento após a valorização do mesmo
- vl-base-valor-sistema - Valor que o sistema valorizou.
- vl-honorarios-medicos - Valor para honorários médicos.
- qt-repasse – Quantidade de vezes da tabela de moedas foi aplicada no procedimento
- qt-repasse-cob – Quantidade de vezes da tabela de moedas foi aplicada no procedimento para cobrança
- lg-muda-qt-repasse – Parâmetro da transação que informa se permite a modificação da quantidade da tabela
- nr-rowid-precproc – ROWID da tabela de moedas e carências utilizada
- vl-cobrado - Valor cobrado pelo prestador no procedimento.
- vl-auxiliar – Valor auxiliar cobrado pelo prestador no procedimento.
- vl-taxa-out-uni-prin – Valor da taxa quando prestador de outras unidades.
- vl-taxa-out-uni-auxi – Valor da taxa auxiliar quando prestador de outras unidades.
- aa-guia-atendimento – Ano da guia de atendimento.
- nr-guia-atendimento – N° da guia de atendimento.
- lg-trab-cooperado – Parâmetro de informação de trabalho cooperado.
- pc-taxa-acp – Percentual da taxa principal.
- pc-taxa-aca – Percentual da taxa auxiliar.
- nr-processo – Número do processo do movimento.
- nr-seq-digitacao – Número seqüencial de digitação do movimento.
- vl-taxa-out-uni-cobrado - Valor da taxa.
- dt-digitacao – Data de digitação do movimento.
- hr-realizacao – Hora de realização do movimento.
- in-evento-programa – Evento do programa que chama a cpc-rcapi021.p. Os valores desse campo podem ser:
Tabela de saída tmp-cpc-rcapi021-saida
def temp-table tmp-cpc-rcapi021-saida no-undo
field cd-local-atendimento like locaaten.cd-local-atendimento
field vl-cobrado-div-hono like moviproc.vl-cobrado
field vl-principal-div-hono like moviproc.vl-principal
field vl-auxiliar-div-hono like moviproc.vl-auxiliar
field vl-taxa-out-uni-cobrado-div-hono like moviproc.vl-taxa-out-uni-cobrado
field vl-taxa-out-uni-prin-div-hono like moviproc.vl-taxa-out-uni-prin
field vl-taxa-out-uni-auxi-div-hono like moviproc.vl-taxa-out-uni-auxi
field lg-simula as logical
field cd-esp-amb like moviproc.cd-esp-amb
field cd-proce-amb like moviproc.cd-procedimento
field dv-procedimento like moviproc.dv-procedimento
field cd-motivo-alta like docrecon.cd-motivo-alta
field cd-faturamento like docrecon.cd-faturamento
field nm-decl-nasc-viv like docrecon.nm-decl-nasc-viv
field nm-decl-obito like docrecon.char-5
field cd-unidade-pagamento like moviproc.cd-unidade-pagamento
field cd-prestador-pagamento like moviproc.cd-prestador-pagamento
field tp-tec-util like moviproc.tp-tec-util
field h-moviproc as handle
field r-movto as rowid
field h-buffer-tmp-docrecon as handle
field h-buffer-tmp-moviproc as handle
field h-buffer-moviproc as handle
field h-buffer-movimen-proced-compl as handle
field cd-tab-preco-proc like moviproc.cd-tab-preco-proc
field dt-publicacao-pacote field dt-base-valor like moviproc.dt-base-valor
field lg-undo-retry as log
field ds-mensagem as char
field cd-unidade-encaminhamento like moviproc.cd-unidade-prestador
field cd-prestador-encaminhamento like moviproc.cd-prestador
field lg-espec-anest as log
field cd-classe-erro like movrcglo.cd-classe-erro
field lg-urgencia as log
field qt-repasse like moviproc.qt-repasse
field qt-repasse-cob like moviproc.qt-repasse-cob
field vl-principal like moviproc.vl-principal
field vl-base-valor-sistema like moviproc.vl-base-valor-sistema
field vl-honorarios-medicos like moviproc.vl-honorarios-medicos
field vl-cobrado like moviproc.vl-cobrado
field cd-modulo like moviproc.cd-modulo.
field vl-auxiliar like moviproc.vl-auxiliar
field vl-taxa-out-uni-prin like moviproc.vl-taxa-out-uni-prin
field vl-taxa-out-uni-auxi like moviproc.vl-taxa-out-uni-auxi
field cd-controla-quantitativo like moviproc.cd-controla-quantitativo
field lg-continua as log
field vl-taxa-out-uni-cobrado like moviproc.vl-taxa-out-uni-cobrado
field dt-digitacao like moviproc.dt-base-valor
field hr-realizacao like moviproc.hr-realizacao.
Definição campo a campo da tabela de saída
as date.
Definição campo a campo da tabela de entrada
- in-evento-programa – Evento do programa que chama a cpc-rcapi021.p.
- nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
- in-entidade – Identifica o modulo do sistema SERIOUS que esta efetuando acesso a rotina;
- dt-realização – Data de realização do movimento;
- dt-emissão – Data de emissão do movimento, se controle por fatura.
- r-recid-periodo – Recid da tabela PERIMOVI (Períodos de Movimentação);
- r-recid-transacao – Recid da tabela TRANREVI (Transação);
- cd-uni-cart-ben – Unidade da carteira do beneficiário;
- cd-uni-pres-exec – Unidade do prestador executante;
- cd-pres-exec – Prestador executante;
- dt-base-valor – Data base de valorização, selecionda pelo sistema;
- dt-informada – Data base para calculo informada.
- cd-unidade-executante – Código da unidade do prestador Executante.
- cd-prestador-executante – Código do prestador Executante.
- cd-procedimento – Código do procedimento atual.
- lg-urgencia – Log que define se o movimento é de urgência.
- cd-unidade – Código da unidade do beneficiário.
- cd-unidade-prestadora – Código da unidade prestadora.
- cd-transacao – Código da Transação.
- nr-serie-doc-original – Número da Série do documento Original.
- nr-doc-original – Número do documento Original.
- nr-doc-sistema – Número do documento no sistema.
- qt-fatrep-urgencia – Quantidade de vezes de pagamento da tabela quando estiver em urgência
- vl-principal – Valor do procedimento após a valorização do mesmo
- vl-base-valor-sistema - Valor que o sistema valorizou.
- vl-honorarios-medicos - Valor para honorários médicos.
- qt-repasse – Quantidade de vezes da tabela de moedas foi aplicada no procedimento
- qt-repasse-cob – Quantidade de vezes da tabela de moedas foi aplicada no procedimento para cobrança
- lg-muda-qt-repasse – Parâmetro da transação que informa se permite a modificação da quantidade da tabela
- nr-rowid-precproc – ROWID da tabela de moedas e carências utilizada
- vl-cobrado - Valor cobrado pelo prestador no procedimento.
- vl-auxiliar – Valor auxiliar cobrado pelo prestador no procedimento.
- vl-taxa-out-uni-prin – Valor da taxa quando prestador de outras unidades.
- vl-taxa-out-uni-auxi – Valor da taxa auxiliar quando prestador de outras unidades.
- aa-guia-atendimento – Ano da guia de atendimento.
- nr-guia-atendimento – N° da guia de atendimento.
- lg-trab-cooperado – Parâmetro de informação de trabalho cooperado.
- pc-taxa-acp – Percentual da taxa principal.
- pc-taxa-aca – Percentual da taxa auxiliar.
- nr-processo – Número do processo do movimento.
- nr-seq-digitacao – Número seqüencial de digitação do movimento.
- vl-taxa-out-uni-cobrado - Valor da taxa.
- dt-digitacao – Data de digitação do movimento.
- hr-realizacao – Hora de realização do movimento.
- cd-local-atendimento - Local de atendimento.
- vl-cobrado-div-hono - Valor cobrado referente à divisão de honorários.
- vl-principal-div-hono - Valor principal referente à divisão de honorários.
- vl-auxiliar-div-hono - Valor auxiliar referente à divisão de honorários.
- vl-taxa-out-uni-cobrado-div-hono - Valor da taxa referente ao valor cobrado da divisão de honorários.
- vl-taxa-out-uni-prin-div-hono - Valor da taxa referente ao valor principal da divisão de honorários.
- vl-taxa-out-uni-auxi-div-hono - Valor da taxa referente ao valor auxiliar da divisão de honorários.
- lg-simula - Indica se o processo é uma simulação.
- cd-esp-amb - os dígitos 1-2 do código do procedimento;
- cd-proce-amb - os dígitos 5-7 do código do procedimento;
- dv-procedimento - dígito verificador do código do procedimento;
- cd-motivo-alta - código do motivo de alta;
- cd-faturamento - código do tipo de faturamento;
- nm-decl-nasc-viv - declaração de nascido vivo;
- nm-decl-obito - declaração de óbito;
- cd-unidade-pagamento - código da unidade do prestador de pagamento;
- cd-prestador - pagamento - código do prestador de pagamento;
- tp-tec-util - código da técnica utilizada
- h-moviproc - handle para a tabela temporária tmp-moviproc
- r-movto - rowid do procedimento (tabela ambproce)
- h-buffer-tmp-docrecon - handle para o buffer do registro corrente da tabela temporária tmp-docrecon
- h-buffer-tmp-moviproc - handle para o buffer do registro corrente da tabela temporária tmp-moviproc
- h-buffer-moviproc - handle para o buffer do registro corrente da tabela moviproc
- h-buffer-movimen-proced-compl - handle para o buffer do registro corrente da tabela movimen-proced-compl
- cd-tab-preco-proc - tabela de quantidade de moedas para pagamento
- dt-publicacao-pacote - data do pacote sispac
Tabela de saída tmp-cpc-rcapi021-saida
def temp-table tmp-cpc-rcapi021-saida no-undo
field dt-base-valor like moviproc.dt-base-valor
field lg-undo-retry as log
field ds-mensagem as char
field cd-unidade-encaminhamento like moviproc.cd-unidade-prestador
field cd-prestador-encaminhamento like moviproc.cd-prestador
field lg-espec-anest as log
field cd-classe-erro like movrcglo.cd-classe-erro
field lg-urgencia as log
field qt-repasse like moviproc.qt-repasse
field qt-repasse-cob like moviproc.qt-repasse-cob
field vl-principal like moviproc.vl-principal
field vl-base-valor-sistema like moviproc.vl-base-valor-sistema
field vl-honorarios-medicos like moviproc.vl-honorarios-medicos
field vl-cobrado like moviproc.vl-cobrado
field cd-modulo like moviproc.cd-modulo.
field vl-auxiliar like moviproc.vl-auxiliar
field vl-taxa-out-uni-prin like moviproc.vl-taxa-out-uni-prin
field vl-taxa-out-uni-auxi like moviproc.vl-taxa-out-uni-auxi
field cd-controla-quantitativo like moviproc.cd-controla-quantitativo
field lg-continua as log
field vl-taxa-out-uni-cobrado like moviproc.vl-taxa-out-uni-cobrado
field dt-digitacao like moviproc.dt-base-valor
field hr-realizacao like moviproc.hr-realizacao
field lg-prossegue as logical initial yes
field lg-altera-classe-erro as logical
field lg-calcula-vl-glosado as logical initial yes
field lg-trab-cooperado as logical
field r-movto-saida as rowid
field lg-alt-cd-tab-preco-proc as logical
field cd-tab-preco-proc like moviproc.cd-tab-preco-proc.
Definição campo a campo da tabela de saída
- dt-base-valor – Data base para valorização do movimento. Esta data somente será considerada, quando retornada da CPC, se for válida;
- lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.cd-unidade-encaminhamento – Unidade a ser substituída pela Unidade Executante
- ds-mensagem – Variável que retornar mensagem de erro, se ocorrido dentro da CPC.
- cd-prestador-encaminhamento – Prestador a ser substituído pelo Prestador Executante.
- lg-espec-anest – Indicador de anestesista.
- cd-classe-erro – Código da classe de erro referente.
- lg-urgencia – Log que define se o movimento é de urgência.
- qt-repasse – Retorna a nova quantidade da tabela para ser aplicada
- qt-repasse-cob – Retorna a nova quantidade da tabela para ser aplicada para cobrança
- vl-principal – Retorna o novo valor do procedimento
- vl-base-valor-sistema - Valor que o sistema valorizou
- vl-honorarios-medicos - Valor para honorários médicos
- vl-cobrado – Retorna o novo valor cobrado pelo prestador para o procedimento
- cd-modulo – Retorna o novo modulo.
- vl-auxiliar – Valor auxiliar cobrado pelos prestadores.
- vl-taxa-out-uni-prin – Valor da taxa quando prestador de outras unidades.
- vl-taxa-out-uni-auxi – Valor da taxa auxiliar quando prestador de outras unidades
- cd-controla-quantitativo – Indicador de controle quantitativo.
- lg-continua – Indica se deve continuar ou na a inclusão do movimento.
- vl-taxa-out-uni-cobrado – Valor da taxa.
- lg-prossegue - Indica se continua a execução ou não.
- lg-altera-classe-erro - Indica se irá alterar a classe de erro com a classe de erro informada na tabela de saída.
- lg-calcula-vl-glosado - indica para considerar valor glosado.
- lg-trab-cooperado - indica se o procedimento foi realizado por um médico cooperado
- r-movto-saida - rowid do procedimento (tabela ambproce)
- lg-alt-cd-tab-preco-proc - indica se a tabela de quantidade de moedas para pagamento deve ser alterada com a retornada da CPC
- cd-tab-preco-proc - tabela de quantidade de moedas para pagamento
- dt-base-valor – Data base para valorização do movimento. Esta data somente será considerada, quando retornada da CPC, se for válida;
- lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.cd-unidade-encaminhamento – Unidade a ser substituída pela Unidade Executante
- ds-mensagem – Variável que retornar mensagem de erro, se ocorrido dentro da CPC.
- cd-prestador-encaminhamento – Prestador a ser substituído pelo Prestador Executante.
- lg-espec-anest – Indicador de anestesista.
- cd-classe-erro – Código da classe de erro referente.
- lg-urgencia – Log que define se o movimento é de urgência.
- qt-repasse – Retorna a nova quantidade da tabela para ser aplicada
- qt-repasse-cob – Retorna a nova quantidade da tabela para ser aplicada para cobrança
- vl-principal – Retorna o novo valor do procedimento
- vl-base-valor-sistema - Valor que o sistema valorizou
- vl-honorarios-medicos - Valor para honorários médicos
- vl-cobrado – Retorna o novo valor cobrado pelo prestador para o procedimento
- cd-modulo – Retorna o novo modulo.
- vl-auxiliar – Valor auxiliar cobrado pelos prestadores.
- vl-taxa-out-uni-prin – Valor da taxa quando prestador de outras unidades.
- vl-taxa-out-uni-auxi – Valor da taxa auxiliar quando prestador de outras unidades
- cd-controla-quantitativo – Indicador de controle quantitativo.
- lg-continua – Indica se deve continuar ou na a inclusão do movimento.
- vl-taxa-out-uni-cobrado – Valor da taxa.
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas