Árvore de páginas

Versões comparadas

Chave

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

CPC-PPAPI001.P

Produto:

Gestão de Planos de Saúde

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

cpc-ppapi001.p

 

Rotina para:

  • Tratar se será calculado ou não o ISS do prestador, para o ponto de chamada "ISENTA-ISS";
  • Executar cálculo especifico do pagamento de prestadores, para o ponto de chamada "CALC-ESPECIFICO";
  • Efetuar a consistência dos prestadores, para o ponto de chamada "TRATA-PRESTADOR";
  • Efetuar a consistência/validação/atualização referente a movimentos extras e de descontos para determinados prestadores durante o processo de calculo do pagamento de prestadores, para o ponto de chamada

...

  • ATU-MOVIPRES";
  • Efetuar a validação/consistências epsecificas da operadora quando da finalização do processo de calculo/simulação do processso de pagamento de prestadores, para o ponto de chamada "FIM-SELECAO";
  • Efetuar a aplicação da regra de procedimentos auto-gerados, para o ponto de chamada "AUTO-GERADOS";
  • Tratar se será calculado ou não INSS para prestadores cooperados e pessoa física nos movimentos de insumo para o ponto de chamada "INCIDE-INSS";
  • Alterar o evento de pagamento dos movimentos, para o ponto de chamada "SETA-EVENTO";
  • Efetuar a criação da tabela de movimentos extras e/ou descontos, para o ponto de chamada "ATU-MOVTO";
  • Atualizar o status dos títulos vinculados a fatura do RC, para o ponto de chamada "PAGTO-NOTA";
  • Utilizar a espécie parametrizada na negociação do prestador para geração do título quando o cálculo estiver sendo realizado por fatura, para o ponto de chamada "ALT-ESP";
  • Alterar o valor de pagamento do movimento, para o ponto de chamada "ALT-VLR-PAGTO";
  • Modificar o pagamento das clínicas para que o cálculo se dê através do conceito de autogerados, para o ponto de chamada "ANTES-MOV-TIT".
  • 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 programa PPAPI001.P, o ponto de chamada "ISENTA-ISS" é chamado após a consistência do prestador. É passado através da temp-table de entrada o endereço do prestador e a data da produção e retornado na temp-table de saída tratamento de erro e se calcula ou não o ISS para o prestador.
  • Dentro do programa PPAPI001.P, o ponto de chamada "CALC-ESPECIFICO" é chamado antes da realização da previsão/calculo do pagamento de prestadores

...

  • .
  • Dentro do programa PPAPI001.P, o ponto de chamada "

...

  • TRATA-

...

  • PRESTADOR" é chamado

...

  • após acessar a tabela de médicos e prestadores.
  • Dentro do programa PPAPI001.P, o ponto de chamada "ATU-MOVIPRES" e acionado quando da atualização do movimentos extra ou de desconto no processo de calculo do pagamento para o prestador;
  • Dentro do programa PPAPI001.P, o ponto de chamada "FIM-SELECAO" e acionado quando da finalização do processo de calculo/simulação do pagamento para o prestador;
  • Dentro do programa PPAPI001.P, o ponto de chamada "AUTO-GERADOS" e acionado quando da seleção do processo de simulação/calculo dos auto-gerados, sobrepondo toda a regra de auto gerados do produto padrão.
  • Dentro do programa PPAPI001.P, o ponto de chamada "INCIDE-INSS" é chamado no cálculo da base para o INSS apenas para movimentos de insumo e para prestadores cooperados e pessoa física. Pela temp-table de entrada é passado o ponto de chamada e é retornado na temp table de saída um valor lógico se deve ou não calcular INSS para o prestador.
  • Dentro do programa ppapi001.p, o ponto de chamada "SETA-EVENTO" é acionado após identificar o evento para pagamento possibilitando a troca do evento.
  • Dentro do programa ppapi001.p, o ponto de chamada "ATU-MOVTO" é acionado para efetuar a criação da tabela de movimentos extras e/ou desconto quando for efetuada a troca do evento de pagamento parametrizado para o prestador.
  • Dentro do programa ppapi001.p, o ponto de chamada "PAGTO-NOTA" é acionado para atualizar o status dos títulos vinculados a fatura do RC.
  • Dentro do programa ppapi001.p o ponto de chamada "ALT-ESP" é acionado para utilizar a espécie parametrizada na negociação do prestador para geração do título quando o cálculo estiver sendo realizado por fatura.
  • Dentro do programa ppapi001.p o ponto de chamada "ALT-VLR-PAGTO" é acionado para alterar o valor de pagamento do movimento.
  • Dentro do programa ppapi001.p o ponto de chamada "ANTES-MOV-TIT" é acionado antes de realizar a leitura da pagapres.

...

Ponto de Utilização

  • "ISENTA-ISS", "CALC-ESPECIFICO", "TRATA-PRESTADOR", "ATU-MOVIPRES", "FIM-SELECAO", "AUTO-GERADOS", "

...

  • INCIDE-INSS", "SETA-EVENTO", "ATU-MOVTO", PAGTO-NOTA", "ALT-ESP", "ALT-VLR-PAGTO" e "ANTES-MOV-TIT".

Include das definições das tabelas temporárias

  • cpc-ppapi001.i

 

Tabelas de entrada e saída-ESP", "ALT-VLR-PAGTO" e "ANTES-MOV-TIT".
Âncora__RefHeading__23463_2053127524__RefHeading__23463_2053127524 Âncora__RefHeading__9618_486694287__RefHeading__9618_486694287 Âncora__RefHeading__4829_213273755__RefHeading__4829_213273755 Âncora__RefHeading__14227_644533341__RefHeading__14227_644533341 Âncora__RefHeading__90125_1756225838__RefHeading__90125_1756225838Include das definições das tabelas temporárias
cpc-ppapi001.i
Âncora__RefHeading__23465_2053127524__RefHeading__23465_2053127524 Âncora__RefHeading__9620_486694287__RefHeading__9620_486694287 Âncora__RefHeading__4831_213273755__RefHeading__4831_213273755 Âncora__RefHeading__14229_644533341__RefHeading__14229_644533341 Âncora__RefHeading__90127_1756225838__RefHeading__90127_1756225838Tabelas de entrada e saída
Âncora__RefHeading__23467_2053127524__RefHeading__23467_2053127524 Âncora__RefHeading__9622_486694287__RefHeading__9622_486694287 Âncora__RefHeading__4833_213273755__RefHeading__4833_213273755 Âncora__RefHeading__14231_644533341__RefHeading__14231_644533341 Âncora__RefHeading__90129_1756225838__RefHeading__90129_1756225838

Tabela de entrada tmp-cpc-ppapi001-entrada

def temp-table tmp-cpc-ppapi001-entrada no-undo

field r-movimento                       as recid
field r-inss

...

                                as recid
field r-pagapres                         as recid
field r-preserv

...

                           as recid
field r-movipres

...

                         as rowid
field nr-nota-parcela                   like movipres.nr-nota-parcela
field

...

dt-producao                       as date
field nm-ponto-chamada-cpc       as char format "x(15)"
field in-evento-programa             as char format "x(10)"
field cd-unidade

...

                       like pagapres.cd-unidade-prestador
field cd-prestador

...

                     like pagapres.cd-prestador
field in-movtos-internacao

...

         as int
field lg-considera-tipo-clin

...

         as log
field in-considera-

...

movtos           as int
field in-liberado-1

...

                     as char format "x(01)"
field in-liberado-2

...

                     as char format "x(01)"
field in-selec-tp-movto               as char format "x(21)"
field in-movto                           as char format "x(01)"
field r-

...

notapres                         as recid
field cd-unidade-pagto               like preserv.cd-unidade
field cd-prestador-pagto

...

            like preserv.cd-prestador
field cd-unidade-

...

nota                like preserv.cd-unidade

...


field cd-

...

prestador-nota              like preserv.cd-

...

prestador
field

...

cod-esp                            like presnego.cod-esp
field lg-glosa-parcial                  as log
field cd-unidade-prestador         like moviproc.cd-unidade-prestador
field cd-tipo-vinculo                  like moviproc.cd-tipo-vinculo
field in-resultado-divisao           like moviproc.in-resultado-divisao
field dt-anoref                         like moviproc.dt-anoref
field nr-perref                          like moviproc.nr-perref
field lg-periodo                        as log
field lg-considera-even-ext        as log
field lg-primeira-vez                  as log
field in-liberado-contas             as char
field in-liberado-pagto              as char
field cd-unidade-pagamento      as int
field cd-prestador-pagamento     as int
field cd-tipo-medicina-ini           as int
field cd-tipo-medicina-fim          as int
field in-calculo-pagamento        as char format "x(1)"
field vl-liquido                          like moviproc.vl-principal
field vl-movto-aux                     like pagapres.vl-movto-prin
field vl-desc-prest                     like moviproc.vl-desconto-prestador
field ds-processo                      like pagapres.ds-processo
field cd-unidade-sel                   like preserv.cd-unidade
field lg-valor-ou-cobranca          as log
field lg-paga-valor-zerado          as log.

Definição campo a campo da tabela de entrada

  • r-movimento – Não utilizado
  • r-inss – Não utilizado

...

  • r-pagapres – Não utilizado
  • r-preserv – Rowid da tabela PRESERV.
  • r-movipres – Rowid da tabela MOVIPRES
  • nr-nota-parcela – Número da parcela da nota.
  • dt-produção – Data da produção informado nos parâmetros do programa
  • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc
  • in-evento-programa – Define o tipo de evento que está acionando a CPC. Poderá ser "CALCULO" ou "PREVISAO".
  • cd-unidade – Código da Unidade do prestador
  • cd-prestador – Código do prestador
  • in-movtos-internacao – Indicador para considerar ou não apenas movimentos de internação. Valor 1, considera apenas movimentos de internação e zero considera qualquer tipo de movimento
  • lg-considera-tipo-clinica – Define se será ou não considerado o intervalo de tipos de clincias
  • in-considera-movtos – Indicador para considerar ou não movimentos em que o prestador principal e o prestador executante são iguais. Valor 0, considera os movimentos e um desconsidera o movimento
  • in-liberado-1 – Indica se somente será considerados os movimentos liberados do contas ou não;
  • in-liberado-2 – Indica se somente será considerados os movimentos liberados do contas ou não
  • in-selec-tp-movto – Indicador do tipo produtos que serão considerados na seleção dos movimentos. Valor 1, somente movimento de pré-pagamento, igual a 2, somente movimentos de Custo Operacional e 3, ambos os tipos de movimentos.
  • in-movto – Indicador de procedimento ou insumo;
  • r-notapres – Recid da tabela notapres;
  • cd-unidade-pagto – Código da unidade de pagamento;
  • cd-prestador-pagto – Código do prestador de pagamento;
  • cd-unidade-nota – Código da unidade da fatura do RC;
  • cd-prestador-nota – Código do prestador da fatura do RC;
  • cod-esp – Código da espécie;
  • lg-glosa-parcial – Indica se o movimento foi glosado parcialmente.

 

...

Tabela de saída tmp-cpc-ppapi001-saida

def temp-table tmp-cpc-ppapi001-saida no-undo

field lg-undo-retry                     as log
field ds-mensagem-relatorio       as char
field lg-

...

calcula-iss                     as log
field vl-desconto                       as dec format "z,zzz,zz9.99"
field ds-especialid                     like esp-med.ds-especialid
field cd-proc-base

...

                    as int format "99999999"
field qt-

...

proc-base                     as int
field qt-total-

...

solicitados             as int
field qt-total-

...

executados            as int
field qt-total-auto-gerados

...

        as int
field qt-total-permitidos             as int
field qt-total-dif-exames            as int
field pc-proced-permitido           like prautger.pc-proced-permitido
field vl-auto-gerados                 as dec format "z,zz9.99"
field in-movto-incide-inss           as char format "x(01)"
field vl-base-ir                          like pagapres.vl-base-ir
field r-preseven                        as recid
field nr-nota-parcela                 like movipres.nr-nota-parcela
field dt-pagto-prestador            like notapres.dt-pagto-prestador
field cod-esp                           like presnego.cod-esp
field vl-movto-prin                    like moviproc.vl-principal
field vl-movto-auxi                    like moviproc.vl-auxiliar
field lg-proximo                        as log
field lg-considera-even-ext        as log
field cd-evento                        like evenfatu.cd-evento
field vl-desc-prest-procedimento      like moviproc.vl-desconto-prestador
field vl-desc-prest-insumo          like mov-insu.vl-desconto-prestador.

Definição campo a campo da tabela de saída

  • lg-undo-retry – Variável que controla os erros que podem ocorrer na CPC
  • ds-mensagem-relatorio – Variável que recebe a descrição dos erros que ocorreram na CPC
  • lg-calcula-iss – Variável que retorna se calcula ISS para o prestador.
  • vl-desconto – Valor do desconto que será gerado contra o prestador em virtude de ultrapassar a quantidade permitida para execução pelo prestador de aeventos auto-gerados;
  • ds-especialid – Descrição da especialidade médica
  • cd-proc-base – Código do procedimento Base referente ao procedimentos Auto Gerados;
  • qt-proc-base – Quantidade de procedimento base realizado;
  • qt-total-solicitados – Quantidade total de procedimentos (auto-gerado) solicitados ao prestador;
  • qt-total-executados – Quantidade total de procedimentos (auto-gerado) executados pelo prestador;
  • qt-total-auto-gerados – Quantidade total de procedimentos (auto-gerado) executados pelo prestador em que ele é também é o prestador solicitante;
  • qt-total-permitidos – Quantidade total de procedimentos auto-gerado PERMITIDOS para execução pelo prestador;
  • qt-total-dif-exames - Quantidade total de procedimentos auto-gerado que ultrapassaram a quantidade permitida para execução pelo prestador;
  • pc-proced-permitido - Percentual de procedimentos permitidos de serem auto-gerados, sobre a quantidade de procedimentos base executados;
  • vl-auto-gerados – Valor total dos eventos auto-gerados;
  • in-movto-incide-inss: - Variável que retorna sobre qual tipo de movimento será a incidência de INSS, valores possíveis: "A" – incide INSS sobre procedimentos e insumos; "I" – incide INSS sobre insumos; "P" – incide INSS sobre procedimentos;
  • r-preseven – Recid da tabela preseven;
  • nr-nota-parcela – Numero da nota/parcela;
  • cod-esp – Código da espécie;
  • vl-movto-prin – Valor principal do movimento;
  • vl-movto-aux – Valor auxiliar do movimento;