Árvore de páginas

Transferência de beneficiário de contrato e/ou subcontrato

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Saúde

Módulo:

Plano de Saúde

Rotina:

Rotina

Nome Técnico

PLSA169Transferência de beneficiários entre contratos

País(es):

Brasil

Banco(s) de Dados:

Todos relacionais

Tabelas Utilizadas:

BQQ, BQT

Sistema(s) Operacional(is):

Windows/Linux®

Descrição

Implementada nova funcionalidade na rotina de transferência de beneficiários, onde será possível transferir os beneficiários de determinada família para outro contrato e/ou subcontrato. Está funcionalidade depende da alteração do campo "Atu. Con/Sub" (BQQ_CONSUB) para o valor "1=Sim", desta forma a tela de rotina de transferência terá um novo comportamento para atender a esse tipo de transferência. 

Também criamos uma rotina de histórico onde poderá ser visualizado as informações de transferência.




Atualizações do Dicionário


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

Chave

Nome

Modo

PYME

BQT

(X2_CHAVE)

Hist. Transf. ontrato/Subcont

(X2_NOME)

C

(X2_MODO)

N

(X2_PYME)


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

  • Tabela BQT - Hist. Transf. Contrato/Subcont:


Campo

BQT_FILIAL

Tipo

Carácter

Tamanho

8

Formato

@!

Título

Filial

Descrição

Filial

Nível

1

Usado

Não

Obrigatório

Não

Browse

Sim

Opções


When


Relação


Val. Sistema


Help


Campo

BQT_MATVID

Tipo

Carácter

Tamanho

8

Título

Matric. Vida

Descrição

Matrícula da vida        

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Visual

Contexto

Real

Help

Matrícula da vida do beneficiário transferido.

Campo

BQT_MATRIC

Tipo

Carácter

Tamanho

17

Título

Matrícula   

Descrição

Matrícula do beneficiário

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Matrícula do beneficiário transferido.

Campo

BQT_NOME  

Tipo

Carácter

Tamanho

50

Título

nome Benef. 

Descrição

Nome do beneficiário

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Visual

Contexto

Visual

RelaçãoPOSICIONE( "BA1", 2, XFILIAL("BA1") + BQT_MATRIC, "BA1_NOMUSR" ) 
Ini. BrowserPOSICIONE( "BA1", 2, XFILIAL("BA1") + BQT_MATRIC, "BA1_NOMUSR" )         

Help

Nome do beneficiário transferido.

Campo

BQT_CONORI

Tipo

Carácter

Tamanho

12

Título

Cont. Origem

Descrição

Contrato origem          

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Contrato de origem.

Campo

BQT_CONDES

Tipo

Carácter

Tamanho

12

Título

Con. Destino

Descrição

Contrato destino        

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Contrato de destino.

Campo

BQT_VCOORI

Tipo

Carácter

Tamanho

3

Título

Ver.Con.Orig

Descrição

Versão contrato origem                   

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Versão do contrato de origem.

Campo

BQT_VCODES

Tipo

Carácter

Tamanho

3

Título

Ver.Con.Dest

Descrição

Versão contrato destino                           

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Versão do contrato de destino.

Campo

BQT_SUBORI

Tipo

Carácter

Tamanho

9

Título

SubCon. Orig

Descrição

Subcontrato origem                                

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Subcontrato de origem.

Campo

BQT_SUBDES

Tipo

Carácter

Tamanho

9

Título

Sub. Destino

Descrição

Subcontrato destino                                

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Subcontrato de destino.

Campo

BQT_VRSORI

Tipo

Carácter

Tamanho

3

Título

Ver. Sb. ori

Descrição

versão subcontrato       

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Versão do subcontrato de origem.

Campo

BQT_VRSDES

Tipo

Carácter

Tamanho

3

Título

Ver. Sb. Des

Descrição

Vesão subcon. destino    

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Versão do subcontrato de destino.

Campo

BQT_DTRANS

Tipo

Data

Tamanho

8

Título

Dat. Tansfe.

Descrição

Data de transferência

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Data da transferência do beneficiário.

Campo

BQT_HORA  

Tipo

Carácter

Tamanho

5

Título

Hora transf.

Descrição

Hora da transferência

Formato99:99

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Hora da transferência do beneficiário.

Campo

BQT_CDOPER  

Tipo

Carácter

Tamanho

6

Título

Cd. Operador

Descrição

código do operador       

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Alterar

Contexto

Real

Help

Código do usuário do sistema que realizou a transferência.

Campo

BQT_NOMUSU

Tipo

Carácter

Tamanho

50

Título

Nme. Oper.  

Descrição

Nome do operador         

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Visual

Contexto

Visual

RelaçãoUsrRetName( BQT->BQT_CDOPER )
Ini. BrowserUsrRetName( BQT->BQT_CDOPER )

Help

Nome do usuário do sistema que realizou a transferência.


  • TabelaBQQ - Lote de transferência de beneficiário


Campo

BQQ_CONSUB

Tipo

Carácter

Tamanho

1

Título

Atu. Con/Sub

Descrição

Atualiza Contrato/SUbcont

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

Visual

Altera

Contexto

Real

Relação0=Não;1=Sim

Help

Com o valor "1=Sim" o sistema irá alterar apenas o contrato e/ou subcontrato da família. Não vai gerar uma nova família e nem bloquear a família atual.

Campo

 BQQ_VCOORI

Visual

Visual

Campo

 BQQ_VCODES

Visual

Visual

Campo

 BQQ_VRSORI

Visual

Visual

Campo

 BQQ_VRSDES

Visual

Visual

Campo

 BQQ_EMPDES

When

M->BQQ_CONSUB != "1" 

Campo

 BQQ_FAMDES

When

M->BQQ_CONSUB != "1" 

Campo

 BQQ_TODOS 

When

(EMPTY(M->BQQ_FAMDES) .AND. M->BQQ_CONSUB != "1")           

Campo

BQQ_CARENC 

When

M->BQQ_CONSUB != "1" 

Campo

BQQ_CPTORI 

When

M->BQQ_CONSUB != "1" 

Campo

BQQ_INCORI

When

M->BQQ_CONSUB != "1" 

Campo

BQQ_DATINC

When

M->BQQ_INCORI = '0' .AND. M->BQQ_CONSUB != "1"              

Campo

BQQ_DATEXC

When

M->BQQ_CONSUB != "1" 

Campo

BQQ_MOTBLO

When

M->BQQ_CONSUB != "1" 

Campo

BQQ_CODPRO

When

M->BQQ_CONSUB != "1" 

Campo

BQQ_VRSPRO

When

M->BQQ_CONSUB != "1" 

Campo

BQQ_PROORI

When

M->BQQ_CONSUB != "1" 

Campo

BQQ_GRPCOB

When

M->BQQ_CONSUB != "1" 

Campo

BQQ_CODCCO

When

M->BQQ_CONSUB != "1" 

Importante:

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

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

  • Pesquisa BQCPLS (inclusão de linha):

Alias

BQCPLS

Tipo

5

Sequência

02

Coluna

02

Contém

BQC->BQC_VERSUB

  • Pesquisa BQRPLS (inclusão de linha):

Alias

BQRPLS

Tipo

5

Sequência

02

Coluna

02

Contém

BQC->BQC_VERSUB


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

Índice

BQT

Ordem

1

Chave

BQT_FILIAL + BQT_MATVID     

Descrição

Filial + Matrícula da vida

Proprietário

S

Índice

BQT

Ordem

2

Chave

BQT_FILIAL + BQT_MATRIC  

Descrição

Filial + Matrícula do beneficiário

Proprietário

S


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

  • Tabela BQQ – Lote de transferência de beneficiário:

Campo

BQQ_EMPORI

Sequência

002

Campo Domínio

BQQ_EMPDES

Tipo

P

Regra

M->BQQ_EMPORI 

Posiciona?

N

Condição

M->BQQ_CONSUB == "1"                    

Campo

BQQ_EMPORI

Sequência

003

Campo Domínio

BQQ_DEMDES

Tipo

P

Regra

BG9->BG9_DESCRI

Posiciona?

S

Chave

xFilial("BG9")+M->BQQ_CODINT+M->BQQ_EMPORI

Condição

M->BQQ_CONSUB == "1"                    

Campo

BQQ_FAMORI

Sequência

002

Campo Domínio

BQQ_FAMDES

Tipo

P

Regra

M->BQQ_FAMORI

Posiciona?

N

Condição

M->BQQ_CONSUB == "1" 

Campo

BQQ_CONSUB

Sequência

001

Campo Domínio

BQQ_FAMDES

Tipo

P

Regra

M->BQQ_FAMORI

Posiciona?

N

Condição

M->BQQ_CONSUB == "1" 


Procedimento para Utilização

  • Transferindo um beneficiário de subcontrato dentro do mesmo contrato
  1. Acesse Atualizações > Contrato/Família > Transferências.
  2. Clique no botão Incluir.
  3. Altere o campo "Atu. Con/Sub" (BQQ_CONSUB) para "1=Sim".
  4. Preencha os campos habilitados para edição.
  5. Após preencher as informações clique em Salvar.
  • Histórico de transferência de contrato/Subcontrato
  1. Acesse Atualizações > Contrato/Família > Grupo familiar / Beneficiários
  2. Efetue o filtro (Pessoa jurídica, pessoa física ou pesquisar).
  3. Posicione no beneficiário que deseja visualizar o histórico.
  4. Clique em Outras Ações > Hist. Transf. Cont. e Subcon.
  5. Serão exibidos os detalhes das transferências realizadas de todos os beneficiários da família.


  6. Clicando em visualizar.



    Importante
    Apenas uma família é transferida por lote de transferência.