;+
;Project    :SolarB EIS
;
;Name       :eis_get_study_raster_entry
;
;Purpose    :Used for eis technical planning and external interface
;
;Category   :EIS technical and timeline planning
;
;Written    :Chunkey Lepine, RAL, d.r.lepine@rl.ac.uk, 0044-1235-44-6515
;
;Version    :V0 February 2005
;           :June 2005 updated to do DB search and (keyword) return of entry[0]
;-
;************************************************************************

;extract raster record (given study ID) - returns structure of type studyraster.
function eis_get_study_raster_entry, value, index, RECORD=RECORD, FIND_ENTRY=FIND_ENTRY

   status = eis_open_db(/STDRA)
   if not keyword_set(RECORD) then begin
        constraint = 'SY_ID =' + string(value) + ',RA_INDEX =' + string(index)
        entry = dbfind(constraint)
        if (entry[0] eq 0) then begin
            dbclose
            return, 0
        endif
        entry_value = entry[0]
        if keyword_set(FIND_ENTRY) then begin
            dbclose
            return, entry_value
        endif
    endif
    return, eis_get_study_raster_details(entry_value)
end