Previous Topic: Enabling High Performance View PassingNext Topic: External Action Block with High Performance View Passing


External Action Block Stub without High Performance View Passing

The following excerpt shows a section of an External Action Block stub when High Performance View Passing is not used:

.
.
 *
    PROCEDURE DIVISION USING IEF-RUNTIME-PARM1, IEF-RUNTIME-PARM2,
     W-IA, W-OA, PSMGR-EAB-DATA.
 
MAIN-0013697045.
 
    *
    * PERFORM PARA-0013697045-INIT THRU PARA-0013697045-INIT-EXIT
    * PERFORM PARA-0013697045 THRU PARA-0013697045-EXIT
    * GOBACK.
 
PARA-0013697045.
    MOVE ‘N’ TO FUNC-0013697045-ESC-FLAG

     * * * * * * * * * * * * * * * * * * * * * * *
     * USER-WRITTEN CODE SHOULD BE INSERTED HERE *
     * * * * * * * * * * * * * * * * * * * * * * *

PARA-0013697045-EXIT
     EXIT.