Histórico da Página
Adequações do sistema decorrentes dos ajustes das regras do
SonarQuebeSonarQube.
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||||||||||
Segmento: | Serviços | ||||||||||||||||
Módulo: | Medicina e Segurança do Trabalho (SIGAMDT) e Gestão Ambiental (SIGASGA) | ||||||||||||||||
Rotina: |
| ||||||||||||||||
Cadastros Iniciais: | Relacione os cadastros necessários que precisam ser preenchidos antes da utilização desse requisito. | ||||||||||||||||
Parâmetro(s): | Informe os parâmetros utilizados. | ||||||||||||||||
Requisito/Story/Issue (informe o requisito relacionado): | Informe o requisito relacionado (Issue). | ||||||||||||||||
País(es): | Brasil | ||||||||||||||||
Banco(s) de Dados: | Todos | ||||||||||||||||
Tabelas Utilizadas: | Informe as tabelas utilizadas. | ||||||||||||||||
Sistema(s) Operacional(is): | Todos | ||||||||||||||||
Pacote: | É necessário a atualização do dicionário em: |
Descrição
Para tratar as regras de boas práticas exigidas pelo SonarQube, foram efetuadas tratativas nos fontes e no dicionário de dados dos módulos de Medicina e Segurança do Trabalho (SIGAMDT) e Gestão Ambiental (SIGASGA).
As regras que as modificações visam atender foram as seguintes:
- SX3 - Uso NÃO PERMITIDO de leitura do metadados
- SX1 - Uso DESCONTINUADO de leitura/atribuição do metadados
- Uso NÃO PERMITIDO de API em LOOP
- SX9 - Uso NÃO PERMITIDO de leitura/atribuição do metadados
- SX7 - Uso NÃO PERMITIDO de leitura/atribuição do metadados
- Uso NÃO PERMITIDO de chamada de API de Console
- SX6 - Uso DESCONTINUADO de leitura/atribuição do metadados
- SobreCarga de método de carga não recomendado.
- SX5 - Uso DESCONTINUADO de leitura/atribuição do metadados
- Acesso NÃO PERMITIDO das tabelas de Framework
Para rotinas em que o dicionário estava sendo manipulado manualmente, foi criado um pacote com as modificações necessárias. Nas rotinas em que a mudança feita no dicionário é vital para o funcionamento da mesma (rotinas listadas nas características do requisito ), é exibida para o usuário uma mensagem de que o dicionário necessita ser atualizado e o impede de utilizar a rotina até que seja aplicado o pacote de atualização. Em relação a outras mudanças pontuais, uma mensagem é apresentada ao entrar no módulo, caso seja verificado que o dicionário do usuário esteja desatualizado.
Observações: É importante ressaltar que antes da aplicação do pacote, sejam excluídos os grupos de pergunta MDT850 (Perguntas do Relatório do Laudo PPRA modelo Padrão), MDT85R (Perguntas do Relatório do Laudo PPRA modelo Word) e MDT931 (Perguntas do Relatório da tabela de Dimensionamento da CIPA), para que sejam recriados pelo pacote.
Atualizações do Compatibilizador
Criação de Perguntas no arquivo SX1 – Cadastro de Perguntes:
- Grupo MDT450 - Perguntas do (MDTR450)
Pergunte | Considerar por ? | Situações a Imp.? |
Ordem | 16 | 17 |
Tipo | Numérico | Caractere |
Tamanho | 1 | 5 |
(X1_PERGUNT)
Nome
Grupo
(X1_GRUPO)
Ordem
(X1_ORDEM)
Tipo
(X1_TIPO)
Tamanho
(X1_TAMANHO)
- Grupo MDT850 - Perguntas do Relatório do Laudo PPRA modelo padrão (MDTR850)
Pergunte | Laudo PPRA ? | Coordenador ? | Ordenar Riscos por ? | Ordenar Equipamentos por ? | Ordenar Plano de Ação por ? | Imprime Qtd. Func. e Funcoes? | Imprimir imagens? | Imprimir Data de Avaliação? | De Centro de Custo ? | Até Centro de Custo ? | Considerar por? |
Ordem | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 |
Tipo | Caractere | Caractere | Numérico | Numérico | Numérico | Numérico | Numérico | Numérico | Caractere | Caractere | Numérico |
Tamanho | 12 | 12 | 1 | 1 | 1 | 1 | 1 | 1 | 9 | 9 | 1 |
- Grupo MDT85R - Perguntas do Relatório do Laudo PPRA modelo Word (MDTR850)
Pergunte | Laudo ? | Coordenador ? | Impressao ? | Arquivo Saida ? | Ordenar Riscos por ? | Ordenar Equipamentos por ? | Ordenar Plano de Ação por ? | Imprime Qtd. | Imprimir imagens? | Imprimir Data de Avaliação? | De Centro de Custo ? | Até Centro de Custo ? | Considerar por? |
Ordem | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 | 13 |
Tipo | Caractere | Caractere | Numérico | Caractere | Numérico | Numérico | Numérico | Numérico | Numérico | Numérico | Caractere | Caractere | Numérico |
Tamanho | 12 | 12 | 1 | 30 | 1 | 1 | 1 | 1 | 1 | 1 | 9 | 9 | 1 |
- Grupo MDT931 - Perguntas do Relatório da tabela de Dimensionamento da CIPA
Pergunte | De Mandato CIPA ? | Até Mandato CIPA? | Imprimir Quadro ? |
Ordem | 01 | 02 | 03 |
Tipo | Caractere | Caractere | Caractere |
Tamanho | 6 | 6 | 1 |
- Grupo MDT856 - Perguntas para o Programa de Múltiplas Análises Preliminares. (MDTA856)
Pergunte | De Data ? | Até Data ? | De Avaliação ? | Até Avaliação ? | De Perigo ? | Até Perigo ? | De Dano ? | Até Dano ? | Revisão |
Ordem | 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 |
Tipo | Data | Data | Numérico | Numérico | Numérico | Numérico | Numérico | Numérico | Caractere |
Tamanho | 8 | 8 | 6 | 6 | 6 | 6 | 6 | 6 | 6 |
2. Alteração2. Alteração de Perguntas no arquivo SX1 – Cadastro de Perguntes:
- Grupo MDTRW854 - Perguntas do Relatorio Geral do PPR.
Pergunte |
(X1_PERGUNT)
Nome
Grupo
Laudo ? |
Ordem |
01 |
Tipo |
Caractere |
Tamanho |
12 | |
Consulta Padrão | TO0PPR |
3. Criação de tabela no arquivo SX2 – Tabelas:
Chave | Nome | Modo | PYME |
TYH | Tabela de Custos FAP | E | N |
4. Criaçãode Campos no arquivo SX3 – Campos:
- Tabela TYH - Tabela de Custos FAP
Campo | TYH_FILIAL | TYH_ANO | TYH_BENEF | TYH_REMUN |
Tipo | Caractere | Caractere | Numérico | Numérico |
Tamanho | 2 | 4 | 12 | 12 |
Decimal | 0 | 0 | 2 | 2 |
Formato |
(X3_PICTURE)
Título
(X3_TITULO)
Descrição
(X3_DESCRIC)
Nível
(X3_NÍVEL)
Usado
(X3_USADO) Informe Sim ou Não
Obrigatório
(X3_OBRIGAT) Informe Sim ou Não
Browse
(X3_BROWSE) Informe Sim ou Não
Opções
(X3_CBOX)
When
(X3_WHEN)
Relação
(X3_RELACAO)
Val. Sistema
(X3_VALID)
Help
@! | @E 9999 | @E 999,999,999.99 | @E 999,999,999.99 | |
Título | Filial | Ano | Benefícios | Remuneração |
Descrição | Filial do Sistema | Ano do Custo | Valor pago em benefícios | Valor pago em remuneração |
Nível | 1 | 1 | 1 | 1 |
Usado | Não | Sim | Sim | Sim |
Obrigatório | Não | Não | Não | Não |
Browse | Não | Não | Não | Não |
Help | Filial do sistema. | Ano dos custos relacionados a FAP. | Informar o custo dos benefícios por afastamento cobertos pela Previdência (Benefícios). | Informar o valor total de remuneração paga pelo estabelecimento aos segurados (Remuneração). |
5. Alteraçãode Campos no arquivo SX3 – Campos:
- Tabela TYH - Tabela de Custos FAP
Campo | (X3TKA_CAMPO)ATIVID |
TipoRelação | (X3_TIPO) |
Tamanho | (X3_TAMANHO) |
Decimal | (X3_DECIMAL) |
Formato | (X3_PICTURE) |
Título | (X3_TITULO) |
Descrição | (X3_DESCRIC) |
Nível | (X3_NÍVEL) |
Usado | (X3_USADO) Informe Sim ou Não |
Obrigatório | (X3_OBRIGAT) Informe Sim ou Não |
Browse | (X3_BROWSE) Informe Sim ou Não |
Opções | (X3_CBOX) |
When | (X3_WHEN) |
Relação | (X3_RELACAO) |
Val. Sistema | (X3_VALID) |
Help | Descreva o conteúdo informado para Help de Campo no ATUSX |
IIF( !INCLUI, TOE->( VDISP( TKA->TKA_CNAE, 'TOE_DESCRI' )), '' ) |
- Tabela SRJ - Funções
Campo | RJ_MEMOREQ |
Relação | If(INCLUI,"",MSMM(SRJ->RJ_DESCREQ,80,,,,,,,,"RDY")) |
- Tabela TJB - Produto Químico
Campo | TJB_MRISCO | TJB_MCARAC | TJB_MPRCAT | TJB_MESTOC | TJB_MDESCA | TJB_MTRANS | TJB_MLOCAL |
Usado | Sim | Sim | Sim | Sim | Sim | Sim | Sim |
Campo | TJB_RISCOS | TJB_CARACT | TJB_PRCATI | TJB_ESTOCA | TJB_DESCAR | TJB_TRANSP | TJB_LOCAL |
Usado | Não | Não | Não | Não | Não | Não | Não |
- Tabela TM0 - Ficha Médica
Campo | TM0_CCDESC | TM0_DESCFU |
Inicializador de Browse | Retirado | Retirado |
- Tabela TMY - Atestado Saúde Ocupacional
Campo | TMY_FILFUT | TMY_NOVCC | TMY_NUVFUN | TMY_NOVTAR | TMY_NUMASO |
Consulta Padrão | MDTGEN | MDTGEN | MDTGEN | MDTGEN | - |
Picture | - | - | - | - | NNNNNN |
Valid | ExistCPO('SM0',M->TMY_EMPFUT+M->TMY_FILFUT) | - | - | - | - |
- Tabela TN3 - Fornecedores de EPI
Campo | TN3_CODEPI |
Valid | MDTProEpi(M->TN3_CODEPI,cTipo,lSX5) .AND. D620CHK(1) .And. MDT620GEN() |
- Tabela TNC - Acidentes de Trabalho
Campo | TNC_VITIMA |
Inicializador Padrão | MDT640VIT() |
- Tabela TNF - EPI Entregues Funcionários
Campo | TNF_MAT |
Consulta Padrão | MDTSRA |
- Tabela TNM - Despesas do Acidente
Campo | TNM_DTDESP |
Valid | Retirado |
- Tabela TNY - Atestados Médicos
Campo | TNY_CODAFA | TNY_HRFIM | TNY_NATEST | TNY_NUMFIC | TNY_OCORRE | TNY_TIPAFA |
Valid | If(!Empty(M->TNY_CODAFA),ExistCPO( 'RCM', M->TNY_CODAFA, 1 ), .T.) .And. MDT685CODA() | IF(VAZIO(),.T.,NGVALHORA(M->TNY_HRFIM) .And. MDT685VLDT(,.T.)) | - | - | MT685VLDOC() | |
When | - | - | - | IsInCallStack('MDTA685') .and. !IsInCallStack('MDT685CONT') | - | .F. |
Inicializador Padrão | - | - | A685NEXTAT() | - | - | - |
- Tabela TY8 - Avaliação de EPI
Campo | TY8_MAT | TY8_DTREAL | TY8_QUESTI | TY8_APROVA |
Browse | Sim | Sim | Sim | Sim |
6. Criação de Índices no arquivo SIX – Índices:
Índice | TYH |
Ordem | 1 |
Chave | TYH_FILIAL+TYH_ANO |
Descrição | Filial + Ano |
Proprietário | S |
7. Alteração de Parâmetros no arquivo SX6 – Parâmetros:
Nome da Variável | MV_NG2FICH |
Tipo | Caractere |
Descrição | Indica se deverá incluir uma Ficha Médica para o Funcionário. 1-Sim; 2-Não. |
Nome da Variável | MV_NG2PDAD |
Tipo | Caractere |
Descrição | Indica se na programação de exames será permitido gerar exames na data de admissão do funcionário. |
Valor Padrão | 1 |
Nome da Variável | MV_NG2RECI |
Tipo | Caractere |
Descrição | Determina se apresentará sugestão de impressão do recibo de entrega de EPI. |
Valor Padrão | 1 |
Nome da Variável | MV_NG2AUSE |
Tipo | Caractere |
Descrição | Indica se deverá considerar funcionários Afastados ou de férias. 1-Sim; 2-Não. |
Valor Padrão | 2 |
8.
- Pesquisa B05PLS:
Alias
(XB_ALIAS)
Tipo
(XB_TIPO)
Sequência
(XB_SEQ)
Coluna
(XB_COLUNA)
Descrição
(XB_DESCRI)
Contém
(XB_CONTEM)
7. Criação de Índices no arquivo SIX – Índices:
Índice
AA1
Ordem
6
Chave
AA1_FILIAL+AA1_CODVEN
Descrição
Cod. Vendedor
Proprietário
S
9. Criação de Gatilhos no arquivo SX7 – Gatilhos:
- Tabela BD5 – Contas Médicas:Tabela TKA - CNAE x Intervalo CID
Campo | Informe o conteúdo do (X7_CAMPO) | TKA_CNAE |
Sequência | 001 | |
Contra Domínio | TKA_ATIVID | |
Tipo | Primário | |
Regra | TOE->TOE_DESCRI | |
Posiciona? | Sim | |
Chave | xFilial('TOE')+M->TKA_CNE | |
Proprietário | S |
9. Exclusão de Gatilhos no arquivo SX7 – Gatilhos:
- Tabela TKA - CNAE x Intervalo CID
Campo | TKA_CNAE |
Sequência | 001 |
Contra Domínio | TKA_ATIVID |
Tipo | Primário |
Regra | TOE->TOE_DESCRI |
Posiciona? | Sim |
Chave | xFilial('TOE')+M->TKA_CNE |
Proprietário | S |
Sequência | Informe o conteúdo do (X7_SEQUENC) |
Campo Domínio | Informe o conteúdo do (X7_CDOMIN) |
Tipo | Informe o conteúdo do (X7_TIPO) |
Regra | Informe o conteúdo do (X7_REGRA) |
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) |
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
- 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.