FUNCTION mark_db_getevent, ev

  COMMON STATE_INFO, day_num, inst_num

  day_num = ev.index
  data=mark_db_get(day_num, inst_num)
  num=data.num_events
  data=mark_db_settable(day_num, inst_num)

  WIDGET_CONTROL,ev.id,GET_UVALUE=state,/NO_COPY
  WIDGET_CONTROL,state.data_table,SET_VALUE=data.table
  WIDGET_CONTROL,state.data_label,SET_VALUE=data.date
  WIDGET_CONTROL,ev.id,SET_UVALUE=state

  RETURN,ev
END