01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

SIGAWMS - Gestão de Armazenagem

Função:

WMSA505.prw

País:

Todos Países

Ticket:- 13658848
Requisito/Story/Issue (informe o requisito relacionado) :


FSWSES-3957


02. DESCRIÇÃO

  1. Permiti a criação de um ponto de entrada na rotina WMSA505 (Separação da Ordem de Serviço), após selecionar a opção 'Solicitar' da grid inferior 'Produtos Requisição'
  2. Na criação do Ponto de Entrada, será enviado os seguintes campos/variáveis como parâmetro: Produto, Lote, Armazém de Origem, Endereço de Origem e Quantidade a Solicitar;
  3. O programa padrão estará aguardando um valor lógico de retorno, para prosseguir ou não com o processo. 


03. LOCALIZAÇÃO

Localizado na function WMSA505MNU, no modo de 'Solicitar'        

04. PARÂMETROS

NomeTipoObrigatório
cAliasPRDArraySim

05. RETORNO

NomeTipoDescrição
lContinuaBooleanRetorna o valor lógico do PE

06. VERSÕES

Protheus 12

07. OBSERVAÇÃO

Como forma de otimização da fonte padrão, foi passado no PE como forma de parâmetro um array(cAliasPRD) que contem todos os campos solicitados pelo Escopo da Proposta. Portanto, para resgatar todos os valores dos campos solicitados desse array, pode-se fazer como logo abaixo no exemplo do print:

 

08. EXEMPLO


1 - Chamada do Ponto de  Entrada 

if lWMSA5051 .AND. lContinua 

          lContinua := ExecBlock("WMSA5051",.f.,.f.,{cAliasPRD})

EndIf


2 - Ponto de Entrada 

User Function WMSA5051( )

          Local cAliasPRD := PARAMIXB[1]

Return