DT PE WMS225VL - Valida a confirmação da transferência de endereços no monitor

01. DADOS GERAIS

Produto:	TOTVS Logística WMS
Linha de Produto:	Linha Protheus
Segmento:	Logística
Módulo:	SIGAWMS - Gestão de Armazenagem
Função:	WMSA225 - Transferência WMS
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, antes da validação padrão do sistema.

03. LOCALIZAÇÃO

Localizado na rotina WMSA225 (Transferência WMS), na validação do modelo, antes da validação do produto padrão.

É chamado ao clicar em Confirmar.

04. PARÂMETROS

Nome	Tipo	Descrição
oModel	Objeto	Modelo de dados da rotina, que contém todas as informações da tela.

05. RETORNO

Nome	Tipo	Descrição
lRet	Lógico	Indica se a transferência deve ser permitida.

06. VERSÕES

Protheus 12.1.17 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 específicas após a validação padrão, existe o Ponto de Entrada WMS225VA – Valida a confirmação da transferência de endereços no monitor.

08. EXEMPLO

------

User Function WMS225VL()
Local lRet := .T.
Local oModel := PARAMIXB[1] //modelo de dados da rotina
Local oModelDCF := oModel:GetModel("DCFMASTER") //modelo de dados do cabeçalho da transferência
Local oModelSel := oModel:GetModel("SELECAO") //modelo de dados contendo a lista de produtos selecionados para a transferência
Local nI := 1

For nI := 1 To oModelSel:Length()
If Empty(oModelSel:GetValue("ENDDES",nI))
oModel:SetErrorMessage(oModelSel:GetId(),oModelSel:GetId(),,,"SIGAWMS","Informe o endereço destino.","")
lRet := .F.
EndIf
Next nI

Return lRet