;+
; PROJECT
;           SolarB EIS
;
; NAME
;           eis_get_display_duration_value
;
; PURPOSE
;           Function to read
;
; CATEGORY
;           EIS Timeline Planning
;
; INPUTS
;           id - index of Duration droplist
;
; WRITTEN
;           John A Rainnie RAL Sept-2006
; HISTORY:
;           v0.1 JAR RAL 20-Feb-2008
;               Fixed typo bug. The shame!
;
;-
;______________________________________________________________________________
FUNCTION eis_get_display_duration_value , id

; Get "Display Duration" (droplist) value
index = WIDGET_INFO(id , /DROPLIST_SELECT)
CASE index OF
    0   :   duration = 1.     ; 1   hours
    1   :   duration = 2.     ; 2   hours
    2   :   duration = 3.     ; 3   hours
    3   :   duration = 6.     ; 6   hours
    4   :   duration = 12.    ; 12  hours
    5   :   duration = 24.    ; 1   day
    6   :   duration = 36.    ; 1.5 days
    7   :   duration = 48.    ; 2   days
    8   :   duration = 72.    ; 3   days
    9   :   duration = 96.    ; 4   days
    10  :   duration = 120.   ; 5   days
    11  :   duration = 144.   ; 6   days
    12  :   duration = 168.   ; 7   days
    ELSE:   duration = 24.    ; 1   day
ENDCASE

RETURN , duration

END