/********************************************************* @G24LB26*/ 00050000 /* @G24LB26*/ 00100000 /* NAME: IEZBFTBL (VOLUME BEST FIT TABLE) @G24LB26*/ 00150000 /* @G24LB26*/ 00200000 /* FUNCTION - MAPPING MACRO (ALLOCATE TO MOUNTED VOLUMES) @G24LB26*/ 00250000 /* TABLE HOLDING ALL VOLUMES IN A SPECIFIC @G24LB26*/ 00260000 /* GROUP ELIGIBLE TO BE SELECTED FOR A @G24LB26*/ 00270000 /* PARTICULAR REQUEST. CERTAIN FIELDS WILL BE @G24LB26*/ 00280000 /* SORTED WHEN THE LIST IS COMPLETE IN ORDER @G24LB26*/ 00300000 /* OF THEIR FITNESS FOR THE REQUEST. ALSO IS @G24LB26*/ 00350000 /* PASSED TO THE TABLE PROCESSOR ROUTINE TO @G24LB26*/ 00360000 /* OBTAIN ADDITIONAL INFORMATION ON THE @G24LB26*/ 00370000 /* VOLUMES. @G24LB26*/ 00380000 /* @G24LB26*/ 00600000 /* STATUS: MVS/VS1 @G24LB26*/ 00650000 /* @G24LB26*/ 00700000 /* CHANGE ACTIVITY - @ZA28479*/ 00710000 /* CHANGE 1 10/21/77 SPACE ACCOUNTING. ADD FIELD @ZA28479*/ 00718000 /* BFMTDOHT. @ZA28479*/ 00726000 /* @ZA28479*/ 00734000 /********************************************************* @G24LB26*/ 00750000 DCL 1 BFTBL BASED BDY(WORD), /*@G24LB26*/ 00850000 2 BFHEADER, /*HEADER SECTION @G24LB26*/ 00900000 3 BFLEN FIXED(15), /*LENGTH OF TABLE @G24LB26*/ 00910000 3 BFGROUP CHAR(8), /*GROUP NAME @G24LB26*/ 00950000 3 BFTOTIDX FIXED(15), /*# ELEMENTS IN ARRAY @G24LB26*/ 01000000 3 BFDEVTP FIXED(31), /*INTERNAL DEVICE TYPE @G24LB26*/ 01050000 /*OR UCB ADDRESS @G24LB26*/ 01100000 3 BFJOBID FIXED(31), /*TCB ADDRESS (VS1) OR @G24LB26*/ 01110000 /*ASID (VS2) @G24LB26*/ 01120000 3 BFREQFLS BIT(8), /*REQUEST FLAGS @G24LB26*/ 01150000 4 BFNSHRFL BIT(1), /*REQUEST IS NON-SHARE @G24LB26*/ 01200000 4 * BIT(7), /*UNUSED @G24LB26*/ 01250000 2 BFENTRY(*), /*START OF ARRAY @G24LB26*/ 01300000 3 BFSLOT, /*SLOT SECTION @G24LB26*/ 01350000 4 BFVOLID CHAR(6), /*SERIAL NUM OF VOL @G24LB26*/ 01360000 4 BFGRPIDX FIXED(8), /*EXTENSION INDEX NUM @G24LB26*/ 01400000 4 BFGRPSLT FIXED(8), /*EXTENSION SLOT NUM @G24LB26*/ 01450000 4 BFHPFLGS BIT(8), /*HIGH PRIORITY SORTING @G24LB26*/ 01500000 /*FLAGS @G24LB26*/ 01550000 5 BFHRSKFL BIT(1), /*VOL IS HIGH RISK @G24LB26*/ 01600000 5 BFWAITFL BIT(1), /*WAIT OR ENQUEUED @G24LB26*/ 01650000 /*VOLUME @G24LB26*/ 01660000 5 * BIT(6), /*THESE 6 BITS MUST @G24LB26*/ 01700000 /*REMAIN UNUSED @G24LB26*/ 01710000 4 BFOVERUS FIXED(8), /*CON USERS IF OVER MAX @G24LB26*/ 01750000 4 BFVOLEXP CHAR(4), /*VOL EXPIRATION DATE @G24LB26*/ 01800000 4 BFLPFLGS BIT(8), /*LOW PRIORITY SORTING @G24LB26*/ 01850000 /*FLAGS @G24LB26*/ 01900000 5 BFSHCNFL BIT(1), /*SHAREABILITY @G24LB26*/ 01950000 /*CONSIDERATION @G24LB26*/ 02000000 5 BFNMTDFL BIT(1), /*VOL NOT MOUNTED OR @G24LB26*/ 02050000 /*SCHEDULED TO BE @G24LB26*/ 02060000 /*MOUNTED @G24LB26*/ 02070000 5 BFMTDOHF BIT(1), /*VOL MOUNTED OTHER HOST @G24LB26*/ 02100000 /*AND NOT SCHEDULED TO @G24LB26*/ 02110000 /*BE MOUNTED THIS HOST @G24LB26*/ 02120000 5 * BIT(5), /*UNUSED @G24LB26*/ 02150000 4 BFCONUSE FIXED(8), /*NUM CONCURRENT USERS @G24LB26*/ 02200000 4 BFMISCFL BIT(16), /*MISCELLANEOUS FLAGS @G24LB26*/ 02250000 5 BFBADPRI BIT(1), /*NOT FOR PRIMARY SEL @G24LB26*/ 02300000 5 BFBADSEC BIT(1), /*NOT FOR SECONDARY SEL @G24LB26*/ 02350000 5 BFSELPRI BIT(1), /*VOL SELECTED FOR @G24LB26*/ 02400000 /*PRIMARY @G24LB26*/ 02450000 5 BFSELSEC BIT(1), /*VOL SELECTED FOR @G24LB26*/ 02500000 /*SECONDARY @G24LB26*/ 02550000 5 BFJESOK BIT(1), /*JES3 VERIFIED VOL, @G24LB26*/ 02750000 /*VS/2 ONLY @G24LB26*/ 02800000 5 BFVOLREJ BIT(1), /*JES3 REJECTED VOL, @G24LB26*/ 02850000 /*OR TEST ENQ FAILED OR @G24LB26*/ 02900000 /*VOL WAIT AND DYN ALLOC @G24LB26*/ 02910000 5 BFNOENQ BIT(1), /*VOL NOT ENQUEUED, @G24LB26*/ 02950000 /*VS/2 ONLY @G24LB26*/ 03000000 5 BFENQUED BIT(1), /*VOL ENQUEUED, @G24LB26*/ 03050000 /*VS/2 ONLY @G24LB26*/ 03100000 5 BFNOTMTD BIT(1), /*VOL NOT MOUNTED @G24LB26*/ 03110000 5 BFMTDOTH BIT(1), /*VOL MOUNTED OTHER HOST @G24LB26*/ 03120000 5 BFMTDOHT BIT(1), /*VOL MTD OTHER HOST, @ZA28479*/ 03130000 /*MAY OR MAY NOT BE @ZA28479*/ 03180000 /*EXCLUSIVE OTHER HOST @ZA28479*/ 03230000 5 * BIT(5); /*UNUSED @ZA28479*/ 03280000