Histórico da Página

...

OK: execução com sucesso.

Execução Persistente:

Para a execução persistente da CPAPI301, as variáveis e tabelas temporárias devem ser definidas corretamente, conforme especificação.

define variable h-cpapi301 as handle no-undo.

run cpp/cpapi301.p persistent set h-cpapi301 (input-output table tt-ord-prod,
                                              input-output table tt-reapro,
                                              input-output table tt-erro,
                                              input        true).

run ativaExecPersistente in h-cpapi301.

run pi-processa-ordens in h-cpapi301 (input-output table tt-ord-prod,
                                         input-output table tt-reapro,
                                         input-output table tt-erro,
                                         input        true).
 if  return-value = "nok":U then do:

    for each tt-erro:

    end.
 end.

run finalizaAPI in h-cpapi301.

if valid-handle(h-cpapi301) then

    delete procedure h-cpapi301.

Funções/Includes/Procedures Externas

...