;+
; PROJECT
;          SolarB EIS
;
; NAME
;          EIS_EVENT_PROPS_VALID
;
; PURPOSE
;          Checks the appropriate parameters have been set.
;
; CATEGORY
;          Timeline planning (timeline)
;
; WRITTEN
;          John Rainnie, RAL, 2-Apr-2008
;
; HISTORY
;          v0.1 JAR 3-Apr-2008
;               Added more informative error message
;
;-
;************************************************************************
FUNCTION eis_event_props_valid , props

valid = {valid:0B , mText:STRARR(3)}
valid.mText[0] = STRJOIN([ "Timeline entry: "                           ,  $
                           STRCOMPRESS(props.seq_id,/REMOVE_ALL)  ]     ,  $
                           /SINGLE)
valid.mText[1] = "EIS Event Trigger Control Parameters..."

IF (props.seq_id LT 1) THEN BEGIN
    valid.mText[2] = "Unsaved Timeline Entry. Aborting!"
    RETURN , valid
ENDIF

IF (props.response_study_id LT 1) THEN BEGIN
    valid.mText[2] = "Response Study is NOT defined. Aborting!"
    RETURN , valid
ENDIF

IF (props.repoint_raster_index LT 1) THEN BEGIN
    valid.mText[2] = "Raster index is NOT defined. Aborting!"
    RETURN , valid
ENDIF

IF (TOTAL(props.event_flag) LT 1) THEN BEGIN
    valid.mText[2] = "Window NOT defined. Aborting!"
    RETURN , valid
ENDIF

; props = {eis_event_component                                   ,           $
;                seq_id                        : 0L              ,           $
;                respond_to_eis_event          : 0B              ,           $
;                response_study_id             : 0L              ,           $
;                x_repoint                     : 0B              ,           $
;                y_repoint                     : 0B              ,           $
;                repoint_raster_index          : 0               ,           $
;                event_flag                    : BYTARR(25)      ,           $
;                x_pixel_threshold             : 0B              ,           $
;                y_pixel_threshold             : 0B              ,           $
;                x_min_limit                   : 0L              ,           $
;                y_min_limit                   : 0L                          $
;            }

valid.valid = 1

RETURN , valid

END