RANGE

DATA: r_calday TYPE RANGE OF /BI0/OICALDAY.

IF r_calday IS INITIAL OR CALDAY NOT IN r_calday.
  SELECT CALDAY /BIC/NCACC /BIC/NCSRCSYS /BIC/NCBISELEM
    FROM /BIC/ANORKORST00
    APPENDING TABLE Table_biselemrst
    WHERE CALDAY = CALDAY AND /BIC/NCACC = NCACC.

  wa_calday-SIGN   = 'I' .
  wa_calday-OPTION = 'EQ' .
  wa_calday-LOW    = CALDAY.
  APPEND wa_calday TO r_calday.
ENDIF.

___________________________________________________________

Ещё немного RANGE:

types:
      begin of lty_rec,
        l_rec(30)       type c,
        end of lty_rec.

data:
      lr_rec        type range of lty_rec,
      lt_rec        like table of lr_rec,
      wa_rec        like line of lr_rec.
___________________________________________________________

Заполняем range по-модному:

      lt_mm1004_range = VALUE #( FOR entry IN gt_mm1004
          ( VALUE #( BASE CORRESPONDING #( entry )
            sign    = 'I'
            option  = 'EQ' ) )
           ).