MACRO 00001000
OSFST 00002000
PUSH PRINT 00002200
AIF ('&SYSPARM' NE 'SUP').ACC01 00002400
PRINT OFF,NOGEN 00002600
.ACC01 ANOP 00002800
OSFST DSECT 00003000
OSFSTFM DS 1H DISK MODE 00004000
DS 1H RESERVED 00005000
OSFSTBLK DS 1H BLOCKSIZE 00006000
OSFSTFVF DS 1H FIXED/VARIABLE FLAG 00007000
OSFSTLRL DS 1F LOGICAL RECORD SIZE 00008000
OSFSTRFM DS 1X OS RECORD FORMAT 00009000
DS 1X RESERVED 00010000
OSFSTFLG DS 1X FLAG BYTE 00011000
OSFSTALT EQU X'80' ALTERNATE TRACK INDICATOR 00012000
OSFSTMVL EQU X'08' MULTIPLE VOLUME DATA SET 00013000
OSFSTDBK EQU X'40' BLOCKSIZE NOT SPECIFIED IN DSCB 00014000
OSFSTUMV EQU X'02' UNMOVEABLE DATA SET 00015000
OSFSTRSW EQU X'01' INDICATES POINT+1 JUST ISSUED 00016000
OSFSTXNO DS 1X NUMBER OF DATA EXTENTS ON DISK 00017000
OSFSTNXT DS 1F NEXT OS FST 00018000
OSFSTCHR DS 5X CCHHR OF LAST I/O OPERATION 00019000
OSFSTEND DS 5X CURRENT EXTENT END 00020000
OSFSTDSN DS 44C DATA SET NAME 00021000
OSFSTXTN DS 170X DATA EXTENTS DESCRIPTION 00022000
OSFSTEX4 EQU OSFSTXTN+30 LOCATION OF 4TH EXTENT FROM DSCB3 00023000
OSFSTDSK DS 1H DISK ADDR. (0CUU) 00024000
OSFSTTYP DS 1H DISK DEVICE TYPE 00025000
* SEE OSADT FOR TYPE FLAGS 00026000
OSFSTNTE DS 5X USED TO SAVE CCHHR FOR NOTE MACRO 00027000
DS 3X RESERVED 00028000
OSFSTTRK DS 1F NO. TRACKS PER CYLINDER 00029000
DS 2F RESERVED 00030100
OSFSTMEM DS CL8 PARTITIONED DATA SET MEMBER NAME 00030200
DS 0D 00031000
OSFSTLTH EQU (*-OSFST)/8 OS FST LENGTH IN DBL WORDS 00032000
EJECT 00033000
POP PRINT 00033100
MEND 00034000