*----------------------------------------------------------------------*
*       FORM set_range
*----------------------------------------------------------------------*
* [+] Sets the range for a select-option
*----------------------------------------------------------------------*
FORM set_range
  USING
    p_high TYPE RSDSSELOP_
    p_low TYPE RSDSSELOP_
  CHANGING
    p_selopt TYPE RSELOPTION.

  DATA:
    lv_single_opt LIKE LINE OF p_selopt.

  CLEAR:
    lv_single_opt,
     p_selopt.

  REFRESH:
     p_selopt.

  lv_single_opt-high = p_high.
  lv_single_opt-low  = p_low.

  APPEND lv_single_opt TO  p_selopt.

ENDFORM.