Histórico da Página

Informações Gerais

Especificação
Produto	Protheus	Módulo	SIGAAGR
Segmento Executor	Agroindústria
Projeto¹	AGROG01	IRM¹	AGROG01-27
Requisito¹	AGROG01-28	Subtarefa¹
País	( ) Brasil ( ) Argentina ( ) Mexico ( ) Chile ( ) Paraguai ( ) Equador ( ) USA ( ) Colombia ( ) Outro _____________.
Outros	<Caso necessário informe outras referências que sejam pertinentes a esta especificação. Exemplo: links de outros documentos ou subtarefas relacionadas>.

Legenda: 1 – Inovação 2 – Manutenção (Os demais campos devem ser preenchidos para ambos os processos).

Objetivo

Com o objetivo de ter mais flexibilidade na configuração das regras de separação e produção dos produtos acabados do processo de beneficiamento de algodão, foram implementadas as seguintes melhorias:

Definição da Regra de Negócio

A rotina de encerramento busca o conjunto atrelado ao fardão para o qual está sendo processado o encerramento, a partir do conjunto são selecionadas as regras de separação do algodão e é efetuada a desmontagem do fardão nos produtos e proporções informadas na aba % de Separação e Produção do Cadastro de Conjunto - AGRA611.

O percentual de separação referente à Pluma é flexível, porém, deverá estar entre os limites especificados nos campos de Rendimento Mínimo e Máximo. O rendimento real de cada fardo é calculado na finalização do beneficiamento de cada fardão. Sendo assim, para produtos sinalizados como Pluma, o sistema não permite que se informe o % de separação (coluna Perc) e seta o Tipo para Realizado.

Quando a coluna Tipo é igual a Fixo, o percentual de separação é calculado sobre o valor total do fardo, caso o tipo seja Variável, o percentual de separação será calculado sobre o valor total do fardão menos a somatória de percentuais dos itens sinalizados como Fixo. O tipo Realizado é usado exclusivamente para o produto pluma, pois seu percentual é calculado sobre o peso real dos fardos beneficiados.

Após efetuada a desmontagem, o sistema verificará se deve ser gerada a produção para os itens acabados, conforme configuração no conjunto. Essa verificação será feita para cada item listado na aba % de Separação e Produção. Caso a coluna G.Prod esteja informada como Sim, obrigatoriamente existirá um produto produção, local e TM também.

O Sistema irá gerar uma ordem de produção para cada produto acabado (G.Prod = Sim)

O Prod.Produc deverá pertencer a uma estrutura em que o produto originado na desmontagem esteja configurado como matéria-prima do produto produção:

Regras de Legenda/Status de Ordem de Produção

Rotina	Tipo de Operação	Opção de Menu	Regras de Negócio
[AGRA620 – Encerramento]	[Alteração]	[Atualizações -> UBA -> Beneficiamento]	-
[AGRA615 – Beneficiamento]	[Alteração]	[Atualizações -> UBA -> Beneficiamento]	-
[AGRA611 - Conjuntos]	[Alteração]	[Atualizações -> UBA -> Cadastros]	-
[AGRA605 – Produção X Fardão]	[Criação]	[Atualizações -> UBA -> Recebimento -> Cadastro Fardão -> Ações Relacionadas -> Movimentos Produção ]	-
[AGRA601 - Cadastro de Fardão]	[Envolvida]	[Atualizações -> UBA -> Recebimento ]	-

Todo apontamento de produção e requisição para desmontagem, feita pela rotina AGRA620, deve ser registrado na tabela DXB
O controle de rendimento da Pluma deve ser feito por dois novos campos, de rendimento máximo e mínimo, que devem constar no cabeçalho do conjunto
A consulta de movimentos de produção do fardão também deve exibir a requisição para desmontagem
É preciso oferecer uma opção de atrelar a produção de vários produtos em apenas uma OP
No estorno da desmontagem, incluir um pergunte para o usuário definir se o status da OP deve ficar como Iniciada ou Parc. Encerrada (na existencia de mais apontamentos atrelados a ordem)

Tabelas Utilizadas

DXL – Cadastro de Fardão
DXB – Produção X Fardão
DXI - Fardo Beneficiado
SC2 - Ordem de Produção
SD3 - Movimentos Internos

Opcional

Protótipo de Tela

Protótipo Cabeçalho Conjunto

Protótipo Pasta Itens Adicionais

Protótipo Pasta % de Separação e Produção

Protótipo Parâmetro Inicial Desmontagem

Protótipo Detalhe Desmontagem

Dicionário de Dados

Arquivo ou Código do Script: DXC - Itens Tabela Perc. Separação

Índice	Chave
04	DXC_FILIAL+DXC_CODIGO+DXC_PRDPRO

Campo	DXC_FILIAL
Ordem	01
Tipo	Caracter
Tamanho	2
Decimal	0
Formato	@!
Título	Filial
Descrição	Filial do Sistema
Nível	1
Usado	Não
Obrigatório	Não
Browse	Não
Grupo	033

Campo	DXC_CODIGO
Ordem	02
Tipo	Caracter
Tamanho	6
Decimal	0
Formato	@!
Título	Conjunto
Descrição	Codigo do Conjunto
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Não

Campo	DXC_ITEM
Ordem	03
Tipo	Caracter
Tamanho	3
Decimal	0
Formato	@!
Título	Item
Descrição	Item da Tabela
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim
Visual	Virtual
Contexto	Real

Campo	DXC_CODPRO
Ordem	04
Tipo	Caracter
Tamanho	15
Decimal	0
Formato	@!
Título	Cod. Produto
Descrição	Código do Produto
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim
F3	SB1
Grupo	030
Relação	ExistCpo("SB1")
Val. Sistema	(X3_VALID)

Campo	DXC_DESPRO
Ordem	05
Tipo	Caracter
Tamanho	30
Decimal	0
Formato	@!
Título	Desc.Produto
Descrição	Descrição Produto
Nível	0
Usado	Sim
Obrigatório	Sim
Browse	Sim
Relação	If(!INCLUI,Posicione("SB1",1,xFilial("SB1")+DXC->DXC_CODPRO,"B1_DESC"),"")
Ini Browse	Posicione("SB1",1,xFilial("SB1")+DXC->DXC_CODPRO,"B1_DESC")
Visual	Virtual
Contexto	Virtual

Campo	DXC_LOCAL
Ordem	06
Tipo	Caracter
Tamanho	2
Decimal	0
Formato	@!
Título	Local
Descrição	Local de Estoque
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim
F3	NNR
Grupo	024
Visual	Altera
Val. Sistema	Vazio() .Or. ExistCPO("NNR")
Contexto	Real

Campo	DXC_PLUMA
Ordem	07
Tipo	Caracter
Tamanho	1
Decimal	0
Formato	@!
Título	Pluma
Descrição	Pluma
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim
Opções	1=Sim;2=Nao
Relação	'2'
Val. Sistema	Pertence("12") .And. AGR611VCPO()

Campo	DXC_CLAUBA
Ordem	08
Tipo	Caracter
Tamanho	30
Decimal	0
Formato	@!
Título	Clas.Produto
Descrição	Classificação Produto UBA
Nível	0
Usado	Não
Obrigatório	Não
Browse	Não

Campo	DXC_TIPO
Ordem	09
Tipo	Caracter
Tamanho	1
Decimal	0
Formato	@!
Título	Tipo
Descrição	Tipo de Separação
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Não
Opções	1=Fixo;2=Variavel;3=Realizado
When	If(FwFldGet("DXC_PLUMA") = "1",.F.,.T.)
Relação	'1'
Val. Sistema	Pertence("123")

Campo	DXC_PERC
Ordem	10
Tipo	Numérico
Tamanho	6
Decimal	2
Formato	@E 999.99
Título	Perc
Descrição	Pluma
Nível	Percentual de Separação
Usado	Sim
Obrigatório	Não
Browse	Não
When	If(FwFldGet("DXC_PLUMA") = "1",.F.,.T.)
Val. Sistema	Positivo()

Campo	DXC_RATEIO
Ordem	11
Tipo	Numérico
Tamanho	7
Decimal	4
Formato	@E 999.99
Título	% Rat.Cust
Descrição	% Rateio de Custo
Nível	1
Usado	Sim
Obrigatório	Não
Browse	Sim
Val. Sistema	positivo()

Campo	DXC_GRPROD
Ordem	12
Tipo	Caracter
Tamanho	1
Decimal	0
Formato	@!
Título	G.Prod?
Descrição	Gera Produção?
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim
Opções	1=Sim;2=Não
Relação	'2'

Campo	DXC_PRDPRO
Ordem	13
Tipo	Caracter
Tamanho	15
Decimal	0
Formato	@!
Título	Prod.Produc
Descrição	Código do Produto Produção
Nível	1
Usado	Sim
Obrigatório	Não
Browse	Sim
F3	SB1
Grupo	030
Val. Sistema	If(!INCLUI,Posicione("SB1",1,xFilial("SB1")+DXC->DXC_PRDPRO,"B1_DESC"),"")

Campo	DXC_PRDDES
Ordem	14
Tipo	Caracter
Tamanho	30
Decimal	0
Formato	@!
Título	Desc.Produto
Descrição	Descrição Produto
Nível	0
Usado	Sim
Obrigatório	Não
Browse	Sim
Ini Browse	Posicione("SB1",1,xFilial("SB1")+DXC->DXC_PRDPRO,"B1_DESC")
Relação	If(!INCLUI,Posicione("SB1",1,xFilial("SB1")+DXC->DXC_PRDPRO,"B1_DESC"),"")
Visual	Virtual
Contexto	Virtual

Campo	DXC_LOCPRD
Ordem	15
Tipo	Caracter
Tamanho	2
Decimal	0
Formato	@!
Título	Loc.PR
Descrição	Local de estoque Produção
Nível	1
Usado	Sim
Obrigatório	Não
Browse	Sim
F3	NNR
Grupo	024
Val. Sistema	Iif( FwFldGet("DXC_GRPROD") = "1", ExistCpo("NNR"), Vazio() .or. ExistCpo("NNR"))

Campo	DXC_TM
Ordem	16
Tipo	Caracter
Tamanho	3
Decimal	0
Formato	@9
Título	TM
Descrição	Tipo Movimento
Nível	1
Usado	Sim
Obrigatório	Não
Browse	Sim
F3	SF5DES
Val. Sistema	Iif( FwFldGet("DXC_GRPROD") = "1", AGRVLDTMPR(FwFldGet("DXC_TM")), Vazio() .or. AGRVLDTMPR(FwFldGet("DXC_TM")))

Arquivo ou Código do Script: DXE - Cadastro de Conjunto

Campo	DXE_CODPRO
Ordem	04
Tipo	Caracter
Tamanho	15
Decimal	0
Formato	@!
Título	Produto
Descrição	Produto Beneficiado
Nível	1
Usado	Não
Obrigatório	Não
Browse	Não
F3	SB1
When	INCLUI
Grupo	030
Val. Sistema	ExistCpo("SB1")

Campo	DXE_DESCPR
Ordem	05
Tipo	Caracter
Tamanho	30
Decimal	0
Formato	@!
Título	Desc.Produto
Descrição	Descrição do Produto
Nível	1
Usado	Não
Obrigatório	Não
Browse	Não

Campo	DXE_LOCAL
Ordem	09
Tipo	Caracter
Tamanho	2
Decimal	0
Formato	@!
Título	Local
Descrição	Local de Estoque
Nível	NNR
Usado	Não
Obrigatório	Não
Browse	Não
Grupo	024
Val. Sistema	Vazio() .Or. ExistCPO("NNR")

Campo	DXE_RDMIN
Ordem	14
Tipo	Numérico
Tamanho	5
Decimal	2
Formato	@E 99.99
Título	% Rd Min
Descrição	% Rendimento Mínimo
Nível	0
Usado	Sim
Obrigatório	Sim
Browse	Não
Val. Sistema	positivo()

Campo	DXE_RDMAX
Ordem	15
Tipo	Numérico
Tamanho	5
Decimal	2
Formato	@E 99.99
Título	% Rd Max
Descrição	% Rendimento Máximo
Nível	0
Usado	Sim
Obrigatório	Sim
Browse	Não
Val. Sistema	positivo()

Arquivo ou Código do Script: DXF - Itens Adicionais Conjunto

Campo	DXF_CODPRO
Ordem	03
Tipo	Caracter
Tamanho	15
Decimal	0
Formato	@!
Título	Cod.Prod
Descrição	Código do Produto
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim
F3	SB1
Gupo	030
Val. Sistema	ExistCpo("SB1")

Campo	DXF_DESPRO
Ordem	04
Tipo	Caracter
Tamanho	30
Decimal	0
Formato	@!
Título	Desc.Produto
Descrição	Descrição Produto
Nível	0
Usado	Sim
Obrigatório	Não
Browse	Sim
Ini Browse	Posicione("SB1",1,xFilial("SB1")+DXF->DXF_CODPRO,"B1_DESC")
Relação	If(!INCLUI,Posicione("SB1",1,xFilial("SB1")+DXF->DXF_CODPRO,"B1_DESC"),"")
Visual	Virtual
Contexto	Virtual

Campo	DXF_QTDPRO
Ordem	05
Tipo	Numérico
Tamanho	14
Decimal	2
Formato	@E 99,999,999,999.99
Título	Qtd.Prod
Descrição	Quantidade Produto
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim
Val. Sistema	Positivo()

Campo	DXF_PSUNIT
Ordem	06
Tipo	Numérico
Tamanho	6
Decimal	2
Formato	@E 999.99
Título	Ps.Unitário
Descrição	Peso Unitário
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim

Campo	DXF_LOCAL
Ordem	07
Tipo	Caracter
Tamanho	2
Decimal	0
Formato	@!
Título	Local
Descrição	Local de Estoque
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim
Grupo	024
F3	NNR
Val.Sistema	Vazio() .Or. ExistCPO("NNR")

Campo	DXF_CPBAL
Ordem	08
Tipo	Caracter
Tamanho	1
Decimal	0
Formato	@!
Título	Cp.Ps.Bal.
Descrição	Compoe Peso Balança
Nível	1
Usado	Sim
Obrigatório	Sim
Browse	Sim
Opções	1=Sim;2=Não
Val.Sistema	Pertence("12")

Campo	DXF_CODIGO
Ordem	09
Tipo	Caracter
Tamanho	6
Decimal	0
Formato	@!
Título	Conjunto
Descrição	Código do Conjunto
Nível	1
Usado	Sim
Obrigatório	Não
Browse	Não
Val.Sistema	ExistCpo("DXE")
Visual	Virtual
Contexto	Real

Campo	DXF_CLAUBA
Ordem	10
Tipo	Caracter
Tamanho	30
Decimal	0
Formato	@!
Título	Clas.Produto
Descrição	Classificação Produto UBA
Nível	0
Usado	Não
Obrigatório	Não
Browse	Sim
Visual	Virtual
Contexto	Virtual

Campo	DXF_MOVEST
Ordem	11
Tipo	Caracter
Tamanho	1
Decimal	0
Formato	@!
Título	Mov. Estoque
Descrição	Movimenta Estoque
Nível	0
Usado	Sim
Obrigatório	Sim
Browse	Nao
Val.Sistema	Pertence("12")
Relação	'1'
Opções	1=Nao;2=Sim
Visual	Altera
Contexto	Real

Campo	DXF_TM
Ordem	12
Tipo	Caracter
Tamanho	3
Decimal	0
Formato	@9
Título	TM
Descrição	Tipo Movimento
Nível	1
Usado	Sim
Obrigatório	Não
Browse	Sim
Val.Sistema	IIf(FwFldGet("DXF_MOVEST") = "2",AGRVLDTMRQ( FwFldGet("DXF_TM")),ExistCpo("SF5"))
F3	SF5DES

Arquivo ou Código do Script: DXL - Fardão

Campo	DXL_CODCNJ
Tipo	Caracter
Tamanho	6
Decimal	0
Formato	@!
Título	Conjunto
Descrição	Código do Conjunto
Nível	1
Usado	Sim
Obrigatório	Não
Browse	Sim
Visual	Virtual
Contexto	Real

Campo	DXL_NUMDOC
Tipo	Caracter
Tamanho	9
Decimal	0
Formato	@!
Título	N. Documento
Descrição	Numero do Documento
Nível	1
Usado	Não
Obrigatório	Não
Browse	Não
Visual	Virtual
Contexto	Real
Grupo	018

Campo	DXL_OPBN
Tipo	Caracter
Tamanho	13
Decimal	0
Formato	@!
Título	OP Beneficia
Descrição	OP do Encerra. Beneficia.
Nível	1
Usado	Não
Obrigatório	Não
Browse	Não
Visual	Virtual
Contexto	Real

Campo	DXL_DOCRQ
Tipo	Caracter
Tamanho	9
Decimal	0
Formato	@!
Título	N. Doc. Req
Descrição	N. Doc. Req para OP BN
Nível	1
Usado	Não
Obrigatório	Não
Browse	Não
Visual	Virtual
Contexto	Real
Grupo	018

Campo	DXL_DOCPR
Tipo	Caracter
Tamanho	9
Decimal	0
Formato	@!
Título	Doc PR BN
Descrição	N. Doc. Prod. Encerra. BN
Nível	1
Usado	Não
Obrigatório	Não
Browse	Não
Visual	Virtual
Contexto	Real
Grupo	018

Gatilhos

DXC - Itens Tabelas Perc Separação

Campo	DXC_CODPRO
Sequência	001
Campo Domínio	DXC_DESPRO
Tipo	P
Regra	SB1->B1_DESC
Posiciona?	S
Chave	xFilial('SB1')+M->DXC_CODPRO
Proprietário	S

Campo	DXC_PRDPRO
Sequência	001
Campo Domínio	DXC_PRDDES
Tipo	P
Regra	SB1->B1_DESC
Posiciona?	S
Chave	xFilial('SB1')+M->DXC_PRDPRO
Proprietário	S

DXF - Itens Adicionais

Campo	DXF_CODPRO
Sequência	001
Campo Domínio	DXF_DESPRO
Tipo	P
Regra	SB1->B1_DESC
Posiciona?	S
Chave	xFilial('SB1')+M->DXF_CODPRO
Proprietário	S

Consulta Padrão

Consulta: SF5DES

Descrição	Tipo de Movimentação na Desmontagem
Tipo	Consulta Padrão
Tabela	“SF5”
Índice	“Código”
Campo	"COD";"TP";"APROP";"AT.EMP";"TRANS.MOD";"TEXTO"
Retorno	SF5->F5_CODIGO
Filtro	@#AGR611TM()

Este documento é material de especificação dos requisitos de inovação, trata-se de conteúdo extremamente técnico.

Árvore de páginas

Versões comparadas

Versão antiga 95

Nova versão 118

Chave