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: |
| ||||
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ção | POSICIONE( "BA1", 2, XFILIAL("BA1") + BQT_MATRIC, "BA1_NOMUSR" ) |
Ini. Browser | POSICIONE( "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 |
Formato | 99: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ção | UsrRetName( BQT->BQT_CDOPER ) |
Ini. Browser | UsrRetName( 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ção | 0=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
- Acesse Atualizações > Contrato/Família > Transferências.
- Clique no botão Incluir.
- Altere o campo "Atu. Con/Sub" (BQQ_CONSUB) para "1=Sim".
- Preencha os campos habilitados para edição.
- Após preencher as informações clique em Salvar.
- Histórico de transferência de contrato/Subcontrato
- Acesse Atualizações > Contrato/Família > Grupo familiar / Beneficiários
- Efetue o filtro (Pessoa jurídica, pessoa física ou pesquisar).
- Posicione no beneficiário que deseja visualizar o histórico.
- Clique em Outras Ações > Hist. Transf. Cont. e Subcon.
- Serão exibidos os detalhes das transferências realizadas de todos os beneficiários da família.
- Clicando em visualizar.
Importante
Apenas uma família é transferida por lote de transferência.