| Produto: | TOTVS Logística WMS |
|---|---|
| Linha de Produto: | Linha Datasul |
| Segmento: | Logística |
| Módulo: | MWM - Warehouse Management System |
| Função: | WM0372a |
| País: | Brasil |
| Ticket: | 10412777 |
| Requisito/Story/Issue (informe o requisito relacionado) : | FSWSES-1144 |
Ponto UPC para identificar necessidade de execução de regra específica para cliente Vipal.
Não se aplica.
Não se aplica.
Este Ponto de Entrada não possui retornos.
12.1.31 ou superiores
/****************************************************************************************************************
** Cliente.....: Borrachas Vipal
** Programa....: wm0372a-upc.p
****************************************************************************************************************/
{include/i-epc200.i}
DEFINE INPUT PARAM p-ind-event AS CHAR NO-UNDO.
DEFINE INPUT PARAM p-ind-object AS CHAR NO-UNDO.
DEFINE INPUT PARAM p-wgh-object AS HANDLE NO-UNDO.
DEFINE INPUT PARAM p-wgh-frame AS WIDGET-HANDLE NO-UNDO.
DEFINE INPUT PARAM p-cod-table AS CHAR NO-UNDO.
DEFINE INPUT PARAM p-row-table AS ROWID NO-UNDO.
DEFINE NEW GLOBAL SHARED VARIABLE l-g-cliente-vipal AS LOGICAL NO-UNDO.
IF p-ind-event = "afterInitializeInterface" THEN DO:
ASSIGN l-g-cliente-vipal = YES.
END.
RETURN "OK":U.
|