pro ref_struct, ref, dpos1, dpos2, sxtos1, sxtos2, sxtos3, stat1
   
   
ref = { Reference_Rec, $
        ATT_Fil_Rec_Siz: 16, $
        BCS_Fil_Rec_Siz: 16, $
        HXT_Fil_Rec_Siz: 16, $
        CBA_Fil_Rec_Siz: 16, $
        SXT_Fil_Rec_Siz: 16, $
        WBS_Fil_Rec_Siz: 16, $

	Obs_Fil_Rec_Siz: 16, $
	Obs_Fil_Entry_Siz: 32, $
	EVN_Fil_Rec_Siz: 16, $

	PNT_Fil_Rec_Siz: 16, $
	TRN_Fil_Rec_Siz: 16, $

	lun_err: 20, $
	log_sxt_istart: 1, $		;log start of SXT images
	log_sxt_ext1ffi: 1, $		;log extraction subroutine
	log_sxt_ext1pfi: 1, $		: ""
	log_bcs_ext_spec: 1, $		;log EXT1BCS_SPEC.PRO progress
	log_wbs_got2: 0, $		;log when have 2 WBS major frames
	log_print_scrn: 0, $		;print log messages to screen also

        Spare: BYTARR(3) }              

dpos1  = 66	; 50+16
dpos2  = 67	; 51+16
sxtos1 = 129	;113+16
sxtos2 = 130	;114+16
sxtos3 = 131	;115+16
stat1  = 64	; 48+16

end