RANGES 语句:用与选择表相同的结构创建内表,可使用RANGES语句,如下所示:
语法:RANGES <seltab> FOR <f>.
该语句创建选择表<seltab>,该表参考数据库表的列<f>或内部字段<f>。选择表<seltab>必须在程序中填充。不必在程序中再用TABLES语句声明数据库表。
RANGES语句是下列语句的短格式:
DATA: BEGIN OF <seltab> OCCURS 10, SIGN(1), OPTION(2) LOW LIKE <f>, HIGH LIKE <f>, END OF <seltab>.
用RANGES语句创建的选择表不是选择屏幕的一部分,它们在程序<prog>中不能用于数据传递, 该程序由下列语句启动:SUBMIT <prog> WITH <seltab> IN <table>. 表<table>可以在调用程序中用RANGES创建。 用RANGES创建的内表与选择表结构相同,但功能不同。 ***注意:sing和option的值必须是大写 下面介绍以下range中四个参数的具体取值: SIGN 可以取以下两种值:INCLUED 和 EXCLUDE sign = 'I' 'I' 表示包含:LOW 、HIGH的值 sign = 'E' 'E' 表示排除:LOW、HIGH的值
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的数据类型与数据库表的列类型相同,该表与选择标准相连接。
如果 Option 运算符不为 'BT' 或 'NB',LOW的内容定义单值选择,它与OPTION中的运算符相结合,为数据库选择指定了条件。
如果 Option 运算符为 'BT' 或 'NB',并且 HIGH 不为空, LOW和HIGH中的内容为间隔选择指定上界和下界,与OPTION中的运算符相结合,该间隔为数据库选择指定了条件。
HIGH 是指区间最大值
如果 Option 运算符为 'BT' 或 'NB',HIGH 的值才会生效,运算符不是Between 和 Not Between 时,high有值也不会参与计算
示例:
ranges: s_KVGR1 for tvv1t-KVGR1.
data: it_tvv1t type TABLE OF TVV1T. "数据表一共22条记录,kvgr1 为 002 的记录已删除
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.
Ranges建立选择型的内表
ranges st for mara-matnr.
*这样st表就拥有mara这个表的结构.high和low与mara-matnr的数据类型相关
RANGES建立选择型的内表
该关键字用千定义一个内表,其结构与SAP选择屏幕中的SELECT-OPTIONS所定义的输人域所产生的内表结构一样,在OPENSOL中可以直接通过IN条件来查询其对应值的范围,如下例所示,
RANGES:r_mat FOR mara-matnr其定义的效果与下面代码中的内表创建效果一致。
DATA:BEGIN OF r_mat OCCURS 0,
sign TYPE c LENGTH 1,
option TYPE c LENGTH 2,
low LIKE mara-matnr
high LIKE mara-matnr,
END OF y mat.
也可以采用DATA定义的方式来创建相同的内表,如下例所示。
DATA: r_mat LIKE RANGE OF mara-matnr.
需要补充的是、在OPENSOL的IN查询条件中、若使用RANGES所对应的内表、必须要保证该内表的表头不能为空,一般可以采用读取内表的首行对表头赋值,如下例所示
READ TABLE r_mat INDEX 1.
RANGE的注意事项
我们快捷定义时会采用
R_pernr = 'IEQ'.这种方式,但当我们只赋值给一个low时会导致high为空
如果我们只是将这样的选择表做为条件 pernr in r_pernr.是没有问题的
但是如果用于传参s_pernr in r_pernr.这样会报错为high不能比low小
这种写法不能用于传参.
这种写法才适合用于传参
SUBMIT (WA1-COL2) AND RETURN WITH SP$00001 IN R_pernr.