Histórico da Página

empo Tempo aproximado para leitura: 20 min

01. DADOS GERAIS

xxxxxx

Linha de Produto:	Protheus
Segmento:	Serviços
Módulo:	Gestão Ambiental
Função:	SGAA140, SGAA531	Ticket:
Requisito/Story/Issue:	xxxxxxxxxxDNG-3587

02. SITUAÇÃO/REQUISITO

Implementar no sistema a possibilidade de realizar um tratamento para resíduos não recicláveisperigosos.

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

tabs	Passo a Passo
ids	passo1

Totvs custom tabs box items

default	yes
referencia	passo1

Acessar o módulo de Gestão Ambiental (SIGASGA).
Em Atualizações / Resíduos / Classe, inclua uma classe não perigosa.
Em Atualizações / Resíduos / Resíduos, incluir um resíduo.
Em Atualizações / Resíduos / Definição de Resíduos, incluir uma definição usando a classe não perigosa.
Em Atualizações / Resíduos / Ocorrências, incluir uma ocorrência para o resíduo.
Em Atualizações / Resíduos / Disposição Final, incluir uma disposição para a ocorrência.

04. DEMAIS INFORMAÇÕES

Card documentos

Informacao	A implementação está disponível apenas a partir da release 12.1.23.
Titulo	IMPORTANTE!

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

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

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

Inic. Padrão

GETSXENUM

("TH3"

,"TH3_CODCOM")

IF(INCLUI,

DDATABASE

,

TH3>TH3

TH3>

TH3_DTCOMP)

IF(INCLUI,SUBSTR

(TIME(),1,5),TH3->TH3_HRCOMP)

SX5->

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
CampoTYB_EQUIPATYB_EQUIPATYB_EQUIPATYB_ATENDESequência001002003001Campo DomínioTYB_NOMEQTYB_DTAFERTYB_CALIBRTYB_NOMATETipoPrimárioPrimárioPrimárioPrimárioRegraTM7->TM7_NOEQTOTM7->TM7_DTAFERTM7->TM7_DTCALITMK->TMK_NOMUSUPosicionaSimSimSimSimChavexFilial("TM7")+M->TYB_EQUIPAxFilial("TM7")+M->TYB_EQUIPAxFilial("TM7")+M->TYB_EQUIPAxFilial("TMK")+M->TYB_ATENDEProprietárioSSS

S

Campo	TH3_CODTRA	TH3_DESTRA	TH3_TIPDES	TH3_CODTIP	TH3_DOC	TH3_DESPRO
Tipo	Caracter	Caracter	Caracter	Caracter	Caracter	Caracter
Tamanho	3	30	1	6	9	30
Decimal	0	0	0	0	0	0
Formato	@!	@!	@!	@!	@!	@!
Título	Tratamento	Descr. Trat.	Tipo	Cod. Tipo	Documento	Descr. Proc.
Descrição	Tratamento	Descrição do Tratamento	Tipo de Destinação	Cod. Tipo de Destinação	Documento Moviment.	Descrição da Procedência
Nível	1	1	1	1	1	1
Usado	Sim	Sim	Sim	Sim	Sim	Sim
Obrigatório	Sim	Não	Sim	Não	Não	Não
Browse	Não	Não	Não	Não	Não	Não
Inic. Padrão		SX5->(VDISP("DY"+TH3->TH3_CODTRA,"X5_DESCRI"))				SX5→(VDISP ("DX"+TH3→ TH3_PROCED, "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			Descrição da procedência do resíduo do Manifesto de Transporte de Resíduos.
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 TH4 - Itens Disposição Final de Res.

Campo	TH4_FILIAL	TH4_CODCOM	TH4_CODOCO	TH4_PESOUT	TH4_UNIMED
Tipo	Caracter	Caracter	Caracter	Numérico	Caracter
Tamanho	8	6	6	9	6
Decimal	0	0	0	2	0
Formato		@!	@!	@E 999,999.99	@!
Título	Filial	Disposição	Ocorrência	Peso Util.	Unid. Medida
Descrição	Filial do Sistema	Código Disposição	Código Ocorrência	Peso Utilizado	Unidade de Medida
Nível	1	1	1	1	1
Usado	Sim	Sim	Sim	Sim	Sim
Obrigatório	Não	Não	Não	Não	Não
Browse	Não	Sim	Sim	Sim	Sim
Help	Filial do Sistema.	Código da Disposição Final.	Código da ocorrência	Peso Utilizado.	Unidade de medida do resíduo correspondente a ocorrência.

Informações

title	Importante

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

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

Tabela TH3 - Disposição Final de Resíduos

Campo	TH3_CODTRA	TH3_ORIGEM	TH3_PROCED	TH3_TIPDES
Sequência	001	001	001	001
Campo Domínio	TH3_DESTRA	TH3_DESORI	TH3_DESPRO	TH3_CODTIP

Tabela TYC - Resultados Exame Snellen

CampoTYC_EQUIPATYC_EQUIPATYC_EQUIPATYC_ATENDESequência1231Campo DomínioTYC_NOMEQTYC_DTAFERTYC_CALIBRTYC_NOMATE

Regra

Tipo	Primário	Primário	Primário	Primário

TM7->TM7_NOEQTOTM7->TM7_DTAFERTM7->TM7_DTCALITMK->TMK_NOMUSU

X5DESCRI()	X5DESCRI()	X5DESCRI()	Space(Len(TH3->TH3_CODTIP))
Posiciona	Sim	Sim	Sim

Sim

Não
Chave	xFilial("

TM7

SX5")+"DY"+M-

>TYC

>TH3_

EQUIPA

CODTRA

xFilial("

TM7

SX5")+"DV"+M-

>TYC

>TH3_

EQUIPA

ORIGEM

xFilial("

TM7

SX5")+

M->TYC_EQUIPAxFilial("TMK")

"DX"+M-

>TYC

>TH3_

ATENDE

PROCED
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

Atualizações

Relatórios

Submenu

Exames - Resultad.

Nome da Rotina
Resíduos

Ortho Rater

Disposição Final

Snellen

Programa

MDTR485

MDTR481

Módulo
SGAA531

Medicina e Segurança do Trabalho

Gestão Ambiental

05. ASSUNTOS RELACIONADOS

SGA0001 Integracao SGA X Estoque
Ortho Rater: http://tdn.totvs.com/x/mLUQG
Snellen:http://tdn.totvs.com/x/7rUQG
Exames:http://tdn.totvs.com/x/X4m1F
Documentação

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>

Árvore de páginas

Versões comparadas

Versão antiga 1

Nova versão Atual

Chave

02. SITUAÇÃO/REQUISITO

03. SOLUÇÃO