Page tree

Ajuste na Consulta Padrão da Rotina de Débito Créditos Plano de Saúde

Linha de Produto:

Microsiga Protheus

Segmento:

Saúde

Módulo:

Plano de Saúde

Rotina:

Rotina

Nome Técnico

PLSA756

Crédito/Débitos

Cadastros Iniciais:

Cadastro de débitos/créditos no pagamento de prestadores (RDA) - tabela BSQ

País(es):

Todos

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

BSQ - Débitos e créditos do pagamento de prestadores (RDA)

Sistema(s) Operacional(is):

Todos

Descrição

Ajustes para que o sistema não gere erro log ao consultar um Contrato na Rotina de Débitos/Créditos no Plano de Saúde

Atualizações 

  1.  Alteração  de Campos no arquivo SX3 – Campos:
  • Tabela BSQ - Débitos e créditos do pagamento de prestadores (RDA)


Campo

BSQ_CONEMP

Título

Contrato    

Descrição

Contrato    

F3

BT51PL

Campo

BSQ_SUBCON

Título

SubContrato   

Descrição

SubContrato  

F3

BT50PL


Importante:

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

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

  • Pesquisa BT51PL:

Alias

BT51PL

Tipo

1

Sequência

01

Coluna

DB

Descrição

Contratos           

Contém

BT5

Alias

BT51PL

Tipo

2

Sequência

01

Coluna

01

Descrição

Operadora + Codigo +       

Alias

BT51PL

Tipo

4

Sequência

01

Coluna

01

Descrição

Num.Contrato                 

Contém

BT5_NUMCON

Alias

BT51PL

Tipo

4

Sequência

01

Coluna

02

Descrição

Operadora                     

Contém

BT5_CODINT

Alias

BT51PL

Tipo

4

Sequência

01

Coluna

03

Descrição

Codigo                     

Contém

BT5_CODIGO

Alias

BT51PL

Tipo

4

Sequência

01

Coluna

04

Descrição

Descricao                   

Contém

Posicione("BG9",1,xFilial("BG9")+BT5->(BT5_CODINT+BT5_CODIGO),"BG9_DESCRI")

Alias

BT51PL

Tipo

4

Sequência

01

Coluna

05

Descrição

Nome Cliente                     

Contém

BT5_NOME

Alias

BT51PL

Tipo

5

Sequência


Coluna


Descrição

             

Contém

If(PLSRETIP() =="1","",BT5->BT5_NUMCON)

Alias

BT51PL

Tipo

6

Sequência


Coluna


Descrição

             

Contém

M->BSQ_CODINT+M->BSQ_CODEMP == BT5->(BT5_CODINT+BT5_CODIGO)



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

  • Pesquisa BT50PL:

    Alias

    BT50PL

    Tipo

    1

    Sequência

    01

    Coluna

    DB

    Descrição

    SubContrato          

    Contém

    BQC

    Alias

    BT50PL

    Tipo

    2

    Sequência

    01

    Coluna

    01

    Descrição

    Codigo                     

    Contém


    Alias

    BT50PL

    Tipo

    2

    Sequência

    02

    Coluna

    02

    Descrição

    Nome Reduzido           

    Contém


    Alias

    BT50PL

    Tipo

    2

    Sequência

    03

    Coluna

    03

    Descrição

    Descricao                    

    Contém



    Alias

    BT50PL

    Tipo

    4

    Sequência

    01

    Coluna

    01

    Descrição

    Grupo-Contrato-Sub             

    ContémBQC->( BQC_CODEMP+" "+BQC_NUMCON+" "+BQC_SUBCON )



    Alias

    BT50PL

    Tipo

    4

    Sequência

    01

    Coluna

    02

    Descrição

    Nome Reduzido Sub               

    ContémBQC->BQC_NREDUZ



    Alias

    BT50PL

    Tipo

    4

    Sequência

    01

    Coluna

    03

    Descrição

    Descricao Sub                      

    ContémBQC->BQC_DESCRI



    Alias

    BT50PL

    Tipo

    4

    Sequência

    01

    Coluna

    04

    Descrição

    Descricao Grupo                           

    ContémPosicione("BG9",1,xFilial("BG9")+BQC->(BQC_CODIGO),"BG9_DESCRI")



    Alias

    BT50PL

    Tipo

    4

    Sequência

    02

    Coluna

    05

    Descrição

    Nome Reduzido Sub                              

    ContémBQC->BQC_NREDUZ



    Alias

    BT50PL

    Tipo

    4

    Sequência

    02

    Coluna

    06

    Descrição

    Grupo-Contrato-Sub                               

    ContémBQC->( BQC_CODEMP+" "+BQC_NUMCON+" "+BQC_SUBCON )

    Alias

    BT50PL

    Tipo

    4

    Sequência

    02

    Coluna

    07

    Descrição

    Descricao Sub                                     

    ContémBQC->BQC_DESCR



    Alias

    BT50PL

    Tipo

    4

    Sequência

    02

    Coluna

    08

    Descrição

    Descricao Grupo                                          

    ContémPosicione("BG9",1,xFilial("BG9")+BQC->(BQC_CODIGO),"BG9_DESCRI")




    Alias

    BT50PL

    Tipo

    4

    Sequência

    03

    Coluna

    09

    Descrição

    Descricao Sub                                                 

    ContémBQC->BQC_DESCRI



    Alias

    BT50PL

    Tipo

    4

    Sequência

    03

    Coluna

    10

    Descrição

    Grupo-Contrato-Sub                                                   

    ContémBQC->( BQC_CODEMP+" "+BQC_NUMCON+" "+BQC_SUBCON )

    Alias

    BT50PL

    Tipo

    4

    Sequência

    03

    Coluna

    11

    Descrição

    Nome Reduzido Sub                                                      

    ContémBQC->BQC_NREDUZ



    Alias

    BT50PL

    Tipo

    4

    Sequência

    03

    Coluna

    12

    Descrição

    Descricao Grupo                                                           

    ContémPosicione("BG9",1,xFilial("BG9")+BQC->(BQC_CODIGO),"BG9_DESCRI")

    Alias

    BT50PL

    Tipo

    5

    Sequência

    01

    Coluna

    01

    Descrição

                                                             

    ContémIf(PLSRETIP() =="1","",BQC->BQC_SUBCON)

    Alias

    BT50PL

    Tipo

    6

    Sequência

    01

    Coluna


    Descrição

                                                             

    ContémPlsFilTp6("BQC")

Procedimento para Utilização


        1.            No Plano de Saúde (SIGAPLS), acesse Atualizações /Faturamento / Dédito Crédito.

                      O sistema apresenta a janela de Débitos e Créditos cadastrados.

       2.            Opção incluir;  

       3.            Informe os dados conforme orientação do help de campo:

       4.            Confira os dados e confirme.