.MACRO $FH2DEF,$GBL $DEFINI FH2,$GBL $EQU FH2$C_LEVEL1 257 $EQU FH2$C_LEVEL2 512 $EQU FH2$M_NOBACKUP 2 $EQU FH2$M_WRITEBACK 4 $EQU FH2$M_READCHECK 8 $EQU FH2$M_WRITCHECK 16 $EQU FH2$M_CONTIGB 32 $EQU FH2$M_LOCKED 64 $EQU FH2$M_CONTIG 128 $EQU FH2$M_BADACL 2048 $EQU FH2$M_SPOOL 4096 $EQU FH2$M_DIRECTORY 8192 $EQU FH2$M_BADBLOCK 16384 $EQU FH2$M_MARKDEL 32768 $EQU FH2$M_NOCHARGE 65536 $EQU FH2$M_ERASE 131072 $EQU FH2$M_ONLY_RU 1 $EQU FH2$M_RUJNL 2 $EQU FH2$M_BIJNL 4 $EQU FH2$M_AIJNL 8 $EQU FH2$M_ATJNL 16 $EQU FH2$M_NEVER_RU 32 $EQU FH2$M_JOURNAL_FILE 64 $EQU FH2$C_RU_FACILITY_RMS 1 $EQU FH2$C_RU_FACILITY_DBMS 2 $EQU FH2$C_RU_FACILITY_RDB 3 $EQU FH2$C_RU_FACILITY_CHKPNT 4 $EQU FH2$K_LENGTH 80 $EQU FH2$C_LENGTH 80 $EQU FH2$K_SUBSET0_LENGTH 88 $EQU FH2$C_SUBSET0_LENGTH 88 $EQU FH2$K_FULL_LENGTH 108 $EQU FH2$C_FULL_LENGTH 108 $EQU FH2$S_FH2DEF 512 $EQU FH2$B_IDOFFSET 0 $EQU FH2$B_MPOFFSET 1 $EQU FH2$B_ACOFFSET 2 $EQU FH2$B_RSOFFSET 3 $EQU FH2$W_SEG_NUM 4 $EQU FH2$W_STRUCLEV 6 $EQU FH2$B_STRUCVER 6 $EQU FH2$B_STRUCLEV 7 $EQU FH2$S_FID 6 $EQU FH2$W_FID 8 $EQU FH2$W_FID_NUM 8 $EQU FH2$W_FID_SEQ 10 $EQU FH2$W_FID_RVN 12 $EQU FH2$B_FID_RVN 12 $EQU FH2$B_FID_NMX 13 $EQU FH2$S_EXT_FID 6 $EQU FH2$W_EXT_FID 14 $EQU FH2$W_EX_FIDNUM 14 $EQU FH2$W_EX_FIDSEQ 16 $EQU FH2$W_EX_FIDRVN 18 $EQU FH2$B_EX_FIDRVN 18 $EQU FH2$B_EX_FIDNMX 19 $EQU FH2$S_RECATTR 32 $EQU FH2$W_RECATTR 20 $EQU FH2$L_FILECHAR 52 $EQU FH2$V_NOBACKUP 1 $EQU FH2$V_WRITEBACK 2 $EQU FH2$V_READCHECK 3 $EQU FH2$V_WRITCHECK 4 $EQU FH2$V_CONTIGB 5 $EQU FH2$V_LOCKED 6 $EQU FH2$V_CONTIG 7 $EQU FH2$V_BADACL 11 $EQU FH2$V_SPOOL 12 $EQU FH2$V_DIRECTORY 13 $EQU FH2$V_BADBLOCK 14 $EQU FH2$V_MARKDEL 15 $EQU FH2$V_NOCHARGE 16 $EQU FH2$V_ERASE 17 $EQU FH2$W_RECPROT 56 $EQU FH2$B_MAP_INUSE 58 $EQU FH2$B_ACC_MODE 59 $EQU FH2$L_FILEOWNER 60 $EQU FH2$W_UICMEMBER 60 $EQU FH2$W_UICGROUP 62 $EQU FH2$W_FILEPROT 64 $EQU FH2$S_BACKLINK 6 $EQU FH2$W_BACKLINK 66 $EQU FH2$W_BK_FIDNUM 66 $EQU FH2$W_BK_FIDSEQ 68 $EQU FH2$W_BK_FIDRVN 70 $EQU FH2$B_BK_FIDRVN 70 $EQU FH2$B_BK_FIDNMX 71 $EQU FH2$B_JOURNAL 72 $EQU FH2$V_ONLY_RU 0 $EQU FH2$V_RUJNL 1 $EQU FH2$V_BIJNL 2 $EQU FH2$V_AIJNL 3 $EQU FH2$V_ATJNL 4 $EQU FH2$V_NEVER_RU 5 $EQU FH2$V_JOURNAL_FILE 6 $EQU FH2$B_RU_ACTIVE 73 $EQU FH2$L_HIGHWATER 76 $EQU FH2$S_CLASS_PROT 20 $EQU FH2$R_CLASS_PROT 88 $EQU FH2$W_CHECKSUM 510 $DEFEND FH2,$GBL,DEF .ENDM .MACRO $FI2DEF,$GBL $DEFINI FI2,$GBL $EQU FI2$K_LENGTH 120 $EQU FI2$C_LENGTH 120 $EQU FI2$S_FI2DEF 200 $EQU FI2$S_FILENAME 20 $EQU FI2$T_FILENAME 0 $EQU FI2$W_REVISION 20 $EQU FI2$S_CREDATE 8 $EQU FI2$Q_CREDATE 22 $EQU FI2$S_REVDATE 8 $EQU FI2$Q_REVDATE 30 $EQU FI2$S_EXPDATE 8 $EQU FI2$Q_EXPDATE 38 $EQU FI2$S_BAKDATE 8 $EQU FI2$Q_BAKDATE 46 $EQU FI2$S_FILENAMEXT 66 $EQU FI2$T_FILENAMEXT 54 $EQU FI2$S_USERLABEL 80 $EQU FI2$T_USERLABEL 120 $DEFEND FI2,$GBL,DEF .ENDM