DT PE DLA150MK – Controla a marcação de registros no browse de execução de serviços WMS.

01. DADOS GERAIS

Produto:	TOTVS Logística WMS
Linha de Produto:	Linha Protheus
Segmento:	Logística
Módulo:	TOTVS WMS - Linha Protheus - WMS Protheus (SIGAWMS)
Função:	Execução de serviços - WMSA150/DLGA150
País:	Todos Países
Ticket:
Requisito/Story/Issue (informe o requisito relacionado) :	DLOGWMSMSP-15419

Ponto de entrada acionado após a marcação do registro no browse de serviços a executar. Programas que contém o ponto de entrada: WMSA150 e DLGA150.

Após a marcação do registro no browse

Nome	Tipo	Descrição	Obrigatório
cMarca	Character	Marca do registro no browse	Sim

Nome	Tipo	Descrição	Obrigatório
lRet	Lógico	Define se o registro poderá ser marcado	Sim

Protheus 12

------

#INCLUDE "TOTVS.CH"

User Function DLA150MK()
Local cMarca := PARAMIXB

Local lRet := .T.

If xFilial('DCF') == "01" .And. DCF->DCF_SERVIC = "002"
//Alguma coisa aqui
MsgInfo("Mensagem", "Título")

//Posicionando em outro registro para marcar (fazer GetArea e RestArea)
// Reclock('DCF',.F.)
// DCF->DCF_OK := cMarca
// DCF->DCF_STRADI := ' '

lRet := .F.
EndIf
Return lRet

------