01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:SIGAWMS - Gestão de Armazenagem
Função:-
País:Todos Países
Ticket:-
Requisito/Story/Issue (informe o requisito relacionado) :-


02. DESCRIÇÃO

Este Ponto de Entrada permite inserir validações complementares no processo de transferência WMS Protheus via monitor, após a validação padrão do sistema.

03. LOCALIZAÇÃO

Localizado na rotina WMSA225 (Transferência WMS), na validação do modelo, após a validação do produto padrão. Chamado ao clicar em Confirmar.

04. PARÂMETROS

NomeTipoDescrição

oModel

Numérico

Objeto modelo de dados contendo todas as informações em tela

05. RETORNO

NomeTipoDescriçãoObrigatório

aRet

Array

Contém 2 informações:

1 - lógico: se verdadeiro, permite continuar o processo. Se falso, o processo de inclusão é abortado.

2 - caracter: caso o primeiro item do array seja falso, deverá retornar a mensagem com o motivo para abortar a inclusão. Este motivo será exibido pelo produto padrão.

Sim

06. VERSÕES

12.1.33 ou superiores

07. OBSERVAÇÃO

Todos os parâmetros são recebidos na User Function via PARAMIXB conforme consta em Execblock / Customização.

Para validações antes da validação do produto padrão deve-se usar o ponto de entrada WMS332VL.

08. EXEMPLO


#INCLUDE "PROTHEUS.CH"

Static cLocDes := ''
User Function WMS225VA()
Local oModel := ParamIxb[1]
Local oModelSel := oModel:GetModel("SELECAO")
Local nI := 0
Local aRet := {.T.,""}

For nI := 1 To oModelSel:Length()
   If !oModelSel:IsDeleted(nI)
      cLocDes := oModelSel:GetValue("LOCDES",nI)
      If oModelSel:GetValue("LOCDES",nI) = '04'
         aRet := {.F., "Não é possível transferir para armazém 04."}
         Exit
      EndIf
   EndIf
Next nI

//Se ocorrer erro, limpa a varíavel usada no PE WMSPOSDC
If !aRet[1]
   cLocDes := ''
EndIf

Return aRet




<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>