Árvore de páginas

01. DADOS GERAIS

Produto:

TOTVS Saúde Planos

Linha de Produto:

Linha Protheus

Segmento:

Saúde

Módulo:

Contas Médicas

Função:PLSA498
País:Brasil
ISSUE:

DSAUPC-19537


02. SITUAÇÃO/REQUISITO

O conceito da Lista Referenciada foi implementado em duas partes. A primeira parte já foi entregue e o link da documentação está no item 5 deste documento. Abaixo trata-se da segunda parte da Lista Referenciada, onde tratamos o novo conceito às Vias de Acesso.

03. SOLUÇÃO

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.

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.


  • Na tabela Padrão, posso criar exceções, ou seja, quando o procedimento fizer parte da Lista Referenciada coloco Sim nele. Caso não faça parte devo colocar não. Quando o campo estiver em branco o sistema vai considerar que o procedimento faz parte da Lista Referenciada.


  • O Cadastro de Via de Acesso deve estar corretamente implementado conforme manual de intercâmbio. Incluindo o campo Código EDI, que deve ser preewnchido de acordo com o manual do PTU.

 Repare que foi criado um novo campo. O Ordem Lista Referenciada. Nesse campo informe a ordem que se trata aquele registro. Para as Vias que não utilizam o conceito de Lista Referenciada, deixe este campo em branco.

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

Exemplo:


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


Guia:

Agora um teste de Exemplo utilizando uma guia:

Importei um arquivo do PTU A500. No cadastro da Operadora que me mandou o arquivo informei sim, no campo Lista Referenciada. Nesse arquivo PTU consta vias de acesso informado de acordo com o manual do PTU, ou seja 0, 1, 2.

Conforme vimos no primeiro print deste documento o campo Código EDI que comporta os os códigos das vias conforme manual PTU. Após a importação, veja a guia:

Repare nas colunas Valor de Pagamento, Via Acesso e %Via:

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


04. DEMAIS INFORMAÇÕES

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


CampoTipoTamanhoDecimalNomeValidaçãoLista de OpçõesVisualContextoModo EdiçãoUsadoBrowse
BA0_LISREFCaracter10Lista ReferenciadaPERTENCE("12" )                                             1=Sim;2=Não                                                                                                            AlterarRealGetNewPar("MV_PLSUNI","0") == "1"                           SimSim
BGR_POSREFCaracter10Orderm Lista ReferenciadaPertence("123456789")
AlterarRealGetNewPar("MV_PLSUNI", "0") == "1"                          SimSim
BR8_LISREFCaracter10Lista ReferenciadaPERTENCE("12" )1=Sim;2=NãoAlterarRealGetNewPar("MV_PLSUNI", "0") == "1"SimSim
BMF_CODTABCaracter30Código TabelaIIF(EMPTY(M->BMF_CODTAB),.T.,PlsSeek("BF8",1,PLSINTPAD()+M->BMF_CODTAB))                                                        
AlterarRealGetNewPar("MV_PLSUNI", "0") == "1"SimSim
BX6_PERVACNumérico162Percentual Via Cobrança  

AlterarRealgetNewPar("MV_PLSUNI","0") == "1"                           SimSim


Ajuste no dicionário de Dados SX3

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


Criação de Índice na tabela BGR.

ChaveDescriçãoVirt.Usuário
BGR_FILIAL + BGR_CODINT+BGR_CODVIA+BGR_POSREF Operadora + Via + Posição Referenciada3-Padrão do Sistema


Criação do parâmetro MV_PLSLRF


ParâmetroTipoDescriçãoConteúdo
MV_PLSLRFCaracterCooperativa Médica que utiliza Lista Referenciada1



05. ASSUNTOS RELACIONADOS