| Produto: | TOTVS Logística WMS |
|---|---|
| Linha de Produto: | Linha Datasul |
| Segmento: | Logística |
| Módulo: | CEP |
| Função: | CE9701 |
| País: | Brasil |
| Ticket: | 11377470 |
| Requisito/Story/Issue (informe o requisito relacionado) : | FSWSES-2807 |
Ponto UPC para identificar necessidade de execução de regra específica para cliente Compactor.
Não se aplica.
Não se aplica.
Ponto de evento VerifMovtoEstoq sinaliza necessidade de lógica específica.
12.1.32 ou superiores
{include/i-prgvrs.i BOSC118-UPC 2.00.00.001 } /*** 010001 ***/
{include/i-epc200.i bosc118} /** Defini»’o tt-EPC **/
DEFINE INPUT PARAM p-ind-event AS CHARACTER NO-UNDO.
DEFINE INPUT-OUTPUT PARAM TABLE FOR tt-epc.
IF p-ind-event = "VerifMovtoEstoq" THEN DO:
FIND FIRST tt-epc NO-LOCK
WHERE tt-epc.cod-event = p-ind-event NO-ERROR.
IF AVAIL tt-epc then
CREATE tt-epc.
ASSIGN tt-epc.cod-event = p-ind-event
tt-epc.cod-parameter = "RetornoEPC"
tt-epc.val-parameter = "NOK".
END.
END. |