Histórico da Página
Rotina de adaptação de registros das tabelas com 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: |
| ||||
Cadastros Iniciais: | Agentes; Tipo de Acidente; Objeto Causador; Natureza da Lesão; Parte do corpo Atingida. | ||||
Parâmetro(s): | MV_NG2ESOC | ||||
País(es): | Brasil | ||||
Banco(s) de Dados: | Todos | ||||
Tabelas Utilizadas: | C98, TMA, C8L, TNG, C8J, TNH, C8K, C8I, TOI, C8M, TOJ | ||||
Sistema(s) Operacional(is): | Todos | ||||
Pacote: | É necessário a atualização do dicionário em: https://suporte.totvs.com/portal/p/10098/download?e=677771 |
Descrição
Criada nova a rotina Conciliação eSocial (MDTA890), que oferece 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, " TNH " - Objeto Causador do Acidente e ", TOI " - Parte do Corpo Atingida , "e TOJ " - Natureza da Lesão. Adaptações efetuadas no dicionário do módulo de Medicina e Segurança do Trabalho para o funcionamento dos eventos 1060 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
Criação de tabela no arquivo SX2 – Tabelas:
Chave | Nome | Modo | PYME |
TYE | Agente Causador | E | N |
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 |
Usado | Não |
Obrigatório | Não |
Browse | Nã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ódulo | SIGAMDT |
- 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) |
Atualizações do Compatibilizador
Criação de tabela no arquivo SX2 – Tabelas:
Chave
Nome
Modo
PYME
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 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.
- Tabela TNH - Objeto Causador
Campo
TNH_ESOC
TNH_ESOC1
Tipo
Caracter
Tamanho
9
Formato
@!
Título
Cod. eSocial
Descrição
Código eSocial
Nível
1
Usado
Sim
Sim
Obrigatório
Não
Browse
Não
When
MDT605WHEN(1)
Val. Sistema
MDTeSocVal('C8J', 'TNH', 2, 3, M->TNH_ESOC)
Help
Informar o código eSocial dos objetos.
Informar o código eSocial da Situação Geradora da Doença.
- 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.
- 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.
- Tabela TNC– Acidentes de Trabalho
Campo
TNC_CODOBJ
TNC_DESOBJ
TNC_CODPAR
TNC_DESPAR
Tipo
Caracter
Tamanho
12
Formato
@!
Título
Objeto Caus.
Descrição
Objeto Causador
Nível
1
Usado
Não
Obrigatório
Não
Browse
Não
Relação
|
Help | Informar o código eSocial do tipo de acidente. |
Módulo | TODOS |
- 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 |
Val. Sistema
EXISTCPO("TNH",M->TNC_CODOBJ)
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.
2.2 Criação de Campos no arquivo SX3 – Campos:
- Tabela TYG - Ambiente x Agente
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ódulo | SIGAMDT | SIGAMDT |
- 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) |
Campo
TYG_FILIAL
Tipo
Caracter
Tamanho
8
40
Formato
|
Título
Filial
Nome Agente
Descrição
Filial do Sistema
Código do Ambiente
Código do Agente de Risco
Nome do Agente de Risco
Nível
Usado
Sim
Obrigatório
Sim
Browse
Consulta Padrão
Val. Sistema
Help
- Tabela TYF – Parte Atingida
Campo
TYF_FILIAL
Tipo
Caractere
Tamanho
8
Título
Filial
Descrição
Filial do Sistem
Usado
Sim
Obrigatório
Sim
Campo
TYF_ACIDEN
Tipo
Caractere
Tamanho
6
Título
Acidente
Descrição
Numero Acidente Trabalho
Usado
Sim
Obrigatório
Sim
Campo
TYF_CODPAR
Tipo
Caractere
Tamanho
12
Título
Codigo Parte
Descrição
Codigo Parte Atingida
Usado
Sim
Obrigatório
Sim
Campo
TYF_DESPAR
Tipo
Caractere
Tamanho
160
Título
Desc. Parte
Descrição
Descrição Parte
Usado
Sim
Obrigatório
Sim
Campo
TYF_LATERA
Tipo
Caractere
Tamanho
1
Título
Lateralidade
Descrição
Lateralidade
Usado
Sim
Obrigatório
Sim
- Tabela TYE – Agente Causador
Campo
TYE_FILIAL
Tipo
Caractere
Tamanho
8
Título
Filial
Descrição
Filial
Usado
Sim
Obrigatório
Sim
Campo
TYE_ACIDEN
Tipo
Caractere
Tamanho
6
Título
Acidente
Descrição
Numero Acidente Trabalho
Usado
Sim
Obrigatório
Sim
Campo
TYE_CAUSA
Tipo
Caractere
Tamanho
12
Título
Agente Causa
Descrição
Agente Causador de Acid.
Usado
Sim
Obrigatório
Sim
Campo
TYE_DESCAU
Tipo
Caractere
Tamanho
40
Título
Descr. Causa
Descrição
Descrição Causador Acid.
Usado
Sim
Obrigatório
Sim
- Tabela TIL – Cadastro Cnes
Campo
TIL_FRMCTT
Tipo
Caractere
Tamanho
100
Título
Form. Contat
Descrição
Forma de Contato
Usado
Sim
Obrigatório
Sim
Campo
TIL_EMAIL
Tipo
Caractere
Tamanho
60
Título
Descrição
Email de Contato
Usado
Sim
Obrigatório
Não
- Tabela TMB – Exames por Agente
Campo
TMB_INTERP
Tipo
Caractere
Tamanho
1
Título
Interpr.
Descrição
Interpretação do Exame
Usado
Sim
Obrigatório
Não
Help
Indique a interpretação do exame, podendo ser: 1=EE, 2=SC ou 3=SC+.
- Tabela TMY– Atestado Saúde Ocupacional
Campo
TMY_CNES
Tipo
Caractere
Tamanho
7
Decimal
0
Título
Cód. CNES
Descrição
Código de CNES
Usado
Sim
Obrigatório
Não
Campo
TMY_ESTAB
Tipo
Caractere
Tamanho
80
Decimal
0
Título
Estabelecim.
Descrição
Estabelcimento do CNES
Usado
Sim
Obrigatório
Não
- Tabela TNE - Ambiente Físico
Campo
TNE_DTVINI
Tipo
Data
Tamanho
8
Título
Valid.Inic.
Descrição
Data de Validade Inicial
Usado
Sim
Obrigatório
Não
Browse
Não
- Tabela TO9 - EPC x Riscos
Campo
TO9_EFIEPC
Tipo
Caractere
Tamanho
1
Título
Eficiência do EPC
Descrição
EPC Eficaz?
Usado
Sim
Obrigatório
Não
Browse
Não
- Tabela TNC– Acidentes de Trabalho
Campo
TNC_TPACID
Tipo
Caractere
Tamanho
6
Título
Cod. Acid.
Descrição
Codificação Acidente
Usado
Sim
Obrigatório
Não
Campo
TNC_CODPAI
Tipo
Caractere
Tamanho
6
Título
Cod. País
Descrição
Código do País
Usado
Sim
Obrigatório
Não
Campo
TNC_DESPAI
Tipo
Caractere
Tamanho
220
Título
Descrição
Descrição
Descrição
Usado
Sim
Obrigatório
Não
Campo
TNC_CODPOS
Tipo
Caractere
Tamanho
6
Título
Cód. Postal
Descrição
Código Postal
Usado
Sim
Obrigatório
Não
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
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
4. Criação de Gatilhos no arquivo SX7 – Gatilhos:
- Tabela TYG - Ambiente x Agente
Campo
TYG_AGENTE
Sequência
001
Campo Domínio
TYG_NOMAGE
Tipo
Informe o conteúdo do (X7_TIPO)
Regra
TMA->TMA_NOMAGE
Chave
xFILIAL("TMA")+M->TYG_AGENTE
- Tabela TMY– Atestado Saúde Ocupacional
Campo
TMY_CNES
Sequência
001
Campo Domínio
TMY_CNES
Tipo
Primário
Regra
TIL->TIL_ESTAB
Posiciona?
Sim
Chave
xFilial("TIL")+M->TMY_CNES
4 Exclusão de Gatilhos no arquivo SX7 – Gatilhos:
- Tabela TNC– Acidentes de Trabalho
Campo
TNC_CODPAR
Sequência
001
Campo
TNC_CODOBJ
Sequência
001
7. Criação de Relacionamento entre Tabelas no arquivo SX9 – Relacionamento Entre Tabelas:
- C08TNC – Países Bco Central/Siscomex | Acidentes de Trabalho
- LE5TNC – Codificação Acidente Trabalho | Acidentes de Trabalho
- Pesquisa MDTTE
Alias
MDTT3E
Descrição
Agente Causador
Contém
T3E->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
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 | Caracter | Caracter |
Tamanho | 6 | 6 |
Formato | @! | @! |
Título | Ambiente | Agente |
Descrição | Codigo do Ambiente Fisico | Codigo do Agente Risco |
Nível | 1 | 1 |
Usado | Sim | Sim |
Obrigatório | Não | Sim |
Browse | Não | Sim |
When | (Type('lTrava902') == 'L' .AND. lTrava902) | DTVALIDA |
Consulta Padrão | TYG | TMA |
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_CODAMB | TYG_AGENTE | TYG_NOMAGE |
Tipo | Caracter | Caracter | Caracter | Caracter |
Tamanho | 8 | 6 | 9 | 40 |
Formato |
| @! | @! | @! |
Título | Filial | Cod. Ambient | Agente | Nome Agente |
Descrição | Filial do Sistema | Código do Ambiente | Código do Agente de Risco | Nome do Agente de Risco |
Nível | 1 | 1 | 1 | 1 |
Usado | Não | Não | Sim | Sim |
Obrigatório | Não | Não | Não | Não |
Browse | Não | Não | Não | Não |
Relação | IF( INCLUI,'',POSICIONE( 'TMA', 1, XFILIAL( 'TMA' ) + TYG->TYG_AGENTE, 'TMA_NOMAGE')) | |||
Consulta Padrão | TNE | TMA | ||
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 | SIGAMDT | SIGAMDT |
- Tabela TYF – Parte Atingida
Campo | TYF_FILIAL | TYF_ACIDEN | TYF_CODPAR | TYF_DESPAR | TYF_LATERA |
Tipo | Caracter | Caracter | Caracter | Caracter | Caracter |
Tamanho | 8 | 6 | 12 | 160 | 1 |
Formato | 999999 | @! | @! | ||
Título | Filial | Acidente | Codigo Parte | Desc. Parte | Lateralidade |
Descrição | Filial do Sistem | Numero Acidente Trabalho | Codigo Parte Atingida | Descrição Parte | Lateralidade |
Nível | 1 | 1 | 1 | 1 | 1 |
Relação | M->TNC_ACIDEN | TOI->(VDISP(TYF->TYF_CODPAR,'TOI_DESPAR')) | |||
Usado | Não | Sim | Sim | Sim | Sim |
Obrigatório | Não | Não | Não | Não | Não |
Browse | Não | Não | Sim | Não | Nã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 | TODOS | TODOS | TODOS | TODOS |
- Tabela TYE – Agente Causador
Campo | TYE_FILIAL | TYE_ACIDEN | TYE_CAUSA | TYE_DESCAU |
Tipo | Caracter | Caracter | Caracter | Caracter |
Tamanho | 8 | 6 | 12 | 40 |
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 | 1 | 1 | 1 |
Usado | Não | Sim | Sim | Sim |
Obrigatório | Não | Não | Não | Não |
Browse | Não | Não | Sim | Nã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 | TODOS | TODOS | TODOS |
- Tabela TIL – Cadastro CNES
Campo | TIL_FRMCTT | TIL_EMAIL |
Tipo | Caracter | Caracter |
Tamanho | 100 | 60 |
Formato | @! | @! |
Título | Forma Contat | |
Descrição | Forma de Contato | Email de Contato |
Nível | 1 | 1 |
Usado | Sim | Sim |
Obrigatório | Sim | Não |
Browse | Não | Não |
Help | Indique a forma de contato. | Indique o E-mail. |
Módulo | TODOS | TODOS |
- 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ções | 1=EE;2=SC;3=SC+ |
Help | Indique a interpretação do exame, podendo ser: 1=EE, 2=SC ou 3=SC+. |
Módulo | TODOS |
- 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ão | Não |
Browse | Não | Não |
Consulta Padrão | TIL | |
Val. Sistema | Empty(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ódulo | TODOS | TODOS |
- 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ódulo | SIGAMDT |
- 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ções | 1=Sim;2=Não |
Help | Indica se o EPC é eficaz na neutralização dos riscos ao trabalhador. |
Módulo | TODOS |
- Tabela TNC– Acidentes de Trabalho
Campo | TNC_TPACID | TNC_CODPAI | TNC_DESPAI | TNC_CODPOS | TNC_TPINSC | TNC_NRINSC |
Tipo | Caracter | Caracter | Caracter | Caracter | Numérico | Caracter |
Tamanho | 6 | 6 | 220 | 6 | 1 | 15 |
Formato | @! | @! | @! | @! | @! | |
Título | Cod. Acid. | Cod. País | Descrição | Cód. Postal | Tipo Inscri. | Num. Inscri. |
Descrição | Codificação Acidente | Código do País | Descrição | Código Postal | Tipo de Inscrição | Numero da Inscrição |
Nível | 1 | 1 | 1 | 1 | 1 | 1 |
Usado | Sim | Sim | Sim | Sim | Sim | Sim |
Obrigatório | Não | Não | Não | Não | Não | Não |
Browse | Não | Não | Não | Não | Não | Não |
Consulta Padrão | LE5 | C08 | ||||
Val. Sistema | If(!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ódulo | TODOS | TODOS | TODOS | TODOS | TODOS | TODOS |
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ário | S |
- 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ário | Sistema |
- 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ário | Sistema | Sistema |
4 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ínio | C08 |
Sequencial | 28 |
Contra-Domínio | TNC |
Relacionamento Domínio | C08_ID |
Relacionamento Contra-Domínio | TNC_CODPAI |
Prioridade | Sistema |
Cardinalidade Domínio | 1 |
Cardinalidade Contra-Domínio | N |
Condição SQL | " " |
Utiliza Filial na Chave | Não |
Relacionamento Ativo | Sim |
- TNCLE5 – Acidentes de Trabalho | Codificação Acidente Trabalho
Tabela Domínio | LE5 |
Sequencial | 02 |
Contra-Domínio | TNC |
Relacionamento Domínio | LE5_ID |
Relacionamento Contra-Domínio | TNC_TPACID |
Prioridade | Sistema |
Cardinalidade Domínio | 1 |
Cardinalidade Contra-Domínio | N |
Condição SQL | " " |
Utiliza Filial na Chave | Não |
Relacionamento Ativo | Sim |
8. Criação de Consulta Padrão no arquivo SXB – Consulta Padrão:
- Pesquisa MDTT3E
Alias | MDTT3E | MDTT3E | MDTT3E | MDTT3E | MDTT3E |
Tipo | 1 | 2 | 4 | 4 | 5 |
Sequência | 01 | 01 | 01 | 01 | 01 |
Coluna | DB | 01 | 01 | 02 | |
Descrição | Agente Causador | Id | Codigo | Descricao | |
Contém | T3E | T3E_CODIGO | T3E_DESCRI | T3E->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.
- No Medicina e Segurança do Trabalho (SIGAMDT), acesse Atualizações\Ppra\Agentes, incluir um agente.
- Em Atualizações\Acidente Trabalho\Tipos de Acidentes, incluir um tipo de acidente.
- Em Atualizações\Acidente Trabalho\Obj. causador Acid., incluir um objeto causador.
- Em Atualizações\Acidente Trabalho\Natureza da Lesao, incluir uma natureza da lesão.
- Em Atualizações\Acidente Trabalho\Parte Corpo Atingi., incluir uma parte do corpo atingida.
- Em Atualizações\Acidentes de Trabalho\Acidentes, cadastrar um acidente com as informações cadastradas acima.
- Em Atualizações\Ppra\ Agentes, incluir três agentes.
- Em Atualizações\Ppra\ Ambiente Físico, incluir três ambientes.
- Em Atualizações\Ppra\Riscos, cadastrar três riscos relacionados aos ambientes e agentes cadastrados.
Observação: Ambiente depois da Atualização.
- Entrar no módulo de Medicina e Segurança do Trabalho(SIGAMDT).
- Em Atualizações\Ppra\Ambientes Fisico, verificar que o sistema relacionou os agentes do risco ao ambiente na tela inferior de Ambiente x Agente.
- 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.
- Em Miscelânia\Arquivos\Conciliação eSocial (MDTA890), relacionar os códigos do e-Social aos registros cadastrados.
- 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.
- 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)
- Em Atualizações\Ppra\Agentes, Verificar que o campo Cód. eSocial está com a consulta padrão da tabela T3E.
- 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.
- Em Atualizações\Cadastros Básicos\CNES, verificar que os campos criados Form. Cotat e Email, aparecem em tela.
- Em Atualização\Pcmso\Exames Por Agente, verificar que o campo criado, Interper., aparece em tela.
- 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).
- Em Atualizações\Ppra\Ambiente Físico, verificar que o campo criado,Valid. Inic.(TNE_DTVINI), aparece em tela.
- Em Atualizações\Ppra\Risco x Epc, verificar que o campo criado, Epc Eficaz? (TO9_EFIEPC), aparece em tela.
Procedimento para Configuração
CONFIGURAÇÃO DE MENUS
2. 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
Exemplo:
1. No Medicina e Segurança do Trabalho (SIGAMDT), acesse Miscelânea / Arquivos / Conciliação eSocial (MDTA890).
O sistema irá apresentar a janela com as informações a serem atualizadas de acordo com o código do eSocial.