;+
; PROJECT
;               SolarB EIS
;
; NAME
;               EIS_STUDY_FLAG_AS_SCIENCE
;
; CATEGORY
;               EIS planning
;
; PURPOSE
;               Function to set the study definition flag
;               TYPE to the value 0 - which indicates it is a
;               science study - and will be visible in eis_xstudy
;
; INPUTS
;
;
; WRITTEN
;               John A Rainnie, RAL, 13-March-2007
;
; VERSION
;               V0.1
;
;-
;************************************************************************
PRO eis_study_flag_as_science , st_id

DEFSYSV , '!PRIV', 2

status = eis_open_db(/STUDY , /UPDATE)
;
; Update database entry with new value
dbput, 'TYPE' , 0 , st_id

print,"Flagged study id = " + STRCOMPRESS(st_id,/REMOVE_ALL) +             $
            " as SCIENCE"

END