Histórico da Página

01. DADOS GERAIS

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:	1041277711727206
Requisito/Story/Issue (informe o requisito relacionado) :	FSWSES-11442277

02. DESCRIÇÃO

Ponto UPC para identificar necessidade de execução de regra específica para cliente Vipalse nas buscas das tabelas deve ser feita a comparação com o campo número sequencia item (num-seq-item).

03. LOCALIZAÇÃO

Não se aplica.

04. PARÂMETROS

Não se aplica.

05. RETORNO

Ponto de evento VerificaClienteExec com valor return sinaliza necessidade de lógica específicado evento valida-num-seq-item indica se deve ser feita a comparação com o número sequencia item (num-seq-item).

06. VERSÕES

12.1.31 ou superiores

08. EXEMPLO

Bloco de código

language	cpp
title	Exemplo
linenumbers	true
collapse	true

/****************************************************************************************************************
**  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 = "VerificaClienteExecValidacaoNumSeqItem" THEN DO:

   IFFIND CAN-FIND(FIRST tt-epc
                WHERE tt-epc.cod-event     = p-ind-event
                  AND tt-epc.cod-parameter = "retornaClienteExec" )Valida-num-seq-item" NO-ERROR.
   IF AVAIL tt-epc THEN DO:

        create tt-epc.
        assign tt-epc.cod-event     = p-ind-event"valida-num-seq-item"
               tt-epc.cod-parameter = "returnvalida-num-seq-item"
               tt-epc.val-parameter = "vipal"string(NO) .
       
    END.
END.

RETURN "OK":U.

Árvore de páginas

Versões comparadas

Versão antiga 1

Nova versão Atual

Chave