Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin
Criação da

Rotina de

Adaptação

adaptação de

Registros

registros das

Tabelas

tabelas com

Códigos

códigos do eSocial e mudanças de dicionário para os eventos do módulo.

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Medicina e Segurança do Trabalho (SIGAMDT).

Rotina:

RotinaNome Técnico
MDTA890Conciliação eSocial

Cadastros Iniciais:

Agentes; Tipo de Acidente; Objeto Causador; Natureza da Lesão; Parte do corpo Atingida.

ParâmetroPaís(ses):

Informe os parâmetros utilizados.

Ponto de Entrada:

Informe o ponto de entrada relacionado (link).

Tickets relacionados

Informe o(s) chamado(s) relacionado(s).

Requisito/Story/Issue (informe o requisito relacionado):

 Informe o requisito relacionado (Issue).

País(es):

Brasil.

Banco(s) de Dados:

Todos.

Brasil

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

C98, TMA, C8L

Tabelas Utilizadas:

C98, TMA, C8L, TNG, C8J, TNH, C8K, C8I, TOI, C8M, TOJ
Sistema(s) Operacional(is):Todos
Adequação de Tabelas para o eSocial
Pacote:É necessário a atualização do dicionário em: https://suporte.totvs.com/portal/p/10098/download?e=677771 

Descrição

Criada a rotina Conciliação eSocial (MDTA890), que oferece

Descrição

A nova rotina MDTA890, cria uma interface para o relacionamento de registros existentes com os códigos do eSocial para as tabelas:"TMA " - Agente de Risco, " TNG " - Tipo de Acidente de trabalho eSocial  ", TNH " - Objeto Causador do Acidente e ", TOI " - Parte do Corpo Atingida , "e TOJ " - Natureza da Lesão

 

Importante

(Apenas para Microsiga Protheus, versões anteriores à versão 12)

Antes de executar o compatibilizador informe o nome do compatibilizador é imprescindível:

  • Realizar o backup da base de dados do produto que será executado o compatibilizador (diretório PROTHEUS_DATA\DATA, se versão 10, ou \PROTHEUS11_DATA\DATA, se versão 11) e dos dicionários de dados SXs (diretório PROTHEUS_DATA_SYSTEM, se versão 10, ou \PROTHEUS11_DATA\SYSTEM, se versão  11).
  • Os diretórios acima mencionados correspondem à instalação padrão do Protheus, portanto, devem ser alterados conforme o produto instalado na empresa.
  • Essa rotina deve ser executada em modo exclusivo, ou seja, nenhum usuário deve estar utilizando o sistema.
  • Se os dicionários de dados possuírem índices personalizados (criados pelo usuário), antes de executar o compatibilizador, certifique-se de que estão identificados pelo nickname. Caso o compatibilizador necessite criar índices, irá adicioná-los a partir da ordem original instalada pelo Protheus, o que poderá sobrescrever índices personalizados, caso não estejam identificados pelo nickname.
  • O compatibilizador deve ser executado com a Integridade Referencial desativada*.

Atenção

O procedimento a seguir deve ser realizado por um profissional   qualificado como Administrador de Banco de Dados (DBA) ou equivalente!

A ativação indevida da Integridade Referencial pode alterar   drasticamente o relacionamento entre tabelas no banco de dados. Portanto,   antes de utilizá-la, observe atentamente os procedimentos a seguir:

  1. No   Configurador (SIGACFG), veja se a empresa utiliza Integridade   Referencial, selecionando a opção Integridade/Verificação   (APCFG60A).
  2. Se não   há Integridade Referencial ativa,   são relacionadas em uma nova janela todas as empresas e filiais cadastradas   para o sistema e nenhuma delas estará selecionada. Neste caso, E SOMENTE NESTE, não é necessário   qualquer outro procedimento de ativação   ou desativação de integridade, basta finalizar a verificação e aplicar   normalmente o compatibilizador, conforme instruções.
  3.  Se há Integridade Referencial ativa   em todas as empresas e filiais, é   exibida uma mensagem na janela Verificação   de relacionamento entre tabelas. Confirme a mensagem para que a   verificação seja concluída, ou;
  4.  Se   há Integridade Referencial ativa   em uma ou mais empresas, que não   na sua totalidade, são relacionadas em uma nova janela todas as empresas e   filiais cadastradas para o sistema e, somente, a(s) que possui(em)   integridade está(arão) selecionada(s). Anote qual(is) empresa(s) e/ou   filial(is) possui(em) a integridade ativada e reserve esta anotação para   posterior consulta na reativação (ou ainda, contate nosso Help Desk Framework   para informações quanto a um arquivo que contém essa informação).
  5. Nestes   casos descritos nos itens “iii” ou   “iv”, E SOMENTE NESTES CASOS, é necessário desativar tal integridade, selecionando a opção Integridade/ Desativar (APCFG60D).
  6.  Quando desativada a Integridade Referencial,   execute o compatibilizador, conforme instruções.
  7. Aplicado o compatibilizador, a Integridade   Referencial deve ser reativada, SE E   SOMENTE SE tiver sido desativada, através da opção Integridade/Ativar (APCFG60). Para isso, tenha em mãos as   informações da(s) empresa(s) e/ou filial(is) que possuía(m) ativação da   integridade, selecione-a(s) novamente e confirme a ativação.

Contate o Help Desk Framework EM CASO DE DÚVIDAS!

  1. Em Microsiga Protheus TOTVS Smart Client (se versão 10), digite o nome do compatibilizador no campo Programa Inicial. Descreva se o compatibilizador deve ter uma data específica ou superior para que a atualização nos dicionários seja efetuada corretamente. Importante: Para a correta atualização do dicionário de dados, certifique-se que a data do compatibilizador seja igual ou superior a ___/___/____.
  2. Clique em OK para continuar.
  3. Após a confirmação é exibida uma tela para a seleção da empresa em que o dicionário de dados será modificado ou é apresentada a janela para seleção do compatibilizador. Selecione o programa xxxx().
  4. Ao confirmar é exibida uma mensagem de advertência sobre o backup e a necessidade de sua execução em modo exclusivo.
    1. Clique em Processar para iniciar o processamento. O primeiro passo da execução é a preparação dos arquivos.
      É apresentada uma mensagem explicativa na tela.
    2. Em seguida, é exibida a janela Atualização concluída com o histórico (log) de todas as atualizações processadas. Nesse log de atualização são apresentados somente os campos atualizados pelo programa. O compatibilizador cria os campos que ainda não existem no dicionário de dados.
    3. Clique em Gravar para salvar o histórico (log) apresentado.
    4. Clique em OK para encerrar o processamento.

Descreva se há algum procedimento necessário após a aplicação do compatibilizador.

Procedimento para Implantação

O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.

  1. Aplique o patch do chamado e execute uma vez a rotina Informe o nome da rotina.
  2. No módulo SIGAMDT acesse Miscelânea\Arquivos\eSocial e verifique que o parâmetro informe o nome do parâmetro é criado conforme especificações abaixo:

Nome da Variável:

Informe o Nome da Variável

Tipo:

Informe o Tipo

Descrição:

Informe a Descrição

Valor Padrão:

Informe o Valor Padrão

Atualizações do Compatibilizador

(Apenas para Microsiga Protheus, versões anteriores à versão 12)

  1. Criação ou Alteração de Perguntas no arquivo SX1 – Cadastro de Perguntes:

Pergunte

(X1_PERGUNT)

Nome

 

Grupo

(X1_GRUPO)

Ordem

(X1_ORDEM)

Tipo

(X1_TIPO)

Tamanho

(X1_TAMANHO)

2.    Criação ou Alteração de tabela no arquivo SX2– Tabelas:

Chave

Nome

Modo

PYME

B04

(X2_CHAVE)

Dente/Região

(X2_NOME)

C

(X2_MODO)

N

(X2_PYME)

3.  Criação ou Alteração de Tabelas Genéricas no arquivo SX5 – Tabelas Genéricas:

Chave

Ex.: AR

Descrição

Ex.: Tabela de IR de Aplicações Financeiras

4.  Criação ou Alteração (mantenha somente a instrução correspondente) de Campos no arquivo SX3 – Campos:

  • Tabela BGD - Prod x Cob x Proc x Co-Part:

Campo

(X3_CAMPO)

Tipo

(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

Importante:

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

5.  Criação ou Alteração de Consulta Padrão no arquivo SXB – Consulta Padrão:

  • Pesquisa B05PLS:

Alias

(XB_ALIAS)

Tipo

(XB_TIPO)

Sequência

(XB_SEQ)

Coluna

(XB_COLUNA)

Descrição

(XB_DESCRI)

Contém

(XB_CONTEM)

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

Índice

AA1

Ordem

6

Chave

AA1_FILIAL+AA1_CODVEN

Descrição

Cod. Vendedor

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)

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

  • Tabela BD5 – Contas Médicas:

Campo

Informe o conteúdo do (X7_CAMPO)

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

 

  1. No Configurador (SIGACFG), acesse Ambientes/Cadastros/Parâmetros (CFGX017). Crie/configure o(s) parâmetro(s) a seguir:

Itens/Pastas

Descrição

Nome:

MV_NG2ESOC

Tipo:

Numérico

Cont. Por.:

2

Descrição:

Indica se o sistema de Medicina e Seguranca do Trabalho ira gerar registros no modulo integrador Totvs (SIGATAF). 1 = Sim, 2 = Nao

 

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

. Adaptações efetuadas no dicionário do módulo de Medicina e Segurança do Trabalho para o funcionamento dos Eventos 1060, 2210, 2220, 2240 e 2241 e o wizard de importação criados para o eSocial.

Implementação na rotina de Acidentes (MDTA640):

  • criada tabela inferior que junta as Despesas e o CID Complementar separado em abas;
  • criada as abas de Agente Causador e Parte do Corpo Atingida;
  • criado o campo Cod. Acidente (TNC_TPACID);
  • criado o campo Cod. País(TNC_CODPAI), Descrição (TNC_DESPAI);
  • criado o campo Cod. Postal (TNC_CODPOS);
  • criado o campo Tipo Inscr. (TNC_NRINSC) e o campo Num. Inscr. (TNC_TPINSC), ambos ficam habilitados apenas se o campo Emitente (TNC_EMITEN) for diferente de 1-Empregador.

Implementação na rotina de Ambiente Físico (MDTA165):

  • o botão de Radiação de Fuga que estava dentro do menu de Outras Ações foi desativado e a tabela passou a existir na tela do Ambiente Físico
  • no momento da migração de versão, o sistema analisará na rotina de Riscos (MDTA180) quais os agentes que estão no mesmo risco que os ambientes. Sendo assim, o sistema irá gravar todos os agentes de risco que estão no mesmo ambiente. físico em questão. Posteriormente a migração, é possível acessar a rotina de Ambiente Físico e incluir novos registros na tabela de Ambiente x Agente (TYG);
  • criação do campo Valid.Inic. (TNE_DTVINI) que vai definir a data de início da avaliação do ambiente.
  • alteração da rotina que passa a funcionar em modo MVC.

Implementação na rotina de Objetos Causadores de Acidentes (MDTA605):

  • alteração da rotina que passa a funcionar em modo MVC.
  • o campo Obj. eSocial (TNH_ESOC) está visível;
  • o campo Sit. eSocial (TNH_ESOC1) está visível;

Implementação na rotina de Riscos (MDTA180):

  •  apenas os ambientes que estão relacionados ao agente informado é que poderão ser selecionados.

Implementação na rotina de Exames por Agente (MDTA035):

  • criado o campo Interpr. (TMB_INTERP) com as opções 1- EE, 2-SC e 3-SC+;

Implementação na rotina de Agente (MDTA182):

  • o campo Cod. eSocial (TMA_ESOC) está visível;

Implementação na rotina de CNES (MDTA880):

  • criado o campo Form. Cont. (TIL_FRMCTT);
  • criado o campo Email (TIL_EMAIL);

Implementação na rotina de Atestado (ASO) (MDTA200):

  • criado o campo Cód. CNES  (TMY_CNES);
  • criado o campo Estabelecim. (TMY_ESTAB);

Implementação na rotina de Risco x EPC (MDTA265):

  • criado o campo EPC Eficaz? (TO9_EFIEPC);

Implementação na rotina de Tipo de Acidentes (MDTA600):

  • o campo Cod. eSocial (TNG_ESOC) está visível;

Implementação na rotina de Natureza da Lesão (MDTA182):

  • o campo Cod. eSocial (TOJ_ESOC) está visível;

Implementação na rotina de Parte do Corpo Atingida (MDTA182):

  • o campo Cod. eSocial (TOI_ESOC) está visível;

Atualizações do Compatibilizador


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


Chave

Nome

Modo

PYME

TYEAgente CausadorEN

Chave

Nome

Modo

PYME

TYF

Parte Atingida

E

N

Chave

Nome

Modo

PYME

TYG

Ambiente x Agente

E

N


2.1  Alteração de Campos no arquivo SX3 – Campos:


  • Tabela TI7 - Radiação de Fuga

Campo

TI7_CODAMB

UsadoNão
ObrigatórioNão
BrowseNão



  • Tabela TMA - Agentes

Campo

TMA_ESOC

Tipo

Caracter

Tamanho

9

Formato

@! 

Título

Cod. eSocial

Descrição

Código eSocial           

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Consulta Padrão

MDTT3E

Val. Sistema

MDTeSocVal( 'T3E', 'TMA', 2, 3, M->TMA_ESOC )                                                         

Help

Informar o código eSocial do agente.

MóduloSIGAMDT


  • Tabela TNG- Tipos de Acidentes


Campo

TNG_ESOC

Tipo

Caracter

Tamanho

9

Formato

@! 

Título

Cod. eSocial

Descrição

Código eSocial           

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Consulta Padrão

MDTC8L

Val. Sistema

MDTeSocVal('C8L', 'TNG', 2, 3, M->TNG_ESOC)                       

Help

Informar o código eSocial do tipo de acidente.

MóduloTODOS


  • Tabela TNH - Objeto Causador


Campo

TNH_ESOC
TNH_ESOC1

Tipo

Caracter

Caracter

Tamanho

9

9

Formato

@!

@!

Título

Cod. eSocial

Sit. eSocial

Descrição

Código eSocial           

Código eSocial     

Nível

1

1

Usado

Sim
Sim

Obrigatório

Não

Não

Browse

Não

Não

When

MDT605WHEN(1)

MDT605WHEN(2)

Val. Sistema

MDTeSocVal('C8J', 'TNH', 2, 3, M->TNH_ESOC)

MDTeSocVal('C8K', 'TNH', 2, 4, M->TNH_ESOC1)

Help

Informar o código eSocial dos objetos.

Informar o código eSocial da Situação Geradora da Doença.

MóduloSIGAMDTSIGAMDT


  • Tabela TOI - Parte do Corpo Atingida


Campo

TOI_ESOC

Tipo

Caracter

Tamanho

9

Formato

@! 

Título

Cod. eSocial

Descrição

Código eSocial 

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Consulta Padrão

MDTC8I

Val. Sistema

MDTeSocVal('C8I', 'TOI', 2, 3, M->TOI_ESOC)                                                               

Help

Informar o código eSocial de partes.

Módulo

SIGAMDT


  • Tabela TOJ - Natureza da Lesão


Campo

TOJ_ESOC

Tipo

Caracter

Tamanho

9

Formato

@!                                           

Título

Cod. eSocial

Descrição

Código eSocial           

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Consulta Padrão

MDTC8M

Val. Sistema

MDTeSocVal('C8M', 'TOJ', 2, 3, M->TOJ_ESOC)       

Help

Informar o código eSocial da natureza.

Módulo

SIGAMDT


  • Tabela TNC– Acidentes de Trabalho


Campo

TNC_CODOBJ

TNC_DESOBJ

TNC_CODPAR

TNC_DESPAR

TNC_INDLOC

Tipo

Caracter

Caracter

Caracter

Caracter

Caracter

Tamanho

12

20

12

30

1

Formato

@!

@!

@!

@!

@!

Título

Objeto Caus.

Desc. Objeto

Codigo Parte

Desc. Parte 

Ind. Local

Descrição

Objeto Causador          

Descricao Objeto Causador

Codigo Parte Atingida    

Desc. Parte 

Local Acidente

Nível

1

1

1

1

1

Usado

Não

Não

Não

Não

Sim

Obrigatório

Não

Não

Não

Não

Não

Browse

Não

Não

Não

Não

Não

Relação


TNH->(VDISP(TNC->TNC_CODOBJ,"TNH_DESOBJ"))                                                                                      


TOI->(VDISP(TNC->TNC_CODPAR,'TOI_DESPAR'))                                                                                      


Opções Combo Box



1=Estab da Empresa;2=Onde Presta Servico;3=Via publica;4=Area rural;5=Embarcacao;6=Exterior;9=Outros;                           
Consulta Padrão

TNH


TOI



Val. Sistema

EXISTCPO("TNH",M->TNC_CODOBJ) 


IF(VAZIO(),.t.,ExistCpo("TOI",M->TNC_CODPAR))                                                                                   


PERTENCE("123459")

Help

Código do objeto causador do acidente. Agente causador diretamente relacionado ao acidente. Podendo ser máquina, equipamento ou ferramenta como uma prensa ou uma injetora, ou produtos químicos.

Descrição do objeto causador de Acidente. Campo alimentado automaticamente pelo módulo de Medicina e Segurança do Trabalho com base no campo Objeto Causador.

Código da Parte do Corpo Atingido no Acidente. Pressione as teclas [Enter]+[F3] para selecionar uma parte do corpo.

Descrição da parte atingida no acidente.

Indica o local do acidente, sendo:

1= Em estabelecimento da empregadora;

2= Em empresa onde presta serviço;

3= Em via pública;

4= Em área Rural;

5= Outros.


  • Tabela TN0 - Riscos

Campo

TN0_CODAMB

TN0_AGENTE

Tipo

CaracterCaracter

Tamanho

66
Formato@!                                           @!   

Título

Ambiente

Agente
DescriçãoCodigo do Ambiente FisicoCodigo do Agente Risco   

Nível

11

Usado

SimSim
ObrigatórioNãoSim
BrowseNãoSim
When(Type('lTrava902') == 'L' .AND. lTrava902)                  DTVALIDA                                                    
Consulta PadrãoTYGTMA

Val. Sistema

MDT180AMB(1)

MDT180AMB(2) .And. MDT180MuAg() 
Help

Código do Ambiente fisico da empresa onde o risco esta localizado. Pressione as teclas [Enter]+[F3] para selecionar o Ambiente.

Código do Agente causador do risco. Pressione as teclas [Enter]+[F3] para selecionar um Agente.


2.2  Criação de Campos no arquivo SX3 – Campos:

  • Tabela TYG -  Ambiente x Agente


Campo

TYG_FILIAL
TYG_CODAMBTYG_AGENTETYG_NOMAGE

Tipo

Caracter

CaracterCaracterCaracter

Tamanho

8

69

40

Formato

                                

@! @! @! 

Título

Filial

Cod. AmbientAgente

Nome Agente

Descrição

Filial do Sistema

Código do Ambiente

Código do Agente de Risco

Nome do Agente de Risco

Nível

1111

Usado

Não
Não
SimSim

Obrigatório

Não
NãoNãoNão

Browse

Não

NãoNãoNão
Relação


IF( INCLUI,'',POSICIONE( 'TMA', 1, XFILIAL( 'TMA' ) + TYG->TYG_AGENTE, 'TMA_NOMAGE'))                 

Consulta Padrão


TNETMA

Val. Sistema


EXISTCPO("TNE",M->TYG_CODAMB)                                                                                                   EXISTCPO('TMA',M->TYG_AGENTE)                                                                                                   

Help

Código da Filial da Empresa. Campo alimentado automaticamente pelo módulo de Medicina e Segurança do Trabalho com base no campo filial.

Código do Ambiente Físico que Será Associado ao Agente de Risco

Código que irá identificar o agente de risco.

Nome do Agente de Risco.

Módulo

SIGAMDTSIGAMDT


  • Tabela TYF – Parte Atingida


Campo

TYF_FILIAL

TYF_ACIDENTYF_CODPARTYF_DESPARTYF_LATERA

Tipo

Caracter

CaracterCaracterCaracterCaracter

Tamanho

8

6121601

Formato


999999@!@!

Título

Filial

AcidenteCodigo ParteDesc. Parte Lateralidade

Descrição

Filial do Sistem        

Numero Acidente Trabalho 

Codigo Parte AtingidaDescrição Parte          Lateralidade

Nível

1

1111
Relação
M->TNC_ACIDEN
TOI->(VDISP(TYF->TYF_CODPAR,'TOI_DESPAR'))

Usado

Não

SimSimSimSim

Obrigatório

NãoNãoNãoNãoNão

Browse

NãoNãoSimNãoNão
Opções



0=Nao Aplicavel;1=Esquerda;2=Direita;3=Ambas 

Consulta Padrão



TOI

Val. Sistema



IF(VAZIO(),.t.,ExistCpo("TOI",M->TNC_CODPAR))

Help

Código da Filial da Empresa. Campo alimentado automaticamente pelo módulo de Medicina e Segurança do Trabalho com base no campo filial.

Código do acidente de trabalho.Código da parte do corpo da vítima atingida no acidente.Descrição da parte do corpo da vítima atingida no acidente.Lado do corpo em que a vítima foi atingida.
Módulo
TODOSTODOSTODOSTODOS


  • Tabela TYE – Agente Causador

Campo

TYE_FILIAL

TYE_ACIDENTYE_CAUSATYE_DESCAU

Tipo

Caracter

CaracterCaracterCaracter

Tamanho

8

61240

Formato


999999@!@!

Título

Filial

Acidente

Agente Causa

Descr. Causa

Descrição

Filial do Sistem

Numero Acidente Trabalho 

Agente Causador de Acid. 

Descrição Causador Acid. 

Nível

1

111

Usado

Não

SimSimSim

Obrigatório

NãoNãoNãoNão

Browse

NãoNãoSimNão
Opções



Relação
M->TNC_ACIDEN 
TNH->(VDISP(TYE->TYE_CAUSA,"TNH_DESOBJ"))

Consulta Padrão



TNH

Val. Sistema



EXISTCPO("TNH",M->TYE_CAUSA)

Help

Código da Filial da Empresa. Campo alimentado automaticamente pelo módulo de Medicina e Segurança do Trabalho com base no campo filial.

Código do acidente de trabalho.Código do agente causador do acidente de trabalho.Descrição do agente causador do acidente de trabalho.
Módulo
TODOSTODOSTODOS


  • Tabela TIL – Cadastro CNES

Campo

TIL_FRMCTT

TIL_EMAIL

Tipo

Caracter

Caracter

Tamanho

100

60
Formato@!@!

Título

Forma Contat

Email

Descrição

Forma de Contato

Email de Contato

Nível

1

1

Usado

Sim

Sim

Obrigatório

SimNão

Browse

NãoNão

Help

Indique a forma de contato.

Indique o E-mail.

MóduloTODOSTODOS


  • Tabela TMB – Exames por Agente

Campo

TMB_INTERP

Tipo

Caracter

Tamanho

1

Formato

@ 9

Título

Interpr.

Descrição

Interpretação do Exame

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não
Opções1=EE;2=SC;3=SC+

Help

Indique a interpretação do exame, podendo ser: 1=EE, 2=SC ou 3=SC+.

MóduloTODOS


  • Tabela TMY– Atestado Saúde Ocupacional

Campo

TMY_CNES

TMY_ESTAB

Tipo

Caracter

Caracter

Tamanho

7

80

Formato

@ 9999999

@!

Título

Cód. CNES

Estabelecim.

Descrição

Código de CNES

Estabelcimento do CNES

Nível

1

1

Usado

Sim

Sim

Obrigatório

NãoNão

Browse

NãoNão
Consulta PadrãoTIL
Val. SistemaEmpty(M->TMY_CNES) .Or. ExistCPO('TIL',M->TMY_CNES)    

Help

Indique o código de CNES (Cadastro Nacional de Estabelecimentos de Saúde).

Estabelecimento cadastrado no CNES.
MóduloTODOSTODOS


  • Tabela TNE - Ambiente Físico

Campo

TNE_DTVINI

Tipo

Data

Tamanho

8

Formato

Título

Valid.Inic. 

Descrição

Data de Validade Inicial

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Help

Data de início da avaliação do ambiente.

MóduloSIGAMDT


  • Tabela TO9 - EPC x Riscos

Campo

TO9_EFIEPC

Tipo

Caracter

Tamanho

1

Formato


Título

EPC Eficaz? 

Descrição

Eficiência do EPC         

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não
Opções1=Sim;2=Não 

Help

Indica se o EPC é eficaz na neutralização dos riscos ao trabalhador.

MóduloTODOS


  • Tabela TNC– Acidentes de Trabalho


Campo

TNC_TPACID

TNC_CODPAITNC_DESPAITNC_CODPOSTNC_TPINSCTNC_NRINSC

Tipo

Caracter

CaracterCaracterCaracterNuméricoCaracter

Tamanho

6

62206115

Formato

@!     

@! @! @! 
@!

Título

Cod. Acid.    

Cod. País DescriçãoCód. Postal    Tipo Inscri.Num. Inscri.

Descrição

Codificação Acidente

Código do País   DescriçãoCódigo Postal Tipo de InscriçãoNumero da Inscrição

Nível

1

11111

Usado

Sim

SimSimSimSim

Sim

Obrigatório

NãoNãoNãoNãoNãoNão

Browse

NãoNãoNãoNãoNãoNão
Consulta PadrãoLE5C08



Val. SistemaIf(!Empty(M->TNC_TPACID),ExistCpo("LE5",M->TNC_TPACID),.T.)xFunVldCmp("C08",3)                                                                                                             



Help

Determina a codificação conforme Tabela 24 do eSocial.

Determina o código do País.Descrição do país.Determina o código postal.Selecionar o código correspondente ao tipo de inscrição do registrador da CAT.Informar o número de inscrição do registrador, de acordo com o tipo de inscrição indicado no campo Tipo Inscri.
MóduloTODOSTODOSTODOSTODOSTODOSTODOS


3.  Criação de Parâmetros no arquivo SX6 – Parâmetros:


Nome da Variável

MV_NG2RIST

Tipo

Caracter

Descrição

Indica os tipos de Riscos que serão enviados ao TAF, além dos Riscos obrigatórios. 1= Ergonômicos, 2= Mecânicos/Acidentes, 3= Ambos. 

Valor Padrão

3

Nome da Variável

MV_NG2REST

Tipo

Caracter

Descrição

Indica que tipo de Responsável Ambiental será enviado ao TAF. 1=Médico Trabalho, 2=Engenheiro Trabalho, 3=Ambos, 4=Todos.  

Valor Padrão

3

Nome da Variável

MV_NG2TDES

Tipo

Caracter

Descrição

Indica qual a descrição que o sistema deve considerar na rotina de Condições Ambientais de Trabalho no TAF. 1= Cargo. 2= Função.   

Valor Padrão

2


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

  • Tabela TYG - Ambiente x Agente

Campo

TYG_AGENTE

Sequência

001

Contra Domínio

TYG_NOMAGE      

Tipo


Regra

TMA->TMA_NOMAGE

Chave

xFILIAL("TMA")+M->TYG_AGENTE 

ProprietárioS


  • Tabela TMY– Atestado Saúde Ocupacional

Campo

TMY_CNES

Sequência

001

Contra Domínio

TMY_ESTAB

Tipo

Primário

Regra

TIL->TIL_ESTAB

Posiciona?

Sim

Chave

xFilial("TIL")+M->TMY_CNES

ProprietárioSistema


  • Tabela TNC – Acidentes de Trabalho

Campo

TNC_EMITEN

TNC_EMITEN

Sequência

001

002

Contra Domínio

TNC_TPINSC

TNC_NRINS

Tipo

Primário

Primário

Regra

Space(TamSX3("TNC_TPINSC")[1])

Space(TamSX3("TNC_NRINSC")[1])

Posiciona?

Não

Não
ProprietárioSistemaSistema


 Exclusão de Gatilhos no arquivo SX7 – Gatilhos:

  • Tabela TNC– Acidentes de Trabalho

Campo

TNC_CODPAR

TNC_CODOBJ

Sequência

001

001


7.  Criação de Relacionamento entre Tabelas no arquivo SX9 – Relacionamento Entre Tabelas:

  • TNCC08 – Acidentes de Trabalho | Países Bco Central/Siscomex 
Tabela DomínioC08
Sequencial28
Contra-DomínioTNC
Relacionamento DomínioC08_ID
Relacionamento Contra-DomínioTNC_CODPAI
PrioridadeSistema
Cardinalidade Domínio1
Cardinalidade Contra-DomínioN
Condição SQL" "
Utiliza Filial na ChaveNão
Relacionamento AtivoSim


  • TNCLE5 – Acidentes de Trabalho | Codificação Acidente Trabalho 
Tabela DomínioLE5
Sequencial02
Contra-DomínioTNC
Relacionamento DomínioLE5_ID
Relacionamento Contra-DomínioTNC_TPACID
PrioridadeSistema
Cardinalidade Domínio1
Cardinalidade Contra-DomínioN
Condição SQL" "
Utiliza Filial na ChaveNão
Relacionamento AtivoSim


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

  • Pesquisa MDTT3E

Alias

MDTT3E

MDTT3EMDTT3EMDTT3EMDTT3E

Tipo

1

2445

Sequência

01

01010101

Coluna

DB

010102

Descrição

Agente Causador

IdCodigoDescricao

Contém

T3E 


T3E_CODIGOT3E_DESCRIT3E->T3E_CODIGO


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

Índice

TYG

Ordem

1

Chave

TYG_FILIAL+TYG_CODAMB+TYG_AGENTE  

Descrição

Cod. Ambiente + Agente

Índice

TYG

Ordem

2

Chave

TYG_FILIAL+TYG_AGENTE+TYG_CODAMB 

Descrição

Agente + Cod. Ambiente 

Procedimento para Configuração

 

CONFIGURAÇÃO DE MENUS

1.  No Configurador (SIGACFG), acesse Ambientes/Cadastro/Menu (CFGX013). Informe a nova opção de menu do SIGAMDT, conforme instruções a seguir:

Menu

Miscelanea

Submenu

Arquivos

Nome da Rotina

Conciliação eSocial

Programa

MDTA890

Módulo

SIGAMDT

Procedimento para Utilização

Observação: Ambiente antes da Atualização.

  1. No Medicina e Segurança do Trabalho (SIGAMDT), acesse Atualizações\Ppra\Agentes, incluir um agente.
  2. Em Atualizações\Acidente Trabalho\Tipos de Acidentes, incluir um tipo de acidente.
  3. Em Atualizações\Acidente Trabalho\Obj. causador Acid., incluir um objeto causador.
  4. Em Atualizações\Acidente Trabalho\Natureza da Lesao, incluir uma natureza da lesão.
  5. Em Atualizações\Acidente Trabalho\Parte Corpo Atingi., incluir uma parte do corpo atingida.
  6. Em Atualizações\Acidentes de Trabalho\Acidentes, cadastrar um acidente com as informações cadastradas acima.
  7. Em Atualizações\Ppra\ Agentes, incluir três agentes.
  8. Em Atualizações\Ppra\ Ambiente Físico, incluir três ambientes.
  9. Em Atualizações\Ppra\Riscos, cadastrar três riscos relacionados aos ambientes e agentes cadastrados.

Observação: Ambiente depois da Atualização.

  1. Entrar no módulo de Medicina e Segurança do Trabalho(SIGAMDT).
  2. Em Atualizações\Ppra\Ambientes Fisico, verificar que o sistema relacionou os agentes do risco ao ambiente na tela inferior de Ambiente x Agente.
  3. Em Atualizações\Acidentes de Trabalho\Acidentes, verificar que as pastas na parte inferior do cadastro trazem os registros de parte do corpo atingida e agente causador. 
  4. Em Miscelânia\Arquivos\Conciliação eSocial (MDTA890), relacionar os códigos do e-Social aos registros cadastrados. 
  5. Em Atualizaçõs\Ppra\Riscos, incluir um risco relacionado ao ambiente cadastrado, verificar que a função F3 do campo de ambiente físico traz apenas os ambientes relacionados ao agente selecionado.
  6. Em Atualizações\Acidentes de Trabalho\Acidentes, incluir um acidente e verificar que os campo Tp. Acidente (TNC_TPACID), Cod. País(TNC_CODPAI), Descrição (TNC_DESPAI) e Cód. Postal (TNC_CODPOS) criados são mostrados em tela e os campos TNC_TPACID e TNC_CODPAI tem as consultas padrão das tabelas LE5 e C08 respectivamente. Verificar também que os campos Objeto Caus. (TNC_CODOBJ), Desc. Objeto (TNC_DESOBJ), Codigo Parte (TNC_CODPAR) e Desc. Parte (TNC_DESPAR) não são apresentados por terem sido passados para não usado. (Obs: Para poder alterar o código do país, o campo Ind. Local deve estar diferente de 1)
  7. Em Atualizações\Ppra\Agentes, Verificar que o campo Cód. eSocial está com a consulta padrão da tabela T3E.
  8. Em Atualizações\Acidentes de Trabalho\Objeto Causador, verificar que nos campos Obj. eSocial e Sit. eSocial, quando um dos campos é preenchido o outro campo é fechado.
  9. Em Atualizações\Cadastros Básicos\CNES, verificar que os campos criados Form. Cotat e Email, aparecem em tela.
  10. Em Atualização\Pcmso\Exames Por Agente, verificar que o campo criado, Interper., aparece em tela.
  11. Em Atualizações\Atendimento Médico\Atestado (Aso), verificar que os campos criados, Cód. CNES (TMY_ESTAB) e  Estabelecim.(TMY_ESTAB), aparecem em tela. Verificar que o campo de CNES possui a consulta padrão da tabela TIL (Cadastro CNES).
  12. Em Atualizações\Ppra\Ambiente Físico, verificar que o campo criado,Valid. Inic.(TNE_DTVINI), aparece em tela.
  13. Em Atualizações\Ppra\Risco x Epc, verificar que o campo criado, Epc Eficaz? (TO9_EFIEPC), aparece em tela. 
  • 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