| Produto: | TOTVS Logística WMS |
|---|---|
| Linha de Produto: | Linha Datasul |
| Segmento: | Logística |
| Módulo: | MWM - Warehouse Management System |
| Função: | WM9000 |
| 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.
Ponto de evento VerificaClienteExec com valor return sinaliza necessidade de lógica específica.
12.1.31 ou superiores
/****************************************************************************************************************
** Cliente.....: Borrachas Vipal
** Programa....: wm9000-upc.p
****************************************************************************************************************/
{include/i-epc200.i1} /*Defini»’o da temp-table tt-epc*/
DEFINE INPUT PARAMETER p-ind-event AS CHARACTER NO-UNDO.
DEFINE INPUT-OUTPUT PARAMETER TABLE FOR tt-epc.
IF p-ind-event = "VerificaClienteExec" THEN DO:
IF CAN-FIND(FIRST tt-epc
WHERE tt-epc.cod-event = p-ind-event
AND tt-epc.cod-parameter = "retornaClienteExec" ) THEN DO:
create tt-epc.
assign tt-epc.cod-event = p-ind-event
tt-epc.cod-parameter = "return"
tt-epc.val-parameter = "vipal" .
END.
END.
RETURN "OK":U.
|