ABAP 关键字：Ranges

关键字RANGES创建一个结构为选择表并且带有工作区的内表。如果不指定OCCURS的值，那么初始内存n会自动的被设置为10。它在类中是不被允许使用的。TYPE|LIKE RANGE OF语句声明的RANGE表是不带工作区的。RANGES声明的内表通常是在SQL查询中使用。
基本语法：

RANGES rtab FOR dobj [OCCURS n]. 

它等价于下面的语序序列：

DATA: BEGIN OF rtab OCCURS {10|N},
        SIGN   TYPE C LENGTH 1,
        OPTION TYPE C LENGTH 2,
        LOW    LIKE DOBJ,
        HIGH   LIKE DOBJ,
      END OF rtab.

示例：

DEFINE INITIAL_RANGE_TAB.   " 宏
  CLEAR R_MATNR.
  R_MATNR-SIGN = 'I'.     " Include 包含
  R_MATNR-OPTION = 'EQ'.   " Equal 等于
  R_MATNR-LOW = &1.
  APPEND R_MATNR.
END-OF-DEFINITION.

TABLES ZFIR001P.
RANGES R_MATNR FOR ZFIR001P-MATNR OCCURS 10.  " 带工作区的RANGE表

" RANGE 表的初始化
INITIAL_RANGE_TAB 'BBAA00004'.
INITIAL_RANGE_TAB 'R0001AA0001'.
INITIAL_RANGE_TAB 'R000002087'.

SELECT MATNR,MAKTX,ZUTOT FROM ZFIR001P
  INTO TABLE @DATA(GT_MATRN)
  WHERE MATNR IN @R_MATNR
  ORDER BY MATNR ASCENDING.   " 根据RANGE表的物料号进行筛选