ABAP RANGE
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.
原创 :不渡之人