CPC-FP0711J.P
Produto: | Gestão de Planos de Saúde |
Módulo: | Todos |
Versão: | 12.x.x |
Assuntos: | cpc-fp0711j.p |
Localização
- Dentro do programa fp0711j.p e fp0711j-indep.p, após criar as tabelas temporárias utilizadas pelas rotinas de valorização (nos procedimentos: pi-cria-tmp-rtvlinsu e pi-cria-tmp-rtvalori)
- Dentro do programa fp0711j.p e fp0711j-indep.p, ao calcular a base do imposto.
- Dentro do programa fp0711j.p e fp0711j-indep.p, após o Cálculo.
- Dentro do programa fp0711j.p e fp0711j-indep.p, na leitura dos movimentos.
- Dentro do programa fp0711j.p e fp0711j-indep.p, na rotina "gera-fatueven-e-nota".
- Dentro do programa fp0711j.p, fp0711j-indep.p, dtvw0711j.p e dtvw0711j-indep.p após o calculo da taxa.
- Nos programas fp0711j.p, fp0711j-indep.p, dtvw0711j.p e dtvw0711j-indep.p no início do processo.
- Nos programas fp0711j.p, fp0711j-indep.p, dtvw0711j.p e dtvw0711j-indep.p antes de chamar as rotinas de valorização (rtvalori.p/rtvlinsu.p).
- Nos programas fp0711j.p, fp0711j-indep.p, dtvw0711j.p e dtvw0711j-indep.p antes de verificar se o documento está liberado para faturamento.
- Nos programas fp0711j.p, fp0711j-indep.p, dtvw0711j.p e dtvw0711j-indep.p antes de buscar a data da última autorização.
Ponto de Utilização
- "ALT-TEMP-VALORI"
- "CALC-BASE-IMP"
- "APOS-CALCULO"
- "CRIA-EVENT-TAXA"
- "LE-MOVIMENTO"
- "APOS-CALC-TAXA"
- "FIM-SELECAO"
- "ANTES-TAXA"
- "INICIO-PROCESSO"
- "ANTES-VALORIZAR"
- "ANT-VER-LIB-FAT"
- "ANT-DT-ULT-AUT"
Include das definições das tabelas temporárias
- cpc-fp0711j.i
- cpc-fp0711j-indep.i
- {rtp/rtvalori.i}
- {rtp/rtvlinsu.i}
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-fp0711j-entrada
def temp-table tmp-cpc-fp0711j-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field r-moviproc-mov-insu as recid
field in-entidade like evenimp.in-entidade
field cd-imposto like evenimp.cd-imposto
field cd-evento like evenimp.cd-evento
field dt-vigencia like evenimp.dt-vigencia-ini
field cd-unidade-grupo like evengrimp.cd-unidade-grupo
field cd-grupo-contratante like evengrimp.cd-grupo-contratante
field cd-compl-grupo-contrat like evengrimp.cd-compl-grupo-contrat
field nr-insc-contratante like evenctrimp.nr-insc-contratante
field vl-base-imp like fatueven.vl-evento
field tp-movimento as char format "x(1)"
field r-docrecon as recid
field vl-cobranca like fateveco.vl-evento
field rowid-unicamco as rowid
field dt-emissao as date format 99/99/9999
field cd-modalidade like modalid.cd-modalidade
field cd-plano like pla-sau.cd-plano
field cd-tipo-plano like ti-pl-sa.cd-tipo-plano
field h-tmp-erro as handle
field cc-erro as int
field cd-contratante like contrat.cd-contratante
field pc-taxa as dec
field vl-taxa as dec
field dt-liberacao-inicial as date
field dt-liberacao-final as date
field lg-tipo-conta as log
field lg-simula-par as log
field cd-unidade-carteira like docrecon.cd-unidade-carteira
field cd-carteira-usuario like docrecon.cd-carteira-usuario
field lg-guia-fechada as logical
field dt-base as date.
Definição campo a campo da tabela de entrada
- in-evento-programa – Indica o evento, que pode ser ALTERA e APOS-CALCULO;
- nm-ponto-chamada-cpc – Indica o ponto de chamada;
- r-moviproc-mov-insu – Identificação do registro da moviproc ou mov-insu apontado;
- in-entidade – Entidade que pertence a estrutura que está sendo calculada;
- cd-imposto – Código do imposto que está sendo calculado;
- cd-evento – Código do evento que está sendo calculado;
- dt-vigencia – Data de vigência do imposto que está sendo calculada;
- cd-unidade-grupo – Código da unidade do grupo do contratante que está sendo calculado;
- cd-grupo-contratante – Grupo do contratante que está sendo calculado;
- cd-compl-grupo-contratante – Código do complemento do grupo do contratante que está sendo calculado;
- nr-insc-contratante – Número da inscrição do contratante que está sendo calulado;
- vl-base-imp – Valor da base de cálculo do imposto que está sendo calculado;
- tp-movimento – Tipo do Movimento;
- r-docrecon – Valor do Recid da tabela Docrecon;
- vl-cobranca – Valor de Cobrança;
- rowid-unicamco – Valor do Rowid da tabela Unicamco;
- dt-emissao – Data de emissão do relatório;
- cd-modalidade - Código da modalidade;
- cd-plano - Código do plano;
- h-tmp-erro - Handle da temporária de erros;
- cc-erro - Controle de sequencia dos erros;
- cd-contratante - Código do contratante;
- pc-taxa - Percentual da taxa encontrado pelo sistema;
- vl-taxa - Valor da taxa calculado pelo sistema.
- dt-liberacao-inicial - Data de liberação inicial
- dt-liberacao-final - Data de liberação final
- lg-tipo-conta - Tipo da conta
- lg-simula-par - Variável que indica se é simulação ou não.
- cd-unidade-carteira - Código da unidade da carteira do beneficiário;
- cd-carteira-usuario - Número da carteira do beneficiário;
- lg-guia-fechada - Corresponde ao parâmetro de tela que indica se deve considerar apenas guias fechadas;
- dt-base - Data base utilizada no cálculo da data da última autorização.
Tabela de saída tmp-cpc-fp0711j-saida
def temp-table tmp-cpc-rtvalori-saida no-undo like tmp-rtvalori-entrada.
def temp-table tmp-cpc-rtvlinsu-saida no-undo like tmp-rtvlinsu-entrada.
def temp-table tmp-cpc-fp0711j-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char
field lg-continua as log
field vl-base-imp like fatueven.vl-evento
field vl-cobranca like fateveco.vl-evento
field cc-erro as int
field pc-taxa as dec
field vl-taxa as dec
field lg-next as logical
field lg-calcula-taxa as logical initial yes
field lg-valorizar-movimento as logical initial yes
field lg-altera-vl-calculo as logical
field vl-calculo like moviproc.vl-auxiliar
field lg-valida-guia-fechada as logical initial yes
field lg-valida-libera-faturamento as logical initial yes
field dt-base as date
field dt-ult-autoriz as date
field lg-busca-dt-ult-autoriz as logical initial yes.
def temp-table tmp2 no-undo
field lg-prestador-cooperado like preserv.lg-cooperado
field cd-tipo-cob like moviproc.cd-tipo-cob
field in-atos-cooperativos like evenfatu.in-atos-cooperativos
field cd-evento like evenfatu.cd-evento
field in-classe-evento like evenfatu.in-classe-evento
field lg-modulo like evenfatu.lg-modulo
field lg-cred-deb like evenfatu.lg-cred-deb
field lg-destacado like evenfatu.lg-destacado
field cd-especie like tiplesp.cd-especie-custo
field ct-codigo like tipleven.ct-codigo
field sc-codigo like tipleven.sc-codigo
field ct-codigo-diferenca like tipleven.ct-codigo-diferenca
field sc-codigo-diferenca like tipleven.sc-codigo-diferenca
field ct-codigo-diferenca-neg like tipleven.ct-codigo-diferenca
field sc-codigo-diferenca-neg like tipleven.sc-codigo-diferenca
field ct-codigo-glosa like tipleven.ct-codigo-diferenca
field sc-codigo-glosa like tipleven.sc-codigo-diferenca
field vl-evento like fatueven.vl-evento
field qt-evento like fatueven.qt-evento
field vl-evento-sem-taxa like fatueven.vl-evento
field nm-rotina as char format "x(30)"
field in-classe-rotina as int
field lg-dias-acima as log
field in-tipo-fatura like fatura.in-tipo-fatura
field lg-fatura-relacionada as log
field nr-sequencia like fatueven.nr-sequencia
field nr-seq-relacionada like fatueven.nr-sequencia
field lg-compart-risco as log
index tmp2 lg-prestador-cooperado
cd-tipo-cob
in-atos-cooperativos
cd-evento
lg-dias-acima
in-tipo-fatura
index tmp2-2 lg-prestador-cooperado
lg-dias-acima
in-tipo-fatura
lg-fatura-relacionada
index tmp2-3 cd-evento
lg-prestador-cooperado
lg-dias-acima
in-tipo-fatura
lg-fatura-relacionada.
Definição campo a campo da tabela saída
Temp-table tmp-cpc-rtvalori-saida
- in-evento-programa - Indica o evento que originou a chamada da rotina (INCLUI ou ALTERA).
- in-tipo-valori - Indica se o movimento e um "Insumo" ou "Procedimento".
- lg-mensagem-na-tela – 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).
- lg-sem-cobertura – Indica se o movimento possui ou não cobertura.
- lg-urgencia - Indica se o movimento foi executado em urgência.
- lg-anestesista – Indica se o procedimento/insumo foi executado por um anestesiologista.
- nr-rowid-precproc – Rowid da tabela de preço do rpoecediemnto
- nr-recid-precproc – Recid da tabela de preço do procediemnto
- in-moeda - Indica a meda do procedimento ou insumo
- in-nivel-prestador - Indica o nível do prestador (Principal (01), Auxiliar (02), Demais...).
- cd-tab-preco-proc- Tabela de preço do procedimento
- cd-porte-anestesico- Indica o porte anestésico do procedimetno
- cd-via-acesso – Indica a via de acesso do procedimento
- cd-esp-amb – Indica a especialidade dos procedimentos
- cd-grupo-proc-amb- indica o grupo de procedimentos
- cd-procedimento – indica o procedimento
- dv-procedimento – Inidca o digito verificador do procedimento
- qt-procedimento – Quantidade de procedimento/insumo executado/utilizado.
- qt-repasse – Quantidade de vezes que paga a tabela medica ao prestador.
- dt-base-valor – Data base do procedimento
- qt-faixa-participacao – Faixa de participação do procedimento
- cd-transacao – Codigo da Transação
- dt-anoref - Ano na qual foi digitado o movimento.
- nr-perref - Numero do período de referencia na qual foi digitado o movimento.
- cd-unidade-prestador-exec – Código da unidade do prestador executante.
- cd-prestador-exec – Código do prestador executante.
- cd-esp-prest-executante – Código da especialidade do prestador executante.
- nr-rowid-proposta - Rowid da proposta, para find na tabela propost. (proposta do beneficiário da base).
- nr-rowid-usuario - Rowid do usuário, para find na tabela usuario. (usuário da base).
- nr-rowid-unicamco - Rowid da unidade do beneficiário em intercâmbio, para find na tabela unicamco.
- nr-rowid-out-uni - Rowid do usuário de outras unidade, para find na tabela out-uni. (usuário em intercâmbio).
- lg-guia – Indica se o documento teve origem em uma guia de atendimento.
- cd-modulo – Código do módulo de cobertura.
- cd-local-atendimento – Código do local de atendimento.
- cd-clinica – Código da Clínica.
- cd-cid – Código do CID.
- hr-realizacao – Hora de realização do movimento.
Temp-table tmp-cpc-rtvlinsu-saida
- in-evento-programa - Indica o evento que originou a chamada da rotina (INCLUI ou ALTERA).
- lg-mensagem-na-tela – 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).
- in-tipo-valori - Indica se o movimento e um "Insumo" ou "Procedimento".
- lg-sem-cobertura - Indica se o movimento possui ou não cobertura.
- lg-preco-padrao - preço Padrao
- nr-rowid-precproc - rowid preço do insumo
- nr-recid-precproc - recid do peço do insumo
- in-moeda – Indica a moeda do procedimento ou insumo
- cd-tab-preco-proc - tabela de preço do insumo
- cd-tipo-insumo – Código do tipo do insumo se a variável in-tipo-movimento for igual a "I".
- cd-insumo – Código do insumo se a variável in-tipo-movimento for igual a "I".
- qt-insumo - Quantidade de procedimento/insumo executado/utilizado
- dt-base-valor – Data base do movimento
- qt-faixa-participacao - Faixa de participação
- cd-transacao - Codigo da transação
- dt-anoref - Ano na qual foi digitado o movimento.
- nr-perref - Numero do período de referencia na qual foi digitado o movimento.
- cd-unidade-prestador-exec – Código da unidade do prestador executante.
- cd-prestador-exec – Código do prestador executante.
- cd-esp-prest-executante – Código da especialidade do prestador executante.
- cd-tipo-vinculo-exec - Codigo do tipo de vinculo do prestador executante.
- nr-rowid-proposta - Rowid da proposta, para find na tabela propost. (proposta do beneficiário da base).
- nr-rowid-usuario - Rowid do usuário, para find na tabela usuario. (usuário da base).
- nr-rowid-unicamco - Rowid da unidade do beneficiário em intercâmbio, para find na tabela unicamco.
- nr-rowid-out-uni - Rowid do usuário de outras unidade, para find na tabela out-uni. (usuário em intercâmbio).
- lg-guia – Indica se o documento teve origem em uma guia de atendimento.
- cd-modulo – Código do módulo de cobertura.
- cd-local-atendimento – Código do local de atendimento.
- cd-clinica – Código da Clínica.
- cd-cid – Código do CID.
Temp-table tmp-cpc-fp0711j-saida
- lg-undo-retry – Indica se ocorreu erro durante processamento da cpc.
- ds-mensagem – Mensagem de retorno da cpc.
- lg-continua – Indica se processo deve continuar ou não.
- vl-base-imp – Valor da base de cálculo do imposto que está sendo calculado pela cpc
- vl-cobranca – Valor de Cobrança.
- cc-erro - controle de sequencia dos erros.
- pc-taxa - Percentual de taxa que deve ser considerado pelo sistema.
- vl-taxa - Valor de taxa que deve ser considerado pelo sistema.
- lg-next - Indica se processo deve continuar ou não.
- lg-calcula-taxa - Indica se calcula taxa ou não
- lg-valorizar-movimento - Indica se deve valorizar o movimento;
- lg-altera-vl-calculo - Indica se deve sobrepor o valor calculado pelo valor retornado pela CPC;
- vl-calculo - Valor calculado na CPC;
- lg-valida-guia-fechada - Indica se deve validar se apenas as guias fechadas devem ser consideradas;
- lg-valida-libera-faturamento - Indica se deve validar se o documento está liberado para faturamento;
- dt-base - Data base utilizada no cálculo da data da última autorização;
- dt-ult-autoriz - Data da última autorização;
- lg-busca-dt-ult-autoriz - Indica se deve buscar a data da última autorização.
Temp-table tmp2
- lg-prestador-cooperado – Indica prestador cooperado.
- cd-tipo-cob – Tipo de cobrança.
- in-atos-cooperativos – Tipos de atos credenciados 1-Principal/2-Auxiliar/3-Não Credenciado.
- cd-evento – Código do evento.
- in-classe-evento - Classe do evento.
- lg-modulo – Evento será calculado por módulo.
- lg-cred-deb – Evento será debito ou credito.
- lg-destacado – Imprime grau de parentesco.
- cd-especie – Especie para documentos de custo operacional.
- ct-codigo – Conta contabil.
- sc-codigo – Numero do centro do custo.
- ct-codigo-diferenca - Numero da conta contabil para diferenca.
- sc-codigo-diferenca - Numero do centro de custo para conta diferenca.
- ct-codigo-diferenca-neg - Numero da conta contabil para diferenca negativa.
- sc-codigo-diferenca-neg - Numero do centro de custo para conta de diferenca negativa.
- ct-codigo-glosa - Numero da conta contabil de glosa.
- sc-codigo-glosa - Numero do centro de custo para conta de glosa.
- vl-evento – Valor do evento.
- qt-evento – Quantidade do evento.
- vl-evento-sem-taxa – Valor do evento sem taxa.
- nm-rotina – Nome da rotina de calculo.
- in-classe-rotina – Tipo de classe da rotina de calculo.
- lg-dias-acima – Prazo das notas de serviço.
- in-tipo-fatura - Tipo de fatura.
- lg-fatura-relacionada - Possui fatura relacionada ou não.
- nr-sequencia - Numero da sequencia.
- nr-seq-relacionada - Numero da sequencia nota de serviço da fatura relacionada.
- lg-compart-risco - É de compartilhamento de risco ou não.
Tabela de entrada tmp-cpc-fp0711j-indep-entrada
def temp-table tmp-cpc-fp0711j-indep-entrada no-undo
field nm-ponto-chamada-cpc as char format "x(15)"
field r-moviproc-mov-insu as recid
field tp-movimento as char format "x(1)".
Definição campo a campo da tabela de entrada
- nm-ponto-chamada-cpc – Indica o ponto de chamada
- r-moviproc-mov-insu - Id do registro da tabela mov-insu
- tp-movimento - Tipo de movimento
Tabela de saída tmp-cpc-fp0711j-indep-saida
def temp-table tmp-cpc-fp0711j-indep-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char
field lg-continua as log.
Definição campo a campo da tabela de saída
- lg-undo-retry – Indica se ocorreu erro durante processamento da cpc.
- ds-mensagem – Mensagem de retorno da cpc.
- lg-continua – Indica se processo deve continuar ou não.