Histórico da Página

Tempo aproximado para leitura: 20 min

Aviso

title	Release

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

01. DADOS GERAIS

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

02. SITUAÇÃO/REQUISITO

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

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
Tipo	Caracter	Caracter	Data	Caracter	Caracter	Caracter	Caracter
Tamanho	8	6	8	5	3	30	3
Decimal	0	0	0	0	0	0	0
Formato		@!		99:99	@!	@!	@!
Título	Filial	Código	Data	Hora	Origem	Descr. Orig.	Procedência
Descrição	Filial do Sistema	Código Disposição	Data Composição	Hora Composição	Origem	Descrição da Origem	Procedência
Nível	1	1	1	1	1	1	1
Usado	Não	Sim	Sim	Sim	Sim	Sim	Sim
Obrigatório	Não	Sim	Sim	Sim	Sim	Não	Sim
Browse	Não	Sim	Sim	Sim	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"))
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.

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
Tipo	Primário	Primário	Primário	Primário
Regra	X5DESCRI()	X5DESCRI()	X5DESCRI()	Space(Len(TH3->TH3_CODTIP))
Posiciona	Sim	Sim	Sim	Não
Chave	xFilial("SX5")+"DY"+M->TH3_CODTRA	xFilial("SX5")+"DV"+M->TH3_ORIGEM	xFilial("SX5")+"DX"+M->TH3_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	Atualizações
Submenu	Resíduos
Nome da Rotina	Disposição Final
Programa	SGAA531
Módulo	Gestão Ambiental

05. ASSUNTOS RELACIONADOS

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 15

Nova versão Atual

Chave

02. SITUAÇÃO/REQUISITO

03. SOLUÇÃO