;+
; PROJECT
;          SolarB EIS
;
; NAME
;          EIS_XRTF_PROPS_TO_CONTROL
;
; PURPOSE
;          Procedure to convert XRTFlare props from TL entry type to
;          CPT-type control structures
;
; CATEGORY
;          EIS Timeline Planning
;          Trigger/Response Studies
;
; INPUTS
;          xrtf_props   - is tl.science_component.xrt_flare_response
;          xrtf_control - is a CPT defined structure; {eis_xrt_flare_control}
;
; KEYWORDS
;          None
;
; WRITTEN
;          John Rainnie, RAL, Dec-2005
;
; HISTORY
;          v0.1 JAR 27-Jan-2010
;               Added comments.
;          v0.2 JAR 13-Dec-2011
;               Added tags: verify_fov, x0 and y0
;
;-
;______________________________________________________________________________
FUNCTION eis_xrtf_props_to_control , xrtf_props , xrtf_control

; xrtf_props   is tl.science_component.xrt_flare_response
; xrtf_control is a CPT defined structure; {eis_xrt_flare_control}

xrtf_control.response_identifier = xrtf_props.response_study_id
xrtf_control.raster_identifier   = xrtf_props.repoint_raster_index
xrtf_control.filler_identifier   = xrtf_props.follow_on_study_id
xrtf_control.adjust_y            = xrtf_props.y_repoint
xrtf_control.adjust_x            = xrtf_props.x_repoint
xrtf_control.verify_fov          = xrtf_props.xrt_flare_in_fov
xrtf_control.x0                  = xrtf_props.x0
xrtf_control.y0                  = xrtf_props.y0

RETURN , xrtf_control

END