Informações Gerais

 

Especificação

Produto

Protheus

Módulo

SIGAAGR

Segmento Executor

Agroindústria

Projeto1

AGROG01

IRM1

AGROG01-27

Requisito1

AGROG01-28

Subtarefa1

 

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çãolocal e TM também. 

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

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

Ordem01

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

Ordem02

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

Ordem03

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

Ordem04

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

Ordem05

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

Ordem06

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

Ordem07

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

Ordem08

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

Ordem09

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

Ordem10

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

Ordem11

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

Ordem12

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

Ordem13

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

Ordem14

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

Ordem15

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

Ordem16

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

Ordem04

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

Ordem05

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

Ordem09

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

Ordem14

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

Ordem15

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

Ordem03

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

Ordem04

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

Ordem05

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

Ordem06

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

Ordem07

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

Ordem08

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

Ordem09

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

Ordem10

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

Ordem11

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.SistemaPertence("12")

Relação

'1'

Opções

1=Nao;2=Sim

Visual

Altera

Contexto

Real

Campo

DXF_TM

Ordem12

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

Grupo018

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

Grupo018

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

Grupo018


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.