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

Características do Requisito

MV_

AGRPRFA

PCREQ-10728

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.

Essa funcionalidade não é obrigatória no processo de recebimento e é configurável através do parâmetro MV_AGRPRFA. Ao ser configurado como verdadeiro, a geração de estoque de fardões de algodão será feita juntamente ao cadastro de fardões. Para isso, são disponibilizadas duas modalidades de geração, configuráveis através de parametrização na própria função de Cadastro de Fardão (AGRA601).

Para acessar a tela de parametrização, deve acionar a tecla F12 na interface inicial da rotina de Cadastro de Fardão (AGRA601).

Image Added

Após acionada a tecla F12, será apresentada a tela abaixo:

Image Added

 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*.

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:

MV_

AGRPRFA

Atualizações do Compatibilizador

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

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

2.  Criação de Campos no arquivo SX3 – Campos:

• Tabela DXB - Relacionamento Fardão/SD3:

Importante:

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

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

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

MV_

AGRPRFA

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:
   
   

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

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