;+
;Project    :SolarB EIS
;
;Name       :eis_get_science_raster_entry
;
;Purpose    :Used for eis_cpt interface
;
;Category   :EIS timeline planning
;
;Written    :Chunkey Lepine, RAL, d.r.lepine@rl.ac.uk, 0044-1235-44-6515
;
;Version    :V0 February 2005
;-
;************************************************************************

;extract science-raster record given sequence ID and index
function eis_get_science_raster_entry, value, index, RECORD=RECORD, FIND_ENTRY=FIND_ENTRY

stop
    status = eis_open_db(/SCI_2)
    if not keyword_set(RECORD) then begin
        constraint = 'SN_ID =' + string(value) + ',RA_INDEX =' + string(index)
        entry = dbfind(constraint)

        if (entry[0] eq 0) then begin
            dbclose
            return, 0
        endif
        value = entry[0]
        if keyword_set(FIND_ENTRY) then begin
            dbclose
            return, entry
        endif
    endif
    return, eis_get_technical_raster_details(value)
end