define record indexf_record
    01 indexf.
	05 lbn usage is comp pic 9(6).
	05 fnum usage is comp pic 9(5).
	05 fseq usage is comp pic 9(4).
	05 fseg usage is comp pic 9(4).
	05 efnu usage is comp pic 9(5).
	05 efsq usage is comp pic 9(4).
	05 status pic x.
	05 direct pic x.
	05 bfnu usage is comp pic 9(5).
	05 bfsq usage is comp pic 9(4).
	05 fnam pic x(20).
	05 crdt usage is date.
	05 efbk usage is comp pic 9(5).
	05 hibk usage is comp pic 9(5).
;