Apontamento de Fardão com Ordem de Produção

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindústria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico

Cadastro de Fardão

AGRA601

Rotina(s) envolvida(s)

Nome Técnico

Ordem de Produção

MATA650

Produção Simples 

MATA250

Parâmetro(s):

MV_AGRESTO

Ponto de Entrada:

Informe o ponto de entrada relacionado (link).

Chamados Relacionados

TUVGLS

Requisito (ISSUE):
PCREQ-10728

País(es):

Todos

Banco(s) de Dados:

MSSQL, Oracle

Tabelas Utilizadas:

DXL, DXB, SD3, SC2

Sistema(s) Operacional(is):

Windows

Descrição

No processo de recebimento do UBA (Unidade de Beneficiamento de Algodão) foi apresentada a necessidade de possibilidade de geração de estoque no momento do cadastro dos fardões no sistema. Para suprir essa necessidade, foram desenvolvidas as seguintes funcionalidades:

  • Disponibilização de parâmetro para permitir que seja escolhido o modo de geração de estoque dos fardões: no momento do cadastro ou no encerramento do romaneio de saída, conforme já disponibilizado no sistema
  • Possibilitada a associação do fardão a uma ordem de produção de três maneiras:
    • Informando uma ordem pré-cadastrada no cadastro do fardão
    • Gerando a ordem no momento da confirmação do cadastro do fardão
    • Gerando a ordem posteriormente
  • Disponibilização de parâmetro na tela (acionado via tecla F12) para definir se a geração da ordem de produção - para um fardo onde estão não tenha sido informada no cadastro - acontece no momento da confirmação da inclusão do fardão ou posteriormente.
  • Disponibilização de rotina para geração de ordens de produção para fardões que não tenham nenhuma associada.

Visando manter a consistência dos registros, também foi implementado o estorno de apontamento de produção no momento da exclusão do fardão. Porém, para que seja possível a exclusão do fardão e do apontamento, é imprescindível que este não pertença a um período já fechado. Na rotina de exclusão do fardão, após efetuar o estorno do apontamento, o sistema efetua uma verificação, identificando se a ordem não possui mais apontamentos relacionados e que não se trata de uma ordem pré-cadastrada, se o retorno for positivo, a ordem também é excluída, com o intuito de não poluir a base de dados com registros não utilizados.

 

Importante

(Apenas para Microsiga Protheus, versões anteriores à versão 12)

Antes de executar o compatibilizador U_UPDUBA01 é imprescindível:

  • Realizar o backup da base de dados do produto que será executado o compatibilizador (diretório PROTHEUS_DATA\DATA, se versão 10, ou \PROTHEUS11_DATA\DATA, se versão 11) e dos dicionários de dados SXs (diretório PROTHEUS_DATA_SYSTEM, se versão 10, ou \PROTHEUS11_DATA\SYSTEM, se versão  11).
  • Os diretórios acima mencionados correspondem à instalação padrão do Protheus, portanto, devem ser alterados conforme o produto instalado na empresa.
  • Essa rotina deve ser executada em modo exclusivo, ou seja, nenhum usuário deve estar utilizando o sistema.
  • Se os dicionários de dados possuírem índices personalizados (criados pelo usuário), antes de executar o compatibilizador, certifique-se de que estão identificados pelo nickname. Caso o compatibilizador necessite criar índices, irá adicioná-los a partir da ordem original instalada pelo Protheus, o que poderá sobrescrever índices personalizados, caso não estejam identificados pelo nickname.
  • O compatibilizador deve ser executado com a Integridade Referencial desativada*.

 

Atenção

O procedimento a seguir deve ser realizado por um profissional   qualificado como Administrador de Banco de Dados (DBA) ou equivalente!

A ativação indevida da Integridade Referencial pode alterar   drasticamente o relacionamento entre tabelas no banco de dados. Portanto,   antes de utilizá-la, observe atentamente os procedimentos a seguir:

  1. No   Configurador (SIGACFG), veja se a empresa utiliza Integridade   Referencial, selecionando a opção Integridade/Verificação   (APCFG60A).
  2. Se não   há Integridade Referencial ativa,   são relacionadas em uma nova janela todas as empresas e filiais cadastradas   para o sistema e nenhuma delas estará selecionada. Neste caso, E SOMENTE NESTE, não é necessário   qualquer outro procedimento de ativação   ou desativação de integridade, basta finalizar a verificação e aplicar   normalmente o compatibilizador, conforme instruções.
  3.  Se há Integridade Referencial ativa   em todas as empresas e filiais, é   exibida uma mensagem na janela Verificação   de relacionamento entre tabelas. Confirme a mensagem para que a   verificação seja concluída, ou;
  4.  Se   há Integridade Referencial ativa   em uma ou mais empresas, que não   na sua totalidade, são relacionadas em uma nova janela todas as empresas e   filiais cadastradas para o sistema e, somente, a(s) que possui(em)   integridade está(arão) selecionada(s). Anote qual(is) empresa(s) e/ou   filial(is) possui(em) a integridade ativada e reserve esta anotação para   posterior consulta na reativação (ou ainda, contate nosso Help Desk Framework   para informações quanto a um arquivo que contém essa informação).
  5. Nestes   casos descritos nos itens “iii” ou   “iv”, E SOMENTE NESTES CASOS, é necessário desativar tal integridade, selecionando a opção Integridade/ Desativar (APCFG60D).
  6.  Quando desativada a Integridade Referencial,   execute o compatibilizador, conforme instruções.
  7. Aplicado o compatibilizador, a Integridade   Referencial deve ser reativada, SE E   SOMENTE SE tiver sido desativada, através da opção Integridade/Ativar (APCFG60). Para isso, tenha em mãos as   informações da(s) empresa(s) e/ou filial(is) que possuía(m) ativação da   integridade, selecione-a(s) novamente e confirme a ativação.

 

Contate o Help Desk Framework EM CASO DE DÚVIDAS!

 

  1. Em Microsiga Protheus TOTVS Smart Client, digite U_UPDUBA01 no campo Programa Inicial
  2. Clique em OK para continuar.
  3. Após a confirmação é exibida uma tela para a seleção da empresa em que o dicionário de dados será modificado.
  4. Ao confirmar é exibida uma mensagem de advertência sobre o backup e a necessidade de sua execução em modo exclusivo.
    1. Clique em Processar para iniciar o processamento. O primeiro passo da execução é a preparação dos arquivos.
      É apresentada uma mensagem explicativa na tela.
    2. Em seguida, é exibida a janela Atualização concluída com o histórico (log) de todas as atualizações processadas. Nesse log de atualização são apresentados somente os campos atualizados pelo programa. O compatibilizador cria os campos que ainda não existem no dicionário de dados.
    3. Clique em Gravar para salvar o histórico (log) apresentado.
    4. Clique em OK para encerrar o processamento.

Procedimento para Implantação

O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.

  1. Aplique o patch do chamado e execute o compatibilizador.
  2. No módulo SIGACFG acesse Cadastros -> Parâmetros e verifique que o parâmetro MV_AGRESTO é criado conforme especificações abaixo:

Nome da Variável:

MV_AGRESTO

Tipo:

Lógico

Descrição:

Se .T., a Ordem de Produção será realizada no momento do cadastro do fardão

Valor Padrão:

.F.

 

 

Atualizações do Compatibilizador

(Apenas para Microsiga Protheus, versões anteriores à versão 12)

1.    Criação de tabela no arquivo SX2– Tabelas:

Chave

Nome

Modo

PYME

DXB

(X2_CHAVE)

RELACIONAMENTO FARDAO/SD3

(X2_NOME)

C

(X2_MODO)

N

(X2_PYME)

 

2.  Criação de Campos no arquivo SX3 – Campos:
  • Tabela DXB - Relacionamento Fardão/SD3:

 

Campo

DXB_FILIAL

Tipo

Caracter

Tamanho

2

Formato

@!

Título

Filial

Descrição

Filial do Sistema

Nível

1

Usado

Sim

Obrigatório

Sim

Browse

Não

Grupo

033

Campo

DXB_EMISSA

Tipo

Data

Tamanho

8

Título

Data Emissao

Descrição

Data de Emissao

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Campo

DXB_FARDAO

Tipo

Caracter

Tamanho

6

Formato

@!

Título

Fardao

Descrição

Código do Fardão

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Campo

DXB_SAFRA

Tipo

Caracter

Tamanho

6

Formato

@!

Título

Safra

Descrição

Código da Safra

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Visual

Contexto

Real

Campo

DXB_PRDTOR

Tipo

Caracter

Tamanho

6

Formato

@!

Título

Produtor

Descrição

Código do Produtor

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Grupo001

Campo

DXB_LJPRO

Tipo

Caracter

Tamanho

2

Formato

@!

Título

Lj. Produtor

Descrição

Loja do Produtor

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Grupo

002

Campo

DXB_FAZ

Tipo

Caracter

Tamanho

2

Formato

@!

Título

Fazenda

Descrição

Fazenda de Produção

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Campo

DXB_OP

Tipo

Caracter

Tamanho

13

Formato

@N

Título

Ord Producao

Descrição

Ordem de Producao

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Campo

DXB_CODPRO

Tipo

Caracter

Tamanho

15

Formato

@!

Título

Produto

Descrição

Código do Produto

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Grupo033

Campo

DXB_DOC

Tipo

Caracter

Tamanho

9

Formato

@!

Título

Documento

Descrição

Número do Documento

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Campo

DXB_LOCAL

Tipo

Caracter

Tamanho

2

Formato

@!

Título

Armazem

Descrição

Código do Armazem

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Grupo024

Campo

DXB_NUMSEQ

Tipo

Caracter

Tamanho

6

Formato

@!

Título

Sequencial

Descrição

Numeracao Sequencial

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Campo

DXB_CF

Tipo

Caracter

Tamanho

3

Formato

@!

Título

Tipo RE/DE

Descrição

Tipo de Requisicao/devolu

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Campo

DXB_TM

Tipo

Caracter

Tamanho

3

Formato

@9

Título

TP Movimento

Descrição

Tipo de movimento

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

Campo

DXB_ROTINA

Tipo

Caracter

Tamanho

20

Formato

@9

Título

Rotina

Descrição

Rotina

Nível

0

Usado

Sim

Obrigatório

Sim

Browse

Não

Visual

Alterar

Contexto

Real

 

Importante:

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

3.  Criação de Índices no arquivo SIX – Índices:

Índice

DXB

Ordem

1

Chave

DXB_FILIAL+DXB_FARDAO+DXB_SAFRA+DXB_PRDTOR+DXB_LJPRO+DXB_FAZ+DXB_ROTINA

Descrição

Fardao + Safra + Produtor + Loja + Fazenda + Rotina

Proprietário

S

 

4.  Criação de Parâmetros no arquivo SX6 – Parâmetros:

Nome da Variável

MV_AGRESTO

Tipo

Lógico

Descrição

Se .T., a Ordem de Producao sera realizada no momento do cadastro do fardao.

Valor Padrão

.F.

Procedimento para Configuração


CONFIGURAÇÃO DE PARÂMETROS

 

  1. No Configurador (SIGACFG), acesse Ambientes/Cadastros/Parâmetros (CFGX017). Configure o(s) parâmetro(s) a seguir:

Itens/Pastas

Descrição

Nome:

MV_AGRESTO

Tipo:

Lógico

Cont. Por.:

.F.

Descrição:

Se .T., a Ordem de Producao sera realizada no momento do cadastro do fardao.

Procedimento para Utilização

Para ativar a geração de Ordem de Produção no Apontamento de Fardão, seguir os seguintes passos:

 

       1.            No Configurador (SIGACFG), acessar Ambientes->Cadastros->Parâmetros. Selecionar o parâmetro MV_AGRESTO e alterar o valor para .T.

       2.            No Gestão de Agroindústria (SIGAAGR), acessar Atualizações -> UBA -> Recebimento -> Cadastro de Fardão. Acionar a função F12. Definir se a ordem de produção será gerada no momento do cadastro do fardão ou sob demanda.

 

 

Ponto de Entrada

Descrição:

Informe o Menu em que estará localizada a rotina

Localização:

Informe o Submenu em que estará localizada a rotina

Eventos:

Informe o Título da rotina

Programa Fonte:

Informe o Fonte da rotina

Função:

Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”

Retorno:

Nome

Tipo

Descrição

Obrigatório

 

 

 

 

 

 

 

 

 

 

 

 

 

Exemplo:

#Include 'Protheus.ch'

User Function CN120ALT()

Local aCab:= PARAMIXB[1]

Local cTipo:= PARAMIXB[2]

If cTipo == '1'

    aCab[4][2]:= 'NF' //Validações do usuário

EndIf

Return aCab