* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 00050003 * * 00100003 * STATUS -- * 00150003 * * 00200003 * CHANGE LEVEL 040 000 * 00250003 * * 00300003 * FUNCTION -- * 00350003 * * 00400003 * THIS MODULE COMPRISES THE CSECT FOR THE COMMAND NAMES WHICH ARE * 00450003 * TO BE ATTACHED BY THE TMP AS ELIGIBLE FOR AUTHORIZATION * 00500003 * * 00550003 * ENTRY POINTS -- * 00600003 * * 00650003 * NONE * 00700003 * * 00750003 * INPUT -- * 00800003 * * 00850003 * NONE * 00900003 * * 00950003 * OUTPUT -- * 01000003 * * 01050003 * NONE * 01100003 * * 01150003 * EXTERNAL REFERENCES -- * 01200003 * * 01250003 * NONE * 01300003 * * 01350003 * EXITS, NORMAL -- * 01400003 * * 01450003 * NONE * 01500003 * * 01550003 * EXITS, ERROR -- * 01600003 * * 01650003 * NONE * 01700003 * * 01750003 * TABLES/WORK AREA -- * 01800003 * * 01850003 * NONE * 01900003 * * 01950003 * ATTRIBUTE -- * 02000003 * * 02050003 * REFRESHABLE * 02100003 * * 02150003 * NOTES -- * 02200003 * * 02250003 * THIS MODULE IS CHARACTER CODE DEPENDENT UPON AN INTERNAL REPRE- * 02300003 * SENTATION OF THE EXTERNAL CHARACTER SET EQUIVALENT TO THE ONE IN * 02350003 * USE AT ASSEMBLY TIME * 02400003 * * 02450003 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 02500003 EJECT 02550003 * /* START OF SPECIFICATIONS **** 02600003 * 02650003 *1MODULE-NAME = IKJEFTE2 02700003 * 02750003 *1DESCRIPTIVE-NAME = APF-ELIGIBLE-COMMAND-NAME TABLE 02800003 * 02850003 *1DESCRIPTION = CONTAINS THE COMMAND-NAMES WHICH ARE TO BE ATTACHED 02900003 * BY THE TMP AS ELIGIBLE FOR AUTHORIZATION 02950003 * 03000003 *1MODULE TYPE = TABLE 03050003 * 2FIELD = BLANKS 03100003 * 3TYPE = CHARACTER STRING 03150003 * 2FIELD = BLANKS 03200003 * 3TYPE = CHARACTER STRING 03250003 * 2FIELD = BLANKS 03300003 * 3TYPE = CHARACTER STRING 03350003 * 2FIELD = BLANKS 03400003 * 3TYPE = CHARACTER STRING 03450003 * 2FIELD = BLANKS 03500003 * 3TYPE = CHARACTER STRING 03550003 * 2FIELD = BLANKS 03600003 * 3TYPE = CHARACTER STRING 03650003 * 2FIELD = BLANKS 03700003 * 3TYPE = CHARACTER STRING 03750003 * 2FIELD = BLANKS 03800003 * 3TYPE = CHARACTER STRING 03850003 * 2FIELD = BLANKS 03900003 * 3TYPE = CHARACTER STRING 03950003 * 2FIELD = BLANKS 04000003 * 3TYPE = CHARACTER STRING 04050003 * 04100003 **** END OF SPECIFICATIONS ***/ 04150003 EJECT 04200003 SPACE 3 04250003 ENTRY APFCTABL 04300003 SPACE 1 04350003 IKJEFTE2 CSECT 04400003 DC C'IKJEFTE2' MODULE NAME 04450003 DC C'76.152 ' RELEASE LEVEL 04500003 APFCTABL DS 0D ALIGNMENT 04550003 SPACE 2 04600003 DC C' ' NAME 04650003 DC C' ' NAME 04700003 DC C' ' NAME 04750003 DC C' ' NAME 04800003 DC C' ' NAME 04850003 DC C' ' NAME 04900003 DC C' ' NAME 04950003 DC C' ' NAME 05000003 DC C' ' NAME 05050003 DC C' ' NAME 05100003 DC C' ' TERMINATOR 05150003 SPACE 2 05200003 END 05250003