;+
; PROJECT
;           SOLARB EIS
;
; NAME
;           eis_read_op_events
;
; PURPOSE
;           Function to return op_period events
;;
; CATEGORY
;           EIS timeline planning
;
; WRITTEN
;           John A Rainne RAL
;
; VERSION
;          v0.1 JAR 20-Jun-2007
;               Added this header.
;          v0.2 JAR 5-Jun-2008
;               Added keyword num_days
;
;
;-
;************************************************************************
FUNCTION eis_read_op_events , start_time , duration , num_days= num_days

IF (N_ELEMENTS(num_days) EQ 0) THEN num_days = 3
;
;get_utc , utc
;utc.time = 0
;
;start_time = anytim2tai(utc)
;duration   = 24.

disp_time = start_time
; Get array of datestrings
ds = eis_create_datestring_array(start_time , duration,num_days = num_days)

; Get array of event fileNames - eg;
;/home/sstdljar/jar24/cmdpln/latest/stev_200610080001.evt
;/home/sstdljar/jar24/cmdpln/latest/stev_200610080002.evt
;/home/sstdljar/jar24/cmdpln/latest/stev_200610110001.evt
fileNames = eis_create_jside_filenames(ds,/OP)
IF (STRLEN(fileNames[0]) EQ 0) THEN RETURN , 0

all_events = ''

; OK, read each file
FOR i = 0 , N_ELEMENTS(fileNames) - 1 DO BEGIN

    events = eis_read_file_op_events(fileNames[i])

    CASE N_TAGS(all_events) OF
        0    : all_events = events
        ELSE : all_events = [all_events , events]
    ENDCASE

ENDFOR

stop_time    = disp_time + (duration*3600.)
valid_events = eis_validate_events(all_events , disp_time , stop_time)


RETURN , valid_events

END