Árvore de páginas

Versões comparadas

Chave

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

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.




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.


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

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


64.  Criação ou Alteração Criação de Índices no arquivo SIX – Índices:

Índice

AA1BQT

Ordem

61

Chave

AA1BQT_FILIAL + AA1BQT_CODVENMATVID     

DescriçãoCod. Vendedor

Filial + Matrícula da vida

Proprietário

S

7.  Criação ou Alteração de Parâmetros no arquivo SX6 – Parâmetros:

Nome da Variável

(X6_VAR)

Tipo

(X6_TIPO)

Descrição

(X6_DESCRIC + X6_DESC1 + X6_DESC2)

Valor Padrão

(X6_CONTEUD)

Índice

BQT

Ordem

2

Chave

BQT_FILIAL + BQT_MATRIC  

Descrição

Filial + Matrícula do beneficiário

Proprietário

S


5. Criação 8.  Criação ou Alteração (mantenha somente a instrução correspondente) de Gatilhos no arquivo SX7 – Gatilhos:

  • Tabela BD5 – Contas MédicasBQQ – Lote de transferência de beneficiário:

Campo

Informe o conteúdo do (X7_CAMPO)

BQQ_EMPORI

Sequência

Informe o conteúdo do (X7_SEQUENC)

002

Campo Domínio

Informe o conteúdo do (X7_CDOMIN)

BQQ_DEMORI

Tipo

Informe o conteúdo do (X7_TIPO)

P

Regra

Informe o conteúdo do (X7_REGRA)

M->BQQ_EMPORI 

Posiciona?

Informe o conteúdo do (X7_SEEK)

Chave

Informe o conteúdo do (X7_CHAVE)

Condição

Informe o conteúdo do (X7_CONDIC)

Proprietário

Informe o conteúdo do (X7_PROPRI)

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.

N

Condição

M->BQQ_CONSUB == "1"                    

Campo

BQQ_EMPORI

Sequência

003

Campo Domínio

BQQ_DEMORI

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 Configuração

(Estes procedimentos devem ser feitos quando for necessário configurar parâmetros e/ou  rotinas no menu).


CONFIGURAÇÃO DE PARÂMETROS

 

  1. No Configurador (SIGACFG), acesse Ambientes/Cadastros/Parâmetros (CFGX017). Crie/configure (mantenha somente a instrução correspondente) o(s) parâmetro(s) a seguir:
    (É necessário criar uma tabela para cada parâmetro descrito no item Parâmetro(s), da tabela Características do Requisito)

Itens/Pastas

Descrição

Nome:


Tipo:

Informe o Tipo do parâmetro

Cont. Por.:

Informe o Conteúdo padrão

Descrição:


 

CONFIGURAÇÃO DE MENUS

 

2.  No Configurador (SIGACFG), acesse Ambientes/Cadastro/Menu (CFGX013). Informe a nova opção de menu do informe o nome do módulo, conforme instruções a seguir:

Menu

Informe o Menu em que estará localizada a rotina

Submenu

Informe o Submenu em que estará localizada a rotina

Nome da Rotina

Informe o Título da rotina

Programa

Informe o Fonte da rotina

Módulo

Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”

Tipo

Informe a Função



Procedimento para Utilização

  • Descreva os procedimentos, passo a passo (caso de uso), que serão realizados pelos usuários para que a melhoria seja visualizada identificando as seguintes informações:
  • Localização da rotina no menu;
  • Localização dos novos campos e/ou perguntas e respectivas pastas de cadastro que são visualizadas pelo usuário;
  • Caso seja necessário ter algum cadastro feito previamente, faça uma observação.

 

 

Exemplo:

       1.            No Plano de Saúde (SIGAPLS), acesse Atualizações / Produto Saúde / Produto Saúde (PLSA800).

O sistema apresenta a janela de produtos cadastrados.

       2.            Posicione o cursor em um produto e clique em Alterar.

       3.            Na pasta Cobertura/Carências selecione a subpasta Tipo de Prestador.

       4.            Dê duplo clique no campo TP Prestador (BCW_TIPPRE).

O sistema apresenta a janela Tipo de Prestador – Coparticipação – Alterar.

       5.            Informe os dados conforme orientação do help de campo e observe o preenchimento do novo campo:

                      Som. p/Compra (BCW_SOMCOM): selecione Sim para indicar se a coparticipação cadastrada será válida somente para efeito de compra de procedimentos ou Não, caso contrário.

       6.            Confira os dados e confirme.



Vídeo

  • Vídeo hospedado no youtube e inserido no template por meio da macro Widget Connector.

** Canal do youtube e software de vídeoem definição.


Título do Vídeo:

Disponibilizado pelo Marketing.

Introdução:

Disponibilizado pelo Marketing.

Passo a Passo:

Capturar diretamente do sistema.

Finalização:

Disponibilizado pelo Marketing.



Ponto de Entrada

Descrição:

Informe o Menu em que estará localizada a rotina

Localização:

Informe o Submenu em que estará localizada a rotina

Eventos:

Informe o Título da rotina

Programa Fonte:

Informe o Fonte da rotina

Função:

Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”

Retorno:

Nome

Tipo

Descrição

Obrigatório

 




 




 




 

Exemplo:

#Include 'Protheus.ch'

User Function CN120ALT()

Local aCab:= PARAMIXB[1]

Local cTipo:= PARAMIXB[2]

If cTipo == '1'

    aCab[4][2]:= 'NF' //Validações do usuário

EndIf

Return aCab