ABAP Range Table：RANGES的使用

Range Table

1、Range Table 概述
RANGE TABLE为 SAP R/3系统标准内表的一种，结构与 Selection Table 一致，
由 SIGN, OPTION, LOW 和 HIGH字段组成；

可以通过 TYPE RANGE OF 语句或 RANGES 关键字定义 Range Table。
Range Table 常用于Open SQL语句中的条件筛选，可以优化取数效率与程序性能。
2.定义Range Table
可以通过两种方式定义：

1. TYPE RANGE OF…
   DATA rtab {TYPE RANGE OF type}|{LIKE RANGE OF dobj}
   [INITIAL SIZE n]
   [WITH HEADER LINE]
   [VALUE IS INITIAL]
   [READ-ONLY].

2. RANGES
   语法：
   RANGES rtab FOR dobj [OCCURS n].

在程序上右击，点击“New ABAP Program“：

输入程序名和描述，点击下一步：

选择一个请求号，点击完成：

RANGE

使用... TYPE RANGE OF ...来定义一个range

DATA gt_marc TYPE TABLE OF marc.
DATA: gr_werks TYPE RANGE OF werks_d,"WERKS_D是一个数据元素
      gw_werks LIKE LINE OF gr_werks.
"这里需要注意，For后面字段必须为参考表的字段，不能使用 Data Element 来定义，否则系统会报出错误。
"宏定义
DEFINE set_range_werks.
    gw_werks-sign = 'I'.
    gw_werks-option = 'EQ'.
    gw_werks-low = &1.
    APPEND gw_werks TO gr_werks.
END-OF-DEFINITION.

SELECT * FROM marc INTO CORRESPONDING FIELDS OF TABLE gt_marc
WHERE werks IN gr_werks
  AND ekgrp IN gr_ekgrp
  AND beskz IN gr_beskz.

RANGES

使用RANGES来定义一个RANGE TABLE

*-------------------------------------------
* 通过 RANGES 定义
*-------------------------------------------

TABLES:marc.
RANGES: gr_ekgrp FOR marc-ekgrp.
DATA gw_ekgrp LIKE LINE OF gr_ekgrp.
RANGES: gr_bwtty FOR marc-bwtty.
RANGES: gr_beskz FOR marc-beskz.

有时候我们取值不是一个定值，而是一个范围，这个时候就需要我们用ranges去定义：

运行结果：

RANGE的四个参数

SIGN

• SIGN 可以取以下两种值：INCLUED 和 EXCLUDE
sign = ‘I’ ‘I’ 表示包含（INCLUDE）：LOW 、HIGH的值
sign = ‘E’ ‘E’ 表示排除（EXCLUDE）：LOW、HIGH的值

OPTION

• OPTION 运算符可以取以下值：
‘EQ’ , ‘NE’ "等于，不等于 Equal ，Not Equal
‘GT’ , ‘LT’ "大于，小于 Greater Than ，Less Than
‘GE’ , ‘LE’ "大于等于，小于等于 Greater Than or Equal ，Less Than or Equal
‘CP’ , ‘NP’ “参考判断格式，如"ABC*”,NP排除参考格式
‘BT’ , ‘NB’ "位于，不位于，功能与 Between 和 Not Between 一样。

LOW

• LOW 是指当前值，或区间最小值（操作符是范围的话）
LOW：LOW的数据类型与数据库表的列类型相同，该表与选择标准相连接。
如果 Option 运算符不为 ‘BT’ 或 ‘NB’，LOW的内容定义单值选择，它与OPTION中的运算符相结合，为数据库选择指定了条件。
如果 Option 运算符为 ‘BT’ 或 ‘NB’，并且 HIGH 不为空， LOW和HIGH中的内容为间隔选择指定上界和下界，与OPTION中的运算符相结合，该间隔为数据库选择指定了条件。

HIGH

• HIGH 是指区间最大值
如果 Option 运算符为 ‘BT’ 或 ‘NB’，HIGH 的值才会生效，运算符不是Between 和 Not Between 时，high有值也不会参与计算

s_KVGR1-sign = 'I'.
s_KVGR1-option = 'EQ'.   "包括 等于 003 的记录
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].   "输出结果003

s_KVGR1-sign = 'E'.
s_KVGR1-option = 'EQ'.   "排除 等于 003 的记录
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].  "输出结果除003外所有

s_KVGR1-sign = 'I'.
s_KVGR1-option = 'NE'.   "包括 不等于 003 的记录
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].  "输出结果除003外所有

s_KVGR1-sign = 'E'.
s_KVGR1-option = 'NE'.  "排除 不等于 003 的记录
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].   "输出结果003

s_KVGR1-sign = 'E'.
s_KVGR1-option = 'GT'.  "排除 大于 003 的记录
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].  "输出结果001、003  2条记录（应该是3条，数据表没有002这条记录）

s_KVGR1-sign = 'E'.
s_KVGR1-option = 'LT'.   "排除 小于 003 的记录
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].   "输出结果003、004……  等21条记录

s_KVGR1-sign = 'E'.
s_KVGR1-option = 'GE'.  "排除 大于等于 003 的记录
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].  "输出结果001  1条记录（应该是2条，数据表没有002这条记录）

s_KVGR1-sign = 'E'.
s_KVGR1-option = 'LE'.   "排除 小于等于 003 的记录
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].   "输出结果004、005……  等20条记录

"这两个测试不出来，每次出来都是全部或者空，先不管它们
"'CP' , 'NP'   "参考判断格式，如"ABC*",NP排除参考格式

s_KVGR1-sign = 'I'.
s_KVGR1-option = 'BT'.   "包含 位于 003 到 007 的记录，闭区间
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].  "输出结果003、004……007  5条记录

s_KVGR1-sign = 'E'.
s_KVGR1-option = 'BT'.  "排除 位于 003 到 007 的记录，闭区间
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].   "输出结果001、008、009……   等17条记录

s_KVGR1-sign = 'I'.
s_KVGR1-option = 'NB'.   "包含 不位于 003 到 007 的记录，闭区间
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].  "输出结果001、008、009……   等17条记录

s_KVGR1-sign = 'E'.
s_KVGR1-option = 'NB'.  "排除 不位于 003 到 007 的记录，闭区间
s_KVGR1-low = '003'.
s_KVGR1-high = '007'.
APPEND s_KVGR1 TO s_KVGR1[].  "输出结果003、004……007  5条记录

SELECT * FROM tvv1t INTO CORRESPONDING FIELDS OF TABLE
        it_tvv1t WHERE spras = '1' AND kvgr1 IN s_KVGR1. 

示例程序

TABLES:marc.
RANGES: gr_ekgrp FOR marc-ekgrp.
DATA gw_ekgrp LIKE LINE OF gr_ekgrp.
RANGES: gr_bwtty FOR marc-bwtty.
RANGES: gr_beskz FOR marc-beskz.

gr_beskz-sign = 'E'. "在区间外
gr_beskz-option = 'BT'. "在什么之间
gr_beskz-low = 'F'.
gr_beskz-high = 'X'.
APPEND gr_beskz TO gr_beskz[].  "将数据插入gr_beskz[] 

SELECT * FROM marc INTO CORRESPONDING FIELDS OF TABLE gt_marc
WHERE werks IN gr_werks
  AND ekgrp IN gr_ekgrp
  AND beskz IN gr_beskz.

现在就是在F-X区间的范围之外的，排除 从F 到 X区间的。