/********************************************************************/ 02000003 /* */ 02002003 /* MACRO NAME = IGGMGVO */ 02004003 /* */ 02006003 /* DESCRIPTIVE NAME = VOLUME INFORMATION SET OF FIELDS */ 02008003 /* */ 02010003 /* FUNCTION = MAPPING FOR THE VOLUME OCCURRENCE FIELDS AS THEY */ 02012003 /* APPEAR IN THE RECORDS. ALSO, A MAPPING OF THE */ 02014003 /* EXTENT STRUCTURE IN THE VOLUME OCCURRENCES. */ 02016003 /* */ 02018003 /* INCLUDED MACROS = NONE */ 02020003 /* */ 02022003 /* METHOD OF ACCESS = PL/S - RESPECIFY A BASE FOR GVO */ 02024003 /* AND/OR CMFXECTS(*) */ 02026003 /* */ 02028003 /* STATUS = VS/2 RELEASE 3 (CHANGE FLAG @Y30SSXX) */ 02030003 /* */ 02032003 /* DATE OF LAST CHANGE = 17 JUL 74 */ 02034003 /* */ 02036003 /********************************************************************/ 02038003 /********************************************************************/ 02040003 /* VOLUME GROUP OCCURRENCE AS IN THE RECORDS */ 02042003 /********************************************************************/ 02044003 DECLARE 02046003 1 GVO BASED, /* VOLUME OCCURRENCE STRUCTURE */ 04000003 2 CMFLDEVT PTR(32) BDY(BYTE),/* DEVICE TYPE */ 06000003 2 CMFLVOL CHAR(6), /* VOLUME SERIAL NUMBER */ 08000003 2 CMFLFLSQ FIXED(15), /* FILE SEQUENCE NUMBER */ 10000003 2 CMFLVLFL BIT(8), /* VOLUME FLAGS */ 12000003 3 CMFLVLPR BIT(1), /* PRIME VOLUME */ 14000003 3 CMFLVLCN BIT(1), /* CANDIDATE VOLUME */ 16000003 3 CMFLVLOV BIT(1), /* OVERFLOW VOLUME */ 18000003 3 * BIT(5), /* RESERVED */ 20000003 2 CMFLNOEX PTR(8), /* NO. OF EXTENTS */ 22000003 2 CMFLHKBA PTR(32) BDY(BYTE),/* HIGH KEY CI VALUE, RANGE */ 24000003 2 CMFLHUBA PTR(32) BDY(BYTE),/* HIGH USED RBA */ 26000003 2 CMFLHABA PTR(32) BDY(BYTE),/* HIGH ALLOCATED RBA */ 28000003 2 CMFLPHYB PTR(32) BDY(BYTE),/* PHYSICAL BLOCKSIZE */ 30000003 2 CMFLNBTK FIXED(15), /* BLOCKS PER TRACK */ 32000003 2 CMFLNTKA FIXED(15), /* TRACKS PER CONTROL AREA */ 34000003 2 CMFLITEX BIT(8), /* TYPE OF EXTENT */ 36000003 3 CMFLSSDT BIT(1), /* SEQUENCE SET WITH DATA */ 38000003 3 CMFLNOPF BIT(1), /* NOT PREFORMATTED SPACE */ 40000003 3 * BIT(6), /* RESERVED */ 42000003 2 CMFLSSDS FIXED(15) BDY(BYTE),/* SS NO. OF DATA SET DIRCTRY */ 44000003 2 CMFOVERL CHAR(14); /* STRUCTURE END INDICATION 44050003 Y02020*/ 44100002 /********************************************************************/ 44102003 /* TRACK OVERFLOW (PAGE SPACE) Y02020*/ 44110003 /********************************************************************/ 44120003 DECLARE 44130003 1 CMFOVLAY BASED (ADDR(CMFOVERL)-8), /* Y02020*/ 44150003 2 CMFBYTRK FIXED(31) BDY(BYTE),/* BYTES PER TRACK (PAGE SPACE) 44200003 Y02020*/ 44210002 2 CMFBYTAU FIXED(31) BDY(BYTE),/* BYTES PER ALLOCATION UNIT 44250003 Y02020*/ 44300002 2 CMFLLKLN FIXED(15) BDY(BYTE),/* LOW KEY VALUE LENGTH */ 46000003 2 CMFLHKLN FIXED(15) BDY(BYTE),/* HIGH KEY VALUE LENGTH */ 48000003 2 CMFLEXLN FIXED(15) BDY(BYTE),/* LENGTH OF EXTENTS */ 50000003 2 CMFLEND CHAR(0); /* END OF VOLUME OCCUR FIELDS */ 52000003 /********************************************************************/ 54000003 /* EXTENT STRUCTURE IN VOLUME OCCURRENCES */ 54500003 /********************************************************************/ 55000003 DECLARE 55500003 1 CMFXECTS (*) CHAR(20) BASED, /* EXTENT STRUCTURE */ 56000003 2 CMFXEXSS FIXED(15) BDY(BYTE),/* SPACE SEQUENCE NO. */ 58000003 2 CMFXEXST CHAR(4), /* STARTING CCHH */ 60000003 3 CMFXSTA PTR(31) BDY(BYTE),/* ARITHMETIC FORM - CCHH */ 62000003 4 CMFXSTCC FIXED(15) BDY(BYTE),/* CYLINDER START */ 64000003 4 CMFXSTHH FIXED(15) BDY(BYTE),/* TRACK START */ 66000003 2 CMFXEXED CHAR(4), /* ENDING CCHH */ 68000003 3 CMFXEDA PTR(31) BDY(BYTE),/* ARITHMETIC FORM - CCHH */ 70000003 4 CMFXEDCC FIXED(15) BDY(BYTE),/* CYLINDER END */ 72000003 4 CMFXEDHH FIXED(15) BDY(BYTE),/* TRACK END */ 74000003 2 CMFXNOTT FIXED(15) BDY(BYTE),/* NO. TRACKS IN EXTENT */ 76000003 2 CMFXLRBA PTR(32) BDY(BYTE),/* STARTING DDDD IN EXTENT */ 78000003 2 CMFXHRBA PTR(32) BDY(BYTE);/* ENDING DDDD IN EXTENT */ 80000003