Árvore de páginas

Versões comparadas

Chave

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

...

Realizada a implementação da segunda parte da Lista Refenciada qua trata as Vias de Acesso. 

Conceito da Lista Referenciada:

Atualmente o pagamento de códigos múltiplos segue o conceito de Via de Acesso.

        → Mesma Via: Paga-se 100% para o procedimento principal e 50% para todos os demais.

        → Diferentes Vias: Paga-se 100% para o principal, 70% para o segundo maior e 50% para os demais.

O modelo atual estimula a enxertia de códigos. Na lista os procedimento foram calculados em um modelo que valoriza o procedimento principal e aplica um fator decrescente de participação, pois o que deve ser valorizado é o procedimento principal.

...


Image Added


A tabela acima deve ser refletida no cadastro de vias de acesso.

  • Esta atualização somente é utilizada por Operadora de Cooperativa Médica. No cadastro da Operadora, o cliente deve informar se ela vai ou não utilizar a Lista Referenciada. Este campo se faz necessário para que o cliente possa identificar quais são as Operadoras fora do estado dele, pois neste caso será aplicado esta regra.

...

Observação: Segundo manual do PTU: Única Via = 0, Mesma Via = 1 e Diferentes Vias = 2. Valores informados na coluna Cod EDI.

Exemplo:

Image RemovedImage Added


  • Também é necessário ter o DE/PARA TISS cadastrado corretamente com a terminologia 61 (Via de Acesso). Isso para que seja gravado nas guias o código correto da via de acesso.

O sistema considera para Lista Referenciada as guias que tem o campo via de acesso (BD6_VIA) preenchido com as vias: Mesma Via ou Vias Diferentes.

Image RemovedImage Added


Guia:

Agora um teste de Exemplo utilizando uma guia:

...

Repare que o sistema grava os percentuais considerando o maior valor 100% e o menor valor 10%.


Beneficiário do PEA:

No caso de beneficiários do PEA, o sistema procura dados no Subcontrato Aba "Parâmetros de Pagamento por Tipo de Prestador". Neste nível foi criado os campos BMF_CODTAB e BMG_CODTAB, onde você informará qual tabela deve ser considerada para o PEA. 

Image Added

04. DEMAIS INFORMAÇÕES

Criação do campo Código Tabela (BA0_LISREF).


CampoTipoTamanhoDecimalNomePropriedadeInicializador PadrãoValidaçãoConsultaLista de OpçõesVisualContextoModo EdiçãoUsadoBrowse
BA0_LISREFCaracter10Lista ReferenciadaAlterar
PERTENCE("12" )                                             
1=Sim;2=Não                                                                                                            AlterarReal
GetNewPar
GETNEWPAR("MV_
PLSUNI
PLSLRF","0") =="1"
                          
SimSim
BGR_POSREFCaracter10Orderm Lista ReferenciadaAlterar
Pertence("123456789")

AlterarReal
GetNewPar
GETNEWPAR("MV_
PLSUNI
PLSLRF","0") =="1"
                         
SimSim
BR8_LISREFCaracter10Lista ReferenciadaAlterar
PERTENCE("12" )
1=Sim;2=NãoAlterarReal
GetNewPar
GETNEWPAR("MV_
PLSUNI
PLSLRF","0") =="1"SimSim

Ajuste no dicionário de Dados SX3

BMF_CODTABCaracter30Código TabelaAlterar
IIF(EMPTY(M->BMF_CODTAB),.T.,PlsSeek("BF8",1,PLSINTPAD()+M->BMF_CODTAB))                                                        B72PLS
AlterarRealGETNEWPAR("MV_PLSLRF","0") =="1"SimSim
BX6_PERVACNumérico162Percentual Via Cobrança  Visualizar



AlterarRealGETNEWPAR("MV_PLSLRF","0") =="1"SimSim
BME_CODTABCaracter30Código TabelaVisualizarCTabBME


VisualizarRealGETNEWPAR("MV_PLSLRF","0") =="1"SimSim
BMG_CODTABCaracter30Código TabelaVisualizarcTabBMG                                                                                             


VisualizarRealGETNEWPAR("MV_PLSLRF","0") =="1"SimSim
BMD_CODTABCaracter30Código TabelaAlterar
IIF(EMPTY(M->BMD_CODTAB),.T.,PlsSeek("BF8",1,PLSINTPAD()+M->BMD_CODTAB))  B72PLS
AlterarRealGETNEWPAR("MV_PLSLRF","0") =="1"SimSim


Ajuste no dicionário de Dados SX3

CampoValidação
BGR_CODVIA
CampoValidação
BGR_CODVIAExistChav("BGR",M->BGR_CODINT+M->BGR_CODVIA+M->BGR_POSREF) 

Criação de Índice na tabela BGR.

...