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