Árvore de páginas

Exceção de pagamento de unidade de serviço

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Saúde

Módulo:

SIGAPLS - Plano de Saúde

Rotina:

Rotina

Nome Técnico

PLSEXCEUS

Excessão de pagamento de U.S

Rotina(s) envolvida(s)

Nome Técnico

PLSA360

Cadastro de Rede de Atendimento 

PLSA498Guias por PEG

País(es):

Brasil

Banco(s) de Dados:

Todos relacionais homologados

Tabelas Utilizadas:

BE2, BEJ

Sistema(s) Operacional(is):

Windows® / Linux®

Descrição

Esta implementação permitirá que uma ou mais composições de um procedimento para determinado prestador não sejam valorados na mudança de fase de uma guia, zerando os campos de valor. O usuário poderá configurar um range de procedimentos (de/ até),  e na mudança de fase, se o procedimento estiver dentro do range não será valorado. Também será possível configurar para determinada localidade e especialidade, porém, não são informações obrigatórias, e caso não sejam definidas, o sistema entenderá que a exceção deverá ocorrer para todas as localidades e especialidades do prestador.


Procedimento para Implantação

O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch: TTTP120.PTM) recebido através deste chamado.


Procedimento para Configuração

1.  Criação de tabela no arquivo SX2– Tabelas:

Chave

Nome

Modo

PYME

B4R

(X2_CHAVE)

Excecao de US

(X2_NOME)

C

(X2_MODO)

N

(X2_PYME)


2.  Criação de Campos no arquivo SX3 – Campos:

  • Tabela B4R - Excecao de US:


Campo

B4R_FILIAL

Tipo

Caracter

Tamanho

2

Título

Filial

Descrição

Filial

Usado

Sim

Obrigatório

Não

Browse

Não

Help

Filial



Campo

B4R_CODRDA

Tipo

Caracter

Tamanho

6

Título

Cod. RDA    

Descrição

Codigo da RDA            

Usado

Sim

Obrigatório

Sim

Browse

Sim

Browse

Sim

Relação

BAU->BAU_CODIGO

Help

Código da RDA posicionada.

Campo

B4R_CPADDE

Tipo

Caracter

Tamanho

2

Título

Cod. Tab. De

Descrição

Cod. tabela padrão

Usado

Sim

Obrigatório

Sim

Browse

Sim

Relação

 GETMV("MV_PLSTBPD")                                                                                                            

Val. Sistema

 Vazio() .AND. PLLIMPCMP() .Or. BR4->(ExistCpo("BR4",M->B4R_CPADDE,1)) .AND. PLLIMPCMP() 

Help

Código da tabela padrão inicial.

Campo

B4R_CPRODE

Tipo

Caracter

Tamanho

16

Título

Cod. Pro. De

Descrição

Código Procedimento de

Usado

Sim

Obrigatório

Sim

Browse

Sim

Val. Sistema

VAZIO() .OR. ExistCpo("BR8",M->B4R_CPADDE+M->B4R_CPRODE,1)  .AND. PLVLDPROC()

Help

Código do procedimento inicial.

Campo

B4R_DESCRI

Tipo

Caracter

Tamanho

230

Título

Desc. proc.

Descrição

 Descrição do procedimento

Usado

Sim

Obrigatório

Não

Browse

Sim

Relação

 If(Inclui,"",Posicione("BR8",1,XFILIAL("BR8") + M->(B4R_CPADDE + B4R_CPRODE),"BR8_DESCRI"))

Help

Descrição do procedimento.

Campo

B4R_PADATE

Tipo

Caracter

Tamanho

2

Título

Cd. Pad. Ate

Descrição

Cod. tabela padrão

Usado

Sim

Obrigatório

Sim

Browse

Sim

Relação

 GETMV("MV_PLSTBPD")                                                                                                            

Val. Sistema

 Vazio() .AND. PLLIMPCMP() .Or. BR4->(ExistCpo("BR4",M->B4R_PADATE,1)) .AND. PLLIMPCMP()

Help

Código da tabela padrão final.

Campo

B4R_PROATE

Tipo

Caracter

Tamanho

16

Título

Cod. Pro. Ate

Descrição

Código Procedimento até

Usado

Sim

Obrigatório

Sim

Browse

Sim

Val. Sistema

VAZIO() .OR. ExistCpo("BR8",M->B4R_PADATE+M->B4R_PROATE,1)  .AND. PLVLDPROC()

 

Help

Código do procedimento final.

Campo

B4R_DESATE

Tipo

Caracter

Tamanho

230

Título

Desc. proc.

Descrição

 Descrição do procedimento

Usado

Sim

Obrigatório

Não

Browse

Sim

Relação

 If(Inclui,"",Posicione("BR8",1,XFILIAL("BR8")+B4R->(B4R_PADATE + B4R_PROATE),"BR8_DESCRI"))

Help

Descrição do procedimento.



Campo

B4R_CODLOC

Tipo

Caracter

Tamanho

6

Título

 

Cod. Local

Descrição

Código do local

Usado

Sim

Obrigatório

Não

Browse

Sim

Val. Sistema

VAZIO() .AND. PLLIMPCMP() .OR. ExistCpo("BD1",BAU->BAU_CODOPE+M->B4R_CODLOC,1) .AND. PLLIMPCMP()

Help

Código do local que poderá ocorrer a exceção.



Campo

B4R_CODESP

Tipo

Caracter

Tamanho

3

Título

 

Cod. Espec.

Descrição

(X3_DESCRIC)

Nível

(X3_NÍVEL)

Usado

 

Código da especialidade

Obrigatório

Não

Browse

Sim

Val. Sistema

VAZIO() .OR. ExistCpo("BAX",M->B4R_CODRDA + BAU->BAU_CODOPE + Subs(M->B4R_CODLOC, 1, 3) + M->B4R_CODESP,1)

Help

Código da especialidade que poderá ocorrer a exceção.



Campo

B4R_UNIDAD

Tipo

Caracter

Tamanho

230

Título

Unid. Exce.

Descrição

 

unidade de exceção

Usado

Sim

Obrigatório

Sim

Browse

Sim

Help

Unidades de saúde que deveram ser desconsideradas na valoração.

Importante:

O tamanho dos campos que possuem grupo pode variar conforme ambiente em uso.


3.  Criação de Consulta Padrão no arquivo SXB – Consulta Padrão:

  • Pesquisa PLSBR8:

Alias

PLSBR8

Tipo

1

Sequência

01

Coluna

DB

Descrição

 Tabela padrão

Contém

BR8

Alias

PLSBR8

Tipo

2

Sequência

01

Coluna

02

Descrição

 Descr. Procedimento

Alias

PLSBR8

Tipo

2

Sequência

02

Coluna

03

Descrição

Código do procedimento

Alias

PLSBR8

Tipo

4

Sequência

01

Coluna

01

Descrição

Tp.Pad.Saude 

ContémBR8_CODPAD

Alias

PLSBR8

Tipo

4

Sequência

01

Coluna

02

Descrição

Cod.Tab.Pad. 

Contém

BR8_CODPSA

Alias

PLSBR8

Tipo

4

Sequência

01

Coluna

03

Descrição

 Desc.Tb.Pd

Contém

BR8_DESCRI

Alias

PLSBR8

Tipo

4

Sequência

02

Coluna

04

Descrição

Código

Contém

BR8->BR8_CODPSA

Alias

PLSBR8

Tipo

4

Sequência

02

Coluna

05

Descrição

Descrição

Contém

BR8->BR8_DESCRI

Alias

PLSBR8

Tipo

5

Sequência

01

Contém

BR8->BR8_CODPSA

Alias

PLSBR8

Tipo

6

Sequência

01

Contém

BR8->BR8_CODPAD == M->B4R_CPADDE

  • Pesquisa PROPLS:


Alias

PROPLS

Tipo

1

Sequência

01

Coluna

DB

Descrição

Tabela padrão

Contém

BR8

Alias

PROPLS

Tipo

2

Sequência

01

Coluna

02

Descrição

Descr. Procedimento

Alias

PROPLS

Tipo

2

Sequência

02

Coluna

03

Descrição

Código Procedimento

Alias

PROPLS

Tipo

4

Sequência

01

Coluna

01

Descrição

Tp.Pad.Saude

Contém

BR8_CODPAD

Alias

PROPLS

Tipo

4

Sequência

01

Coluna

02

Descrição

Cod.Tab.Pad.

Contém

BR8_CODPSA

Alias

PROPLS

Tipo

4

Sequência

01

Coluna

03

Descrição

Código

Contém

BR8_DESCRI

Alias

PROPLS

Tipo

4

Sequência

02

Coluna

04

Descrição

Descrição

Contém

BR8->BR8_CODPSA

Alias

PROPLS

Tipo

4

Sequência

02

Coluna

05

Contém

BR8->BR8_DESCRI

Alias

PROPLS

Tipo

5

Sequência

01

Contém

BR8->BR8_CODPSA

Alias

PROPLS

Tipo

6

Sequência

01

Contém

BR8->BR8_CODPAD == M->B4R_PADATE

  • Pesquisa PLSBB8:


Alias

PLSBB8

Tipo

1

Sequência

01

Coluna

DB

Descrição

Locais atendimento

Contém

BB8

Alias

PLSBB8

Tipo

2

Sequência

01

Coluna

01

Descrição

Código do local

Alias

PLSBB8

Tipo

4

Sequência

01

Coluna

01

Descrição

Código do local

Contém

BB8->BB8_CODLOC

Alias

PLSBB8

Tipo

4

Sequência

01

Coluna

02

Descrição

Local

Contém

BB8->BB8_DESLOC

Alias

PLSBB8

Tipo

4

Sequência

01

Coluna

03

Descrição

Endereço

Contém

BB8->BB8_END

Alias

PLSBB8

Tipo

4

Sequência

01

Coluna

04

Descrição

Número

Contém

BB8->NR_END

Alias

PLSBB8

Tipo

4

Sequência

01

Coluna

05

Descrição

Complemento

Contém

BB8->BB8_COMEND

Alias

PLSBB8

Tipo

4

Sequência

01

Coluna

06

Descrição

município

Contém

BB8->BB8_MUN

Alias

PLSBB8

Tipo

4

Sequência

01

Coluna

07

Descrição

Bairro

Contém

BB8->BB8_BAIRRO

Alias

PLSBB8

Tipo

4

Sequência

01

Coluna

07

Descrição

Estado

Contém

BB8->EST

Alias

PLSBB8

Tipo

4

Sequência

01

Coluna

09

Descrição

Telefone

Contém

BB8->BB8_TEL

Alias

PLSBB8

Tipo

5

Sequência

01

Contém

BB8->(BB8_CODLOC+BB8_LOCAL)

Alias

PLSBB8

Tipo

6

Sequência

01

Contém

BB8->(BB8_CODIGO) == M->B4R_CODRDA


  • Pesquisa PLSBAX:

Alias

PLSBAX

Tipo

1

Sequência

01

Coluna

DB

Descrição

 Especialidades

Contém

BAX

Alias

PLSBAX

Tipo

2

Sequência

01

Coluna

01

Descrição

Código Especialidade

Alias

PLSBAX

Tipo

4

Sequência

01

Coluna

01

Descrição

Código

Contém

BAX->BAX_CODESP

Alias

PLSBAX

Tipo

4

Sequência

01

Coluna

02

Descrição

Descrição

Contém

Posicione("BAQ",1,xFilial("BAQ")+ BAX->(BAX_CODINT + BAX_CODESP),"BAQ_DESCRI")

Alias

PLSBAX

Tipo

5

Sequência

01

Contém

BAX->BAX_CODESP

Alias

PLSBAX

Tipo

6

Sequência

01

Contém

BAX->BAX_CODIGO == M->B4R_CODRDA  .AND. BAX->BAX_CODINT == BAU->BAU_CODOPE .AND. BAX_CODLOC == Subs(M->B4R_CODLOC, 1, 3)


  • Pesquisa PLSBD3:

Alias

PLSBD3

Tipo

1

Sequência

01

Coluna

RE

Descrição

Unidade Saúde

Contém

BD3

Alias

PLSBAX

Tipo

2

Sequência

01

Coluna01

Contém

.T.

Alias

PLSBAX

Tipo

5

Sequência

01

Contém

PLEXBUNID()


4.  Criação de Índices no arquivo SIX – Índices:

Índice

B4R

Ordem

1

Chave

B4R_FILIAL + B4R_CODRDA

Descrição

 filial + codigo RDA            

Proprietário

S


5.  Criação de Gatilhos no arquivo SX7 – Gatilhos:

  • Tabela BR4 – Exceção de US:

Campo

B4R_CPRODE

Sequência

001

Campo Domínio

B4R_DESCRI

Tipo

Primário

Regra

BR8->BR8_DESCRI

Posiciona?

Sim

Chave

XFILIAL("BR8") + M->(B4R_CPADDE + B4R_CPRODE)

Proprietário

S

Campo

B4R_PROATE

Sequência

001

Campo Domínio

B4R_DESATE

Tipo

Primário

Regra

BR8->BR8_DESCRI

Posiciona?

Sim

Chave

XFILIAL("BR8")+M->(B4R_PADATE + B4R_PROATE)

Proprietário

S

Procedimento para Utilização

Configurando a exceção de pagamento de unidade de serviço

  1. No Plano de Saúde (SIGAPLS) acesse Atualizações/Rede Atendimento/Rede de Atendimento (RDA) – Cadastro (PLSA360).
  2. Posicione na rede de atendimento desejada.
  3. clique em Outras Ações/Exceção de pagamento U.S  e clique em incluir.
  4. preencha os campos Cod. Tab. De (B4R_CPADDE) e  Cod. Pro. De (B4r_CPRODE) como o procedimento inicial para a exceção.
  5. Em seguida preencha os campos Cd. Pad. Ate (B4R_PADATE) e Cd. Pro. Ate (B4R_PROATE)  como o procedimento final fechando o range de procedimentos afetados na exceção.

Neste exemplo, todos os procedimentos entre 10101012 e 40101010 serão afetados.

6. Em seguida preencha os campos Cod. Local (B4R_CODLOC) e Cod. Espec. (B4R_CODESP).

Estes campos não são obrigatórios e funcionam da seguinte forma:

Caso o usuário preencha apenas o local de atendimento, a regra de exceção valerá apenas para as guias com este local. Caso tambem preencha a especialidade, apenas as guias com o local e especialidade configurados na exceção entrarão na regra. Se não forem preenchidos o sistema entenderá que a regra servirá para todas as localidades e especialidades da RDA configurada.

7. Em seguida preencha as unidades de saúde que serão consideradas na regra de exceção.

Ao selecionar as unidades de saúde e clicar em salvar o campo ficará da seguinte forma.

Importante

As unidades devem sempre estar separadas por vírgula.

Executando a exceção no sistema

Na mudança da fase de uma guia seguindo a premissa que a guia é da RDA configurada na exceção, onde os procedimentos da guia estão dentro do range configurado na exceção e a composição dos procedimentos estejam configurados na regra de exceção. A composição ficará da seguinte forma: