Histórico da Página
empo tempo aproximado para leitura: 20 min
01. DADOS GERAIS
Linha de Produto: | Protheus |
---|---|
Segmento: | Serviços |
Módulo: | Gestão Ambiental |
Função: | SGAA140, SGAA531 |
Ticket: | xxxxxx |
Requisito/Story/Issue: | xxxxxxxxxx |
02. SITUAÇÃO/REQUISITO
Implementar no sistema a possibilidade de realizar um tratamento para resíduos não recicláveis.
03. SOLUÇÃO
A rotina de Disposição Final (SGAA531) tem como objetivo realizar o descarte dos resíduos conhecendo a sua origem e procedência para destinar os Resíduos Não Perigosos para algum tratamento sem que eles causem mal ao meio ambiente.
Para auxiliar no controle de resíduos perigosos e não perigosos, o sistema possui na rotina de Classes (SGAA135) o campo chamado Perigosa? (TCS_PERIGO) com as opções de Sim e Não. Caso a Classe seja pertinente a resíduo perigosos, o campo Perigosa? deve receber a opção Sim, caso contrário, deve receber a opção Não.
Cadastro da Classe com o campo Perigosa? (TCS_PERIGO):
No momento em que o Resíduo é definido na rotina de Definição de Resíduos (SGAA140), é preciso selecionar a qual classe ele pertence, e, se for uma classe não perigosa, ele estará disponível para ser destinado na rotina de Disposição Final (SGAA531), após a inclusão das ocorrências.
Abaixo segue o trecho pertinente a classe não perigosa que elenca alguns dos resíduos a qual a pertence, retirado da NBR 10004 de 2004:
Totvs custom tabs box | |||||||
---|---|---|---|---|---|---|---|
| |||||||
|
04. DEMAIS INFORMAÇÕES
- Criação de Índices no arquivo SIX – Índices:
Índice | TH4 | TH3 |
---|---|---|
Ordem | 1 | 1 |
Chave | TH4_FILIAL+TH4_CODCOM+TH4_CODOCO | TH3_FILIAL+TH3_CODCOM |
Descrição | Disposição + Ocorrência | Codigo |
Proprietário | S | S |
2. Criação de tabela no arquivo SX2– Tabelas:
Chave | TH3 | TH4 |
---|---|---|
Nome | Disposição Final de Resíduos | Itens Disposição Final de Res. |
Modo | Exclusivo | Exclusivo |
Pyme | N | N |
3. Alteração de Campos no arquivo SX3 – Campos:
- Tabela TCS - Cadastro de Classe do Resíduo
- Tabela TCS - Cadastro de Classe do Resíduo
Campo | TCS_PERIGO |
---|---|
Tipo | Caracter |
Tamanho | 1 |
Decimal | 0 |
Formato | @! |
Título | Perigosa? |
Descrição | Classe Perigosa? |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
Inic. Padrão | IF(INCLUI,'1',M->TCS_PERIGO) |
Opções | 1=Sim;2=Nao |
Val. Sistema | Pertence('12') |
Help | Indica se a classe de resíduos é perigosa. 1 - Sim; 2 - Não. |
- Tabela TH3 - Disposição Final de Resíduos
- Tabela TH3 - Disposição Final de Resíduos
Campo | TH3_FILIAL | TH3_CODCOM | TH3_DTCOMP | TH3_HRCOMP | TH3_ORIGEM | TH3_DESORI | TH3_PROCED | TH3_DESPRO |
---|---|---|---|---|---|---|---|---|
Tipo | Caracter | Caracter | Data | Caracter | Caracter | Caracter | Caracter | Caracter |
Tamanho | 8 | 6 | 8 | 5 | 3 | 30 | 3 | 30 |
Decimal | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |
Formato | @! | 99:99 | @! | @! | @! | @! | ||
Título | Filial | Código | Data | Hora | Origem | Descr. Orig. | Procedência | Descr. Proc. |
Descrição | Filial do Sistema | Código Disposição | Data Composição | Hora Composição | Origem | Descrição da Origem | Procedência | Descrição da Procedência |
Nível | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 |
Usado | Não | Sim | Sim | Sim | Sim | Sim | Sim | Sim |
Obrigatório | Não | Sim | Sim | Sim | Sim | Não | Sim | Não |
Browse | Não | Sim | Sim | Sim | Não | Não | Não | Não |
Inic. Padrão | GETSXENUM("TH3" ,"TH3_CODCOM") | IF(INCLUI,DDATABASE ,TH3>TH3_DTCOMP) | IF(INCLUI,SUBSTR (TIME(),1,5),TH3->TH3_HRCOMP) |
| SX5->(VDISP("DV"+TH3->TH3_ORIGEM,"X5_DESCRI")) | SX5->(VDISP("DX"+TH3->TH3_PROCED,"X5_DESCRI")) | ||
Val. Sistema | M->TH3_DTCOMP <= dDataBase | VALHORA(M->TH3_HRCOMP) .AND. M->TH3_HRCOMP <= Substr(Time(),1,5) | ExistCpo("SX5","DV"+M->TH3_ORIGEM) | ExistCpo("SX5","DX"+M->TH3_PROCED) | ||||
Help | Filial do Sistema. | Código da Composição de Carga. | Data de realização da Composição da Carga. | Hora de realização da Composição da Carga. | Informe a origem do resíduo para o Manifesto de Transporte de Resíduos.Pressione a tecla [F3] para selecionar uma origem. | Descrição da origem do resíduo do Manifesto de Transporte de Resíduos. | Informe a procedência para o Manifesto de Transporte de Resíduos. Pressione a tecla [F3] para selecionar uma procedência. | Descrição da procedência do resíduo do Manifesto de Transporte de Resíduos. |
Campo | TH3_CODTRA | TH3_DESTRA | TH3_TIPDES | TH3_CODTIP | TH3_DOC | |
---|---|---|---|---|---|---|
Tipo | Caracter | Caracter | Caracter | Caracter | Caracter | |
Tamanho | 3 | 30 | 1 | 6 | 9 | |
Decimal | 0 | 0 | 0 | 0 | 0 | |
Formato | @! | @! | @! | @! | @! | |
Título | Tratamento | Descr. Trat. | Tipo | Cod. Tipo | Documento | |
Descrição | Tratamento | Descrição do Tratamento | Tipo de Destinação | Cod. Tipo de Destinação | Documento Moviment. | |
Nível | 1 | 1 | 1 | 1 | 1 | |
Usado | Sim | Sim | Sim | Sim | Sim | |
Obrigatório | Sim | Não | Sim | Não | Não | |
Browse | Não | Não | Não | Não | Não | |
Inic. Padrão | SX5->(VDISP("DY"+TH3->TH3_CODTRA,"X5_DESCRI")) | |||||
Val. Sistema | ExistCpo("SX5","DY"+M->TH3_CODTRA) | PERTENCE("123456") | ExistCPO("TB6",M->TH3_CODTIP) | |||
Lista Opções | 1=Tratamento;2=Reutilização;3=Co-Processamento;4=Disposição Final;5=Outros;6=Acondicionamento | |||||
Help | Informe o tratamento/disposição do resíduo para o Manifesto de transporte de Resíduos. Pressione a tecla [F3] para selecionar um tratamento/disposição. | Descrição do tratamento do resíduo do Manifesto de Transporte de Resíduos. | Tipo de Destinação. | Código do tipo de destinação. | Número do documento referente as movimentações de estoque. |
- Tabela TH3 - Disposição Final de Resíduos
- Tabela TH3 - Disposição Final de Resíduos
Campo | TH3_FILIAL | TH3_CODCOM | TH3_DTCOMP | TH3_HRCOMP | TH3_ORIGEM | TH3_DESORI | TH3_PROCED | TH3_DESPRO |
---|---|---|---|---|---|---|---|---|
Tipo | Caracter | Caracter | Data | Caracter | Caracter | Caracter | Caracter | Caracter |
Tamanho | 8 | 6 | 8 | 5 | 3 | 30 | 3 | 30 |
Decimal | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |
Formato | @! | 99:99 | @! | @! | @! | @! | ||
Título | Filial | Código | Data | Hora | Origem | Descr. Orig. | Procedência | Descr. Proc. |
Descrição | Filial do Sistema | Código Disposição | Data Composição | Hora Composição | Origem | Descrição da Origem | Procedência | Descrição da Procedência |
Nível | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 |
Usado | Não | Sim | Sim | Sim | Sim | Sim | Sim | Sim |
Obrigatório | Não | Sim | Sim | Sim | Sim | Não | Sim | Não |
Browse | Não | Sim | Sim | Sim | Não | Não | Não | Não |
Inic. Padrão | GETSXENUM("TH3" ,"TH3_CODCOM") | IF(INCLUI,DDATABASE ,TH3>TH3_DTCOMP) | IF(INCLUI,SUBSTR (TIME(),1,5),TH3->TH3_HRCOMP) |
| SX5->(VDISP("DV"+TH3->TH3_ORIGEM,"X5_DESCRI")) | SX5->(VDISP("DX"+TH3->TH3_PROCED,"X5_DESCRI")) | ||
Val. Sistema | M->TH3_DTCOMP <= dDataBase | VALHORA(M->TH3_HRCOMP) .AND. M->TH3_HRCOMP <= Substr(Time(),1,5) | ExistCpo("SX5","DV"+M->TH3_ORIGEM) | ExistCpo("SX5","DX"+M->TH3_PROCED) | ||||
Help | Filial do Sistema. | Código da Composição de Carga. | Data de realização da Composição da Carga. | Hora de realização da Composição da Carga. | Informe a origem do resíduo para o Manifesto de Transporte de Resíduos.Pressione a tecla [F3] para selecionar uma origem. | Descrição da origem do resíduo do Manifesto de Transporte de Resíduos. | Informe a procedência para o Manifesto de Transporte de Resíduos. Pressione a tecla [F3] para selecionar uma procedência. | Descrição da procedência do resíduo do Manifesto de Transporte de Resíduos. |
7. Criação de Gatilhos no arquivo SX7 – Gatilhos:
- TYB - Resultados Exame Acuidade Visual
Campo | TYB_EQUIPA | TYB_EQUIPA | TYB_EQUIPA | TYB_ATENDE |
---|---|---|---|---|
Sequência | 001 | 002 | 003 | 001 |
Campo Domínio | TYB_NOMEQ | TYB_DTAFER | TYB_CALIBR | TYB_NOMATE |
Tipo | Primário | Primário | Primário | Primário |
Regra | TM7->TM7_NOEQTO | TM7->TM7_DTAFER | TM7->TM7_DTCALI | TMK->TMK_NOMUSU |
Posiciona | Sim | Sim | Sim | Sim |
Chave | xFilial("TM7")+M->TYB_EQUIPA | xFilial("TM7")+M->TYB_EQUIPA | xFilial("TM7")+M->TYB_EQUIPA | xFilial("TMK")+M->TYB_ATENDE |
Proprietário | S | S | S | S |
Tabela TYC - Resultados Exame Snellen
Campo | TYC_EQUIPA | TYC_EQUIPA | TYC_EQUIPA | TYC_ATENDE |
---|---|---|---|---|
Sequência | 1 | 2 | 3 | 1 |
Campo Domínio | TYC_NOMEQ | TYC_DTAFER | TYC_CALIBR | TYC_NOMATE |
Tipo | Primário | Primário | Primário | Primário |
Regra | TM7->TM7_NOEQTO | TM7->TM7_DTAFER | TM7->TM7_DTCALI | TMK->TMK_NOMUSU |
Posiciona | Sim | Sim | Sim | Sim |
Chave | xFilial("TM7")+M->TYC_EQUIPA | xFilial("TM7")+M->TYC_EQUIPA | xFilial("TM7")+M->TYC_EQUIPA | xFilial("TMK")+M->TYC_ATENDE |
Proprietário | S | S | S | S |
Procedimento para Configuração
1. No Configurador (SIGACFG), acesse Ambientes/Cadastro/Menu (CFGX013). Informe a nova opção de menu do Medicina e Segurança do Trabalho (SIGAMDT), conforme instruções a seguir:
Menu | Relatórios | Relatórios |
---|---|---|
Submenu | Exames - Resultad. | Exames - Resultad. |
Nome da Rotina | Ortho Rater | Snellen |
Programa | MDTR485 | MDTR481 |
Módulo | Medicina e Segurança do Trabalho | Medicina e Segurança do Trabalho |
05. ASSUNTOS RELACIONADOS
- Ortho Rater: http://tdn.totvs.com/x/mLUQG
Snellen:http://tdn.totvs.com/x/7rUQG
Exames:http://tdn.totvs.com/x/X4m1F
Templatedocumentos |
---|
HTML |
---|
<style> div.theme-default .ia-splitter #main { margin-left: 0px; } .ia-fixed-sidebar, .ia-splitter-left { display: none; } #main { padding-left: 10px; padding-right: 10px; overflow-x: hidden; } .aui-header-primary .aui-nav, .aui-page-panel { margin-left: 0px !important; } .aui-header-primary .aui-nav { margin-left: 0px !important; } </style> |