TITLE ' IGG2G11 - IBM STANDARD UCS IMAGE - G11 ' 00050002 * /* START OF SPECIFICATIONS **** 00100002 * 00150002 *01* MODULE-NAME = IGG2G11 00200002 * 00250002 *01* DESCRIPTIVE-NAME = UCS IMAGE TYPE=G11 00300002 * 00350002 *01* COPYRIGHT = NONE 00400002 * 00450002 *01* STATUS = RELEASE LEVEL 01 00500002 * 00550002 *01* FUNCTION = UCS IMAGE - G11 - ASCII (63 GRAPHICS) 00600002 * 00650002 *01* NOTES = THIS MODULE CONTAINS THE UCS IMAGE G11 00700002 * THIS MODULE IS NOT EXECUTABLE 00750002 * THIS MODULE CONTAINS TWO CSECTS 00800002 * THE FIRST IS NAMED IGGDG11 AND THE FLAG BYTE IS X'80' 00850002 * THE SECOND IS NAMED IGGNG11 AND THE FLAG BYTE IS X'0' 00900002 * EITHER THE FIRST OR SECOND CSECT WILL BE LINK-EDITED 00950002 * INTO IMAGELIB DURING SYSGEN AS UCS2G11. THE ONE TO BE 01000002 * LINK EDITED IS DETERMINED DURING SYSGEN BY WHETHER 01050002 * G11 IS TO BE A DEFAULT IMAGE. 01100002 * 01150002 *02* CHARACTER-CODE-DEPENDENCIES = NONE 01200002 * 01250002 *02* DEPENDENCIES = NONE 01300002 * 01350002 *02* RESTRICTIONS = NONE 01400002 * 01450002 *02* REGISTER-CONVENTIONS = NONE 01500002 * 01550002 *02* PATCH-LABEL = NONE 01600002 * 01650002 *01* MODULE-TYPE = MODULE 01700002 * 01750002 *02* PROCESSOR = ASSEM-370R 01800002 * 01850002 *02* MODULE-SIZE = 1060 BYTES 01900002 * 01950002 *02* ATTRIBUTES = REENTERABLE 02000002 * 02050002 *01*ENTRY-POINT = IGG2G11 02100002 * 02150002 *02* PURPOSE = STANDARD UCS IMAGE 02200002 * 02250002 *02* LINKAGE = NONE 02300002 * 02350002 *02* INPUT = NONE 02400002 * 02450002 *02* OUTPUT = NONE 02500002 * 02550002 *02* EXIT-NORMAL = NONE 02600002 * 02650002 *02* EXIT-ERROR = NONE 02700002 * 02750002 *01*EXTERNAL-REFERENCES = NONE 02800002 * 02850002 *02* ROUTINES = NONE 02900002 * 02950002 *02* DATA-SETS = NONE 03000002 * 03050002 *02* DATA-AREA = NONE 03100002 * 03150002 *02* CONTROL-BLOCKS = NONE 03200002 * 03250002 *01*TABLES = NONE 03300002 * 03350002 *01*MACROS = NONE 03400002 * 03450002 *01* CHANGE-ACTIVITY = SEE BELOW 03500002 * 03550002 *02* VS2-02 03600002 * 03650002 * MODULE CREATED 03700002 * 03750002 **** END OF SPECIFICATIONS ***/ 03800002 IGGDG11 CSECT 03850002 DC X'80' DEFAULT FLAG SET 03900002 DC AL1(16) NO. OF LINES FOR VERIFICATION 03950002 DC 16AL1(27) NO. OF CHARS. PER LINE 04000002 DC 4C'1''BDJL-5K*C(N0?)SA@=E^#R>V92\YT[G68]XF"H.|UO7/P3WMIQX04050002 ,41''BDJL-5K*C(N0$)SA&&=E:#RZV92;YT+G68V92\YT[G68]XF"H.|UO7/P3WMIQX04500002 ,41''BDJL-5K*C(N0$)SA&&=E:#RZV92;YT+G68