/*CAT &EXPRTDEF *BCAT for*BCAT +
&EXJOBUSR *CAT ’’’s*BCAT spooled file+
*BCAT &EXINFILE *TCAT .*CAT &EXINNBR +
*BCAT type*BCAT &EXINTYPE *BCAT from +
output queue*BCAT &EXINOQLB *TCAT /+
*CAT &EXINOQNM *TCAT )) TOUSR(*SYSOPR)
GOTO CMDLBL(STEP4)
/******************************************************************************/
/* */
/* STEP 4: Return to APYPRTDEF and continue processing */
/* ------- */
/* */
/******************************************************************************/
STEP4:
RETURN
ENDPGM
110 APU User’s Guide