TITLE ' IGG1YN - IBM STANDARD UCS IMAGE - YN ' 00050002 * /* START OF SPECIFICATIONS **** 00100002 * 00150002 *01* MODULE-NAME = IGG1YN 00200002 * 00250002 *01* DESCRIPTIVE-NAME = UCS IMAGE TYPE=YN 00300002 * 00350002 *01* COPYRIGHT = NONE 00400002 * 00450002 *01* STATUS = RELEASE LEVEL 01 00500002 * 00550002 *01* FUNCTION = UCS IMAGE - YN - HIGH SPEED ALPHANUMERIC 00600002 * (42 GRAPHICS-39 PREFERRED) 00620002 * 00650002 *01* NOTES = THIS MODULE CONTAINS THE UCS IMAGE YN 00700002 * THIS MODULE IS NOT EXECUTABLE 00750002 * THIS MODULE CONTAINS TWO CSECTS 00800002 * THE FIRST IS NAMED IGGDYN AND THE FLAG BYTE IS X'80' 00850002 * THE SECOND IS NAMED IGGNYN AND THE FLAG BYTE IS X'0' 00900002 * EITHER THE FIRST OR SECOND CSECT WILL BE LINK-EDITED 00950002 * INTO IMAGELIB DURING SYSGEN AS UCS1YN. THE ONE TO BE 01000002 * LINK EDITED IS DETERMINED DURING SYSGEN BY WHETHER 01050002 * YN 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 = 500 BYTES 01900002 * 01950002 *02* ATTRIBUTES = REENTERABLE 02000002 * 02050002 *01*ENTRY-POINT = IGG1YN 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 IGGDYN CSECT 03850002 DC X'80' DEFAULT FLAG SET 03900002 DC AL1(6) NO. OF LINES FOR VERIFICATION 03950002 DC AL1(39) CHARACTERS ON FIRST LINE 03970002 DC AL1(42) CHARACTERS ON SECOND LINE 03990002 DC AL1(39) CHARACTERS ON THIRD LINE 04010002 DC AL1(39) CHARACTERS ON FOURTH LINE 04030002 DC AL1(42) CHARACTERS ON FIFTH LINE 04050002 DC AL1(39) CHARACTERS ON SIXTH LINE 04070002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.' 04090002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.#-$' 04110002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.' 04130002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.' 04150002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.#-$' 04170002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.' 04190002 IGGNYN CSECT 04300002 DC X'00' DEFAULT FLAG NOT SET 04350002 DC AL1(6) NO. OF LINES FOR VERIFICATION 04400002 DC AL1(39) CHARACTERS ON FIRST LINE 04450002 DC AL1(42) CHARACTERS ON SECOND LINE 04500002 DC AL1(39) CHARACTERS ON THIRD LINE 04550002 DC AL1(39) CHARACTERS ON FOURTH LINE 04600002 DC AL1(42) CHARACTERS ON FIFTH LINE 04650002 DC AL1(39) CHARACTERS ON SIXTH LINE 04700002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.' 04750002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.#-$' 04800002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.' 04850002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.' 04900002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.#-$' 04950002 DC C'1234567890STABCDEFGHIJKLMNOPQRUVWXYZ*,.' 05000002 END 05050002