Histórico da Página

Informações Gerais

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

Objetivo

• Permitir a troca de identificação de estoque automática para determinados tipos de Estrutura.
• Efetuar troca automática de identificações que utilizam empilhamento para a ultima identificação da pilha.

Definição da Regra de Negócio

Abaixo um fluxo do processo de separação:

1. WMS60018 - Contrato do Depositante - Opção Expedição-Separação/Conferência
   
   Incluir o campo Verifica data Validade/ Produção por mês e ano troca identificação? abaixo do campo Permite quebra FIFO troca identificação. Este campo deverá ficar inativo se o campo Permite quebra FIFO troca identificação for marcado. Gravar o valor deste novo campo ("S" ou "N") na tabela WMS_PARAMETRO_SEPARACAO no novo campo criado verif_vld_prd_mes_ano_troca_id.
   
   
2. WMS60030 - Função copia informações relacionadas ao contrato
   
   Alterar a função wms60030_copia_contrato para ler o novo campo criado verif_vld_prd_mes_ano_troca_id referente ao contrato de origem da cópia e gravar o valor lido para para o contrato destino da cópia.
   
   
3. WMS60100 - Tipo de Estrutura
   
   Incluir o campo Permitir troca automática de identificação na separação no cadastro de estruturas. Este campo deverá ficar abaixo do campo Utilizar drop point ressuprimento. Gravar o valor deste campo ("S", "N") na tabela WMS_TIPO_ESTRUTURA no novo campo criado permite_troca_auto_id. 
   
   
4. WMSM103 - DML tabela wms_tipo_estrutura
   
   Alterar a função WMSM103 para considerar o novo campo criado permite_troca_auto_id. 
   
   
5. WMS6215 - Realizar troca de identificação na separação
   
   4.1. Criar uma nova função wms6215_verifica_endereco_movimento. Esta função deverá receber como parâmetro a empresa , processo de movimentação e endereço. Quando o endereço vier nulo no parâmetro, esta função deverá buscar o endereço de origem do processo de movimentação e o tipo de estrutura do endereço de origem. Quando o endereço vier preenchido buscar o tipo de estrutura do endereço recebido como parâmetro na função. Para o tipo de estrutura encontrado deverá fazer a leitura da tabela wms_tipo_estrutura através da função wmsm103_wms_tipo_estrutura_leitura, recuperando a informação do novo campo permite_troca_auto_id. Se o campo estiver informado como "S" retornar TRUE se estiver informado como "N" retornar false.
   
   4.2.Criar uma nova função wms6215_valida_efetua_troca_identif, esta função deverá receber como parâmetro empresa, identificação de estoque origem, identificação de estoque nova,  processo de movimento. Nesta função deverá ser feito todas as validações já existentes na função wms6215_valida_troca_identif e também as validações da função wms6215_informa_identif_troca, após efetuar a validação deverá ser efetuado uma chamada para a função já existente wms6215_processa_troca_identif para efetuar a troca da reserva da identificação de estoque. Esta função deverá retornar TRUE ou FALSE.
   
   4.3. Criar uma nova função wms6215_busca_empilhamento_troca que deverá ser executada através do WMS6214 , quando for selecionado o movimento. 
   Este nova função deverá receber como parâmetro a empresa e processo de movimento. Esta função deverá fazer a validação se o endereço de origem do processo de movimentação está marcado para efetuar troca de identificação. Para fazer esta verificação utilizar a nova função criada  wms6215_verifica_endereco_movimento.
   
   Quando a função  wms6215_verifica_endereco_movimento retornar true indicando que o campo Permitir troca automática de identificação na separação está informado com "S" fazer a seguinte regra:

• •  Verificar se a identificação de estoque possui alguma identificação empilhada sobre ela. Para fazer esta busca fazer select com foreach na tabela wms_palete buscando pelo palete da identificação de estoque do processo de movimentação e verificar se este palete está preenchido o campo palete_empilhamento, caso não encontre dados retornar true para o programa chamador para que processo continue. Se encontrar registro pegar o campo palete do registro encontrado e o campo palete_empilhamento e alimentar em uma tabela temporária , alimentando um campo com um número sequencial das sequencias da pilha encontrada, fazer a mesma regra até que não encontre o palete no campo palete_empilhamento.Quando o campo palete_empilhamento não estiver preenchido será o ultimo palete da pilha. 

  • Após, ler os dados da temporária alimentada acima em ordem decrescente dos dados pelo campo sequencia. Para cada palete encontrado fazer um FOREACH das identificações de estoque do palete na tabela wms_identif_estoque e para cada identificação encontrada executar a nova função criada  wms6215_valida_efetua_troca_identif passando como parâmetro empresa, identificação de estoque origem (identificação do processo de movimento), identificação de estoque nova (identificação do ultimo palete da pilha),  processo de movimento . Se o retorno da função wms6215_valida_efetua_troca_identif for false, buscar a próxima identificação de estoque e assim consecutivamente até que seja possível efetuar a troca de reserva ou o palete encontrado na pilha seja o  mesmo já reservado pelo processo de movimentação. 

  • Esta função deverá retornar true , conseguindo trocar ou mantendo o mesma identificação já reservada. Somente retornará false quando ocorrer erro de select.

Abaixo figura com o exemplo da regra de busca dos dados da pilha:

4.3. Criar uma nova função wms6215_busca_identif_endereco_troca, esta função será executada quando o modo de separação estiver por endereço. Esta função deverá receber como parâmetro empresa, lista de separação, endereço, identificação de estoque. Esta função deverá buscar todas as identificações de estoque reservada para a lista e endereço recebido no parâmetro. Executar a chamada da nova função  wms6215_verifica_endereco_movimento para verificar se o tipo de estrutura do endereço de origem esta marcado para permitir troca automática de identificação de estoque. Caso não permitir deverá retornar TRUE para que o programa chamador da função continue executando normalmente. Caso o campo Permitir troca automática de identificação na separação  estiver informado como "S" Sim, deverá ser chamado a nova função criada wms6215_valida_efetua_troca_identif passando como parâmetro a empresa,  identificação de estoque origem (identificação encontrada no select), identificação de estoque nova (identificação recebida como parâmetro na função wms6215_busca_identif_endereco_troca) ,  processo de movimento encontrado no select, caso a função chamada retorne TRUE, deverá finalizar o foreach retornando TRUE para o programa principal, caso contrário buscar as próximas identificações, Caso não seja possível efetuar a troca por nenhuma das identificações deverá mostrar mensagem ao usuario usuário informando que "Não foi possível efetuar a troca automática da identificação" e retornar false. 

Exemplo select para busca das identificações de estoque e processos de movimentação do endereço
SELECT wms_processo_moviment.processo_moviment,
wms_processo_moviment.identif_estoque
FROM wms_onda_separacao_item,
wms_processo_moviment
WHERE wms_processo_moviment.empresa = wms_onda_separacao_item.empresa
AND wms_processo_moviment.processo_moviment = wms_onda_separacao_item.processo_moviment
AND wms_onda_separacao_item.empresa = '44'
AND wms_onda_separacao_item.num_lista_separacao = 2381
AND wms_processo_moviment.endereco_origem = 1
AND wms_processo_moviment.sit_processo_moviment NOT IN ('FI','CA', 'AT')
AND wms_processo_moviment.endereco_origem = '1'

4.5. Alterar a função wms6215função wms6215_carrega_parametros para inserir a leitura do novo parametro parâmetro criado no contrato do depositante "Verifica data Validade/Produção por mês e ano troca identificação", 

Exemplo:
WHENEVER ERROR CONTINUE
       SELECT verif_vld_prd_mes_ano_troca_id
         INTO m_verif_vld_prd_mes_ano_troca_id
         FROM wms_parametro_separacao
        WHERE empresa     = l_empresa
          AND depositante = l_depositante
     WHENEVER ERROR STOP
     IF sqlca.sqlcode <> 0 THEN
        CALL log0030_processa_err_sql("SELECT", "wms_parametro_separacao", 1)
        CALL wms6215_help("Erro busca parametros", NULL)
        RETURN FALSE
     END IF
  IF m_ verif_vld_prd_mes_ano_troca_id IS NULL OR m_ verif_vld_prd_mes_ano_troca_id= ' ' THEN
     LET m_verif_vld_prd_mes_ano_troca_id = 'N'
  END IF
 
 

4.6. Alterar a função wms6215_valida_nova_identif na leitura dos dimensionais no select da tabela estoque_lote_ender para verificar se a variável m_permite_quebra_fifo está como "N". Se estiver como N, indica que nao permite a quebra     de FIFO dos dimensionais na troca da identificação, neste caso deverá ser validado também o novo parâmetro criado no contrato do depositante Verifica data Validade/ Produção por mês e ano troca identificação?, se estiver informado como "S" , deverá ser alterado o SELECT que valida os dimensionais para validar no lugar a data completa de produção e validade somente o mê e ano. Neste caso se existirem datas diferentes porém o més e ano é igual permite e troca. 

Exemplo select para busca das identificações de estoque e processos de movimentação do endereço
SELECT wms_processo_moviment.processo_moviment,
wms_processo_moviment.identif_estoque
FROM wms_onda_separacao_item,
wms_processo_moviment
WHERE wms_processo_moviment.empresa = wms_onda_separacao_item.empresa
AND wms_processo_moviment.processo_moviment = wms_onda_separacao_item.processo_moviment
AND wms_onda_separacao_item.empresa = '44'
AND wms_onda_separacao_item.num_lista_separacao = 2381
AND wms_processo_moviment.endereco_origem = 1
AND wms_processo_moviment.sit_processo_moviment NOT IN ('FI','CA', 'AT')
AND wms_processo_moviment.endereco_origem = '1'

6. WMS6214 - Programa de separação5. wms6214

Quando no contrato do depositante está selecionado o modo de separação "por movimentos" , quando for pressionado ENTER no movimento, deverá ser efetuado as seguintes alterações:

Alterar o programa wms6214 na função  wms6214_exibe_array_movimentos para que na tecla <return> quando o usuário pressiona enter e o campo Status_movto está <> 'No equipamento"  antes de fazer a chamada da função wms6214_carrega_informacaoes_movimento inserir uma chamada para a nova função criada  wms6215_busca_empilhamento_troca para buscar se o item possui empilhamento e efetuar a troca se necessário conforme detalhes da função wms6215_busca_empilhamento_troca. Após o retorno da função caso retorne false executar o exit display, caso contrário continua a execução do programa.

Alterar a função wms6214_inicia_movimento no input incluir no AFTER FIELD etiq_destino quando a variavel l_etiqueta_entrada <> m_etiqueta_origem uma rotina para verificar se o tipo de estrutura do endereço do processo de movimento permite efetuar troca automática de identificação . Para isto deverá ser executado a nova função criada wms6215_verifica_endereco_movimento() passando como parâmetro a empresa e processo de movimento , caso esta função retorne FALSE continuar o processamento normalmente. quando retornar TRUE deverá ser executado a nova função criada wms6215_valida_efetua_troca_identif, enviar como parâmetro parâmetro empresa, identificação de estoque origem, identificação de estoque nova,  processo de movimento. Caso a função retorne true, devera ser alimentado a variável m_etiqueta_origem com o mesmo valor da etiqueta informada e continuar o processo de separação. Caso a função retorne false não altera os valores das variáveis e continuar o processo atual.

67. WMS6353 - Função de separação por endereço

Alterar a função wms6353_informa_dados_etiq_end para efetuar a chamada da nova função criada wms6215_busca_identif_endereco_troca, antes da chamada da função wms6353_valida_identificacao. quando a nova função wms6215_busca_identif_endereco_troca retornar FALSE, deverá mostrar a seguinte mensagem ao usuario: "Não foi possivel efetuar a troca automatica da identificação. " e deverá executar o comando NEXT FIELD identif_estoque. 

Opcional

Protótipo de Tela

Protótipo 01

Prototipo 02 

Opcional

Dicionário de Dados