* %GOTO SSENCMT; /* @ZA34144 00050003 MACRO @ZA34144 00100003 IEFSSEN 00150003 .*/ %SSENCMT:; /* @ZA34144*/ 00200003 */********************************************************************/ 00250003 */* MACRO NAME = IEFSSEN @ZA34144*/ 00300003 */* DESCRIPTIVE NAME = END OF MEMORY (EOM) FUNCTION @ZA34144*/ 00350003 */* STATUS = SPLITOUT FROM IEFJSSOB @ZA34144*/ 00400003 */* ACCESS METHOD = INVOKED VIA IEFJSSOB MACRO @ZA34144*/ 00450003 */* COPYRIGHT = NONE @ZA34144*/ 00500003 */********************************************************************/ 00550003 * %GOTO SSENPLS; /* @ZA34144 00600003 * 00700003 SSOBEOM EQU 8 EOM FUNCTION ID (SSOBFUNC) 00750003 * 00800003 * EOM RETURN CODES (SSOBRETN) 00850003 * 00900003 * NO EOM RETURN CODES CURRENTLY DEFINED 00950003 * 01000003 ORG SSOBGN 01050003 SSENBGN EQU * 01100003 SSENLEN DC AL2(SSENSIZE) EOM EXTENSION LENGTH 01150003 SSENRESV DS H RESERVED 01200003 SSENASID DS H ASID OF TERMINATING MEMORY 01250003 SSENFLAG DS B END OF MEMORY FLAGS 01300003 SSENTYPE EQU X'80' ON - ABNORMAL MEMORY TERMINATION 01350003 * OFF- NORMAL MEMORY TERMINATION 01400003 SSENRSV1 DS X RESERVED 01450003 SSENJBNM DS A JOBNAME LIST POINTER - EACH JOBNAME 01500003 * ENTRY IS 12 BYTES - 01550003 * 1ST 4 BYTES - PTR TO NEXT JOBNAME 01600003 * ENTRY (LAST ENTRY CONTAINS ZEROS 01650003 * IN 1ST 4 BYTES) 01700003 * LAST 8 BYTES - JOBNAME ASSOCIATED 01750003 * WITH TERMINATING MEMORY 01800003 SSENASCB DS A ASCB ADDRESS OF TERMINATING MEMORY 01850003 * 01900003 SSENSIZE EQU *-SSENBGN EOM EXTENSION LENGTH 01950003 SSOBLEN5 EQU SSOBHSIZ+SSENSIZE TOTAL SSOB LENGTH 02000003 MEND @ZA34144*/ 02050003 * %SSENPLS:; /* @ZA34144*/ 02080003 * DCL SSOBEOM FIXED(15) CONSTANT(08); /* EOM FUNCTION ID (SSOBFUNC)*/ 02150003 * /* */ 02200003 * /* EOM RETURN CODES (SSOBRETN) */ 02250003 * /* */ 02300003 * /* NO EOM RETURN CODES CURRENTLY DEFINED */ 02350003 * /* */ 02400003 * /* S S E N */ 02450003 * DECLARE 02500003 * 1 SSEN SSOBEN, 02550003 * 2 SSENLEN FIXED(15),/* LENGTH OF SSEN */ 02600003 * 2 * FIXED(15),/* RESERVED */ 02650003 * 2 SSENASID FIXED(15),/* ASID OF TERMINATING MEMORY */ 02700003 * 2 SSENFLAG BIT(8), /* END OF MEMORY FLAGS */ 02750003 * 3 SSENTYPE BIT(1), /* ON - ABNORMAL MEMORY TERMINATION 02800003 * OFF- NORMAL MEMORY TERMINATION*/ 02850003 * 3 * BIT(7), /* RESERVED FLAGS */ 02900003 * 2 * PTR(8), /* RESERVED */ 02950003 * 2 SSENJBNM PTR(31), /* JOBNAME LIST POINTER - EACH 03000003 * JOBNAME ENTRY IS 12 BYTES - 03050003 * 1ST 4 BYTES -PTR TO NEXT 03100003 * JOBNAME ENTRY (LAST ENTRY 03150003 * CONTAINS ZEROS IN 1ST 4 03200003 * BYTES) 03250003 * LAST 8 BYTES -JOBNAME ASSOCIATED 03300003 * WITH TERMINATING MEMORY */ 03350003 * 2 SSENASCB PTR(31); /* ASCB ADDRESS OF TERMINATING 03400003 * MEMORY */ 03450003