FUNCTION eis_get_timeline_entry_summary

defsysv,'!PRIV', 2

dbopen , 'eis_timeline_db' , unavail = unavail
seq_id_list = dbfind('sequence_id > 0' , /SILENT , count = count)
IF (count EQ 0) THEN RETURN , ''
tl_array = STRARR(count)



FOR i = 0, count -1 DO BEGIN

    dbopen , 'eis_timeline_db' , unavail = unavail
    t = eis_get_timeline_details(seq_id_list[i])
    s = eis_get_science_entry(seq_id_list[i])



    ; ID needs to be in 000001 format
    idValue    = STRING(format='(I06)',seq_id_list[i])
    start_time = anytim2utc(t.start_time,/stime,/truncate)
    st         = db_read_study_entry(s.study_id)

    CASE t.entry_type OF
        'E'   : entry_type = 'Eng'
        'S'   : entry_type = 'Sci'
        'D'   : entry_type = 'Del'
        ELSE  : entry_type = 'Unk'
    ENDCASE

    tl_array[i] = STRJOIN([ idValue       ,                                 $
                            entry_type    ,                                 $
                            start_time    ,                                 $
                            st.acronym]   ,                                 $
                            '  ' , /SINGLE)

ENDFOR

print,TRANSPOSE(tl_array)

RETURN , tl_array

END
