Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

CPC-FP0711J.P

Produto:

Gestão de Planos de Saúde

Módulo:Todos
Versão:12.x.x
Assuntos:

cpc-fp0711j.p

 

 

  • Rotina utilizada no cálculo do faturamento de outras unidades para alterar dados das tabelas temporárias utilizadas pelas rotinas de valorização (rtvalori.p, rtvlinsu.p). Juntamente com a tabela de entrada da CPC, são passadas as tabelas temporária da valorização (procedimento ou insumo) e a tmp2 para que o cliente possa tratar as informações como desejar, retornando quatro tabelas temporárias com as as alterações realizadas .Se a CPC estiver ativa, vale a regra da CPC.
  • Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
  • Será utilizado para esta CPC apenas um registro na tabela temporária de saída.

  Âncora__RefHeading__22261_2053127524__RefHeading__22261_2053127524 Âncora__RefHeading__8416_486694287__RefHeading__8416_486694287 Âncora__RefHeading__3627_213273755__RefHeading__3627_213273755 Âncora__RefHeading__13025_644533341__RefHeading__13025_644533341 Âncora__RefHeading__88923_1756225838__RefHeading__88923_1756225838Localização
Dentro do programa fp0711j.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, ao calcular a base do imposto.
Dentro do programa fp0711j.p após o Cálculo.
Dentro do programa fp0711j.p antes do for each tmp2.
Âncora__RefHeading__22263_2053127524__RefHeading__22263_2053127524 Âncora__RefHeading__8418_486694287__RefHeading__8418_486694287 Âncora__RefHeading__3629_213273755__RefHeading__3629_213273755 Âncora__RefHeading__13027_644533341__RefHeading__13027_644533341 Âncora__RefHeading__88925_1756225838__RefHeading__88925_1756225838Ponto de Utilização
"ALT-TEMP-VALORI"
"CALC-BASE-IMP"
"APOS-CALCULO"
"CRIA-EVENT-TAXA"
Âncora__RefHeading__22265_2053127524__RefHeading__22265_2053127524 Âncora__RefHeading__8420_486694287__RefHeading__8420_486694287 Âncora__RefHeading__3631_213273755__RefHeading__3631_213273755 Âncora__RefHeading__13029_644533341__RefHeading__13029_644533341 Âncora__RefHeading__88927_1756225838__RefHeading__88927_1756225838Include das definições das tabelas temporárias
cpc-fp0711j.i
{rtp/rtvalori.i}
{rtp/rtvlinsu.i}
Âncora__RefHeading__22267_2053127524__RefHeading__22267_2053127524 Âncora__RefHeading__8422_486694287__RefHeading__8422_486694287 Âncora__RefHeading__3633_213273755__RefHeading__3633_213273755 Âncora__RefHeading__13031_644533341__RefHeading__13031_644533341 Âncora__RefHeading__88929_1756225838__RefHeading__88929_1756225838Tabelas de entrada e saída
Âncora__RefHeading__22269_2053127524__RefHeading__22269_2053127524 Âncora__RefHeading__8424_486694287__RefHeading__8424_486694287 Âncora__RefHeading__3635_213273755__RefHeading__3635_213273755 Âncora__RefHeading__13033_644533341__RefHeading__13033_644533341 Âncora__RefHeading__88931_1756225838__RefHeading__88931_1756225838Tabela 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.
Âncora__RefHeading__22271_2053127524__RefHeading__22271_2053127524 Âncora__RefHeading__8426_486694287__RefHeading__8426_486694287 Âncora__RefHeading__3637_213273755__RefHeading__3637_213273755 Âncora__RefHeading__13035_644533341__RefHeading__13035_644533341 Âncora__RefHeading__88933_1756225838__RefHeading__88933_1756225838Definição campo a campo da tabela de entrada
in-evento-programa – Indica o evento, que pode ser ALT-TEMP-VALORI e CALC-BASE-IMP
nm-ponto-chamada-cpc – Indica o ponto de chamada, que pode ser ALT-TEMP-VALORI e CALC-BASE-IMP
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.
Âncora__RefHeading__22273_2053127524__RefHeading__22273_2053127524 Âncora__RefHeading__8428_486694287__RefHeading__8428_486694287 Âncora__RefHeading__3639_213273755__RefHeading__3639_213273755 Âncora__RefHeading__13037_644533341__RefHeading__13037_644533341 Âncora__RefHeading__88935_1756225838__RefHeading__88935_1756225838Tabela 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.
def shared 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 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

 

 

Localização

  • Dentro do programa fp0711j.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, ao calcular a base do imposto.
  • Dentro do programa fp0711j.p após o Cálculo.
  • Dentro do programa fp0711j.p antes do for each tmp2.

 

Ponto de Utilização

 

  • "ALT-TEMP-VALORI"
  • "CALC-BASE-IMP"
  • "APOS-CALCULO"
  • "CRIA-EVENT-TAXA"

 

Include das definições das tabelas temporárias

  • cpc-fp0711j.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.

Definição campo a campo da tabela de entrada

  • in-evento-programa – Indica o evento, que pode ser ALT-TEMP-VALORI e CALC-BASE-IMP
  • nm-ponto-chamada-cpc – Indica o ponto de chamada, que pode ser ALT-TEMP-VALORI e CALC-BASE-IMP
  • 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.

 

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.

def shared 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 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 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
index tmp2 lg-prestador-cooperado
cd-tipo-cob
in-atos-cooperativos
cd-evento
lg-dias-acima.

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 dos 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 dos 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.

 

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.
    • 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 da sub-conta contabil para diferenca.
    • 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.

...