;@gen_exec_synop
;+
;NAME:
;	go_gen_exec_synop
;PURPOSE:
;	To allow generation of the executive synopsis pages
;DETAILS:
;	index_only=1	;will only generate the index page
;	nimgpday=20	;reduce the criteria for campaign image selection
;HISTORY:
;	Written Nov-96 by M.Morrison
;	13-Jan-97 (MDM) - Added documentation header
;			- Made selection available by xmenu_sel
;	23-Apr-97 (MDM) - Added EIT path
;			- Added some print help examples for bypass
;	11-Sep-97 (MDM) - Added "oth_context" keyword option
;-
;
ssw_path, /eit
;
sttim = '1-aug'		& entim = '25-aug'
sttim = '1-aug'		& entim = '25-nov'
sttim = '10-sep'	& entim = '24-oct'
sttim = '28-nov-96'	& entim = fmt_tim(anytim2ints(ut_time(), off=-3*86400))
;
setenv, 'MDI_EXEC_SYNOP=/data14/mdi_summary/exec_synop
;
rd_exec_synop_index, strarr, struct_arr, mat=mat
;
print, 'skip_run_cam=1'
print, 'skip_contex=1
print, 'skip_cam_snap=1'
print, 'oth_context=1'
print, 'index_only=1
print, 'nimgpday=25	;default is 40'
;
;;ss = sel_timrange(struct_arr.sttim, sttim, entim, /bet)
ss = xmenu_sel( strmid(strarr, 0, 96))
if (ss(0) eq -1) then stop
ss = ss - 2	;drop the title lines
for i=0,n_elements(ss)-1 do gen_exec_synop, struct_arr(ss(i)), index_only=index_only, $
	nimgpday=nimgpday, skip_run_cam=skip_run_cam, skip_cam_snap=skip_cam_snap, $
	skip_contex=skip_contex, oth_context=oth_context

;for i=0,n_elements(struct_arr)-1 do gen_exec_synop, struct_arr(i)
;
remake_main_index
;
;; gen_exec_synop, struct_arr(7), /skip_run_cam, /skip_contex
;; for i=0,n_elements(struct_arr)-1 do gen_exec_synop, struct_arr(i), /skip_run_cam, /skip_contex
;; for i=0,n_elements(struct_arr)-1 do gen_exec_synop, struct_arr(i), /skip_run_cam, /skip_contex, /skip_cam_snap
;; for i=0,n_elements(struct_arr)-1 do gen_exec_synop, struct_arr(i), /index_only
end