ABAP开发基础知识：内表(Internal Table)
2013-10-14 14:04
447 查看
http://www.cnblogs.com/foxting/archive/2012/03/19/2406830.html
内表与结构体基本类似，它同样是程序运行中被临时创建的一个存储空间，它是一个可包含多条记录的数据表。
内表共有3种类型：
1)Standard：标准表
2)Sorted：排序表
3)Hashed：哈希表，一般用的比较少
本篇文件将重点介绍Standart型内表的定义及功能
1.内表的定义
通过关键字DATA对内表进行创建，内一的定义可以直接参考结构体或者其它内表及透明表，也可以直接定义字段，其中关键字如下：
UNIQUE|NON-UNIQUE：指定关键字，只能应用于排序表或者哈希表。
INITIAL SIZE n：指定初始化内表大小。
WITH HEADER LINE：定义内表是否有表头。
具体定义有以下几种方式：
DATA <内表名> TYPE <结构类型> WITH [UNIQUE|NON-UNIQUE] [INITIAL SIZE n] [WITH HEADER LINE]。
DATA <内表名> LIKE TABLE OF <内表或者透明表> WITH [UNIQUE|NON-UNIQUE] [INITIAL SIZE n] [WITH HEADER LINE]。
DATA BEGIN OF itab OCCURS n,
......
END OF itab [VALID BETWEEN f1 AND f2]。
FOR EXAMPLE:
TABLES:USER21. “参考某一透明表时，必须先引用定义。类型于C#的USING。
TYPES:BEGIN OF EMP,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP。
*参考该结构定义一个初始化大小为10，并且有HEADER LINE的内表
DATA:EMPTAB TYPE STANDARD TABLE OF EMP INITIAL SIZE 10 WITH HEADER LINE.
*参考上例已建立内表，重新定义大小为20并且没有HEADER LINE的内表
DATA:EMPTAB2 LIKE STANDARD TABLE OF TMPTAB INITIAL SIZE 20.
*该方法定义初始化值为10，并有HEADER LINE的内表
DATA:EMPTAB3 LIKE EMPTAB OCCURS10.
*定义一个排序表，以NAME为关键字，该内表中NAME字段数据不能重复
DATA:EMPTAB4 LIKE SORTED TABLE OF EMPTAB WITH UNIQUE KEY NAME INITIAL SIZE 10 WITH HEADER LINE.
*定义一个初始化大小为0的哈希表
DATA:EMPTAB5 LIKE HASHED TABLE OF EMPTAB WITH UNIQYE KEY NAME WITH HEADER LINE.
通过第三种方式定义的内表可指定具体字段及初始化大小，默认内表存在HEADER LINE。
TABLES:USER21.
TYPES:BEGIN OF EMP OCCURS 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP.
2.内表的赋值
上面曾介绍过，内表分为有无HEADER LINE两种。对于有HEADER LINE的内表，可以通过填充HEADER LINE数据后或通过外部的Work Area向内表存储空间中追加数据，相关语法如下：
APPEND (<work area> into) <ITAB>.
FOR EXAMPLE:
TABLES:USER21.
DATA:BEGIN OF EMP OCCURES 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP.
EMP-NAME='JERY'.
EMP-TELNUM='010-123888'.
EMP-ADDR='BEIJING'.
APPEND EMP. "数据被赋给内表HEADER LINE后再APPEND到表中最后一行。
对于没有HEADER LINE的内表，只能通表外部WORK AREA来传递数据，如下所示：
TABLES:USER21.
DATA:BEGIN OF EMPTAB,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF TMPTAB.
DATA:EMP LIKE STANDART TABLE OF EMPTAB.
EMP-NAME='JERY'.
EMP-TELNUM='010-123888'.
EMP-ADDR='BEIJING'.
APPEND EMPTAB TO EMP. ”数据被赋给WORK AREA后再APPEND到表中。
除了上述的赋值方式外，还可以通过OPEN SQL将数据表中的数据按条件查询后放入内表中，对于OPEN SQL的具体用法，将后在后面介绍。
FOR EXAMPLE:
TABLES:USER21.
DATA:BEGIN OF EMP OCCURES 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP.
SELECT BNAME AS NAME PERSNUMBER AS TELNUM ADDRNUMBER AS ADDR
INTO TABLE EMP FROM USER21. "通过OPEN SQL将从数据表中抓取的数据直接复制给内表。
3.内表数据管理
1.内表的清空
对内表数据的清空共包括4种模式
CLEAR <ITAB>：仅清空HEADER LINE，对内表数据存储空间不影响。
REFRESH <ITAB>：清空内表数据存储空间，对HEADER LINE不影响。
REFRESH <itab> FROM TABLE <dbtab>：清空内表存储空间，填充从数据库表所获数据。
FREE <ITAB>：清空内表数据存储空间，对HEADER LINE不影响。
FOR EXAMPLE：
TABLES:USER21.
DATA:BEGIN OF EMP OCCURS 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP.
SELECT BNAME AS NAME PERSNUMBER AS TELNUM ADDRNUMBER AS ADDR INTOTABLE EMP FROM USER21.
USER21-BNAME='JERY'.
REFRESH EMP FROM TABLE USER21. "清除EMP的存储空间，并从USER21中查找数据填充到内表。
2.INSERT（向内表插入数据）
可以按内表的具体字段向表中插入一行或者多行数据，具体语法如下：
INSERT [wa INTO|INITIAL LINE INTO] itab [INDEX idx].
INSERT [wa INTO|INITIAL LINE INTO] TABLE itab.
INSERT LINES OF itab1 [FROM idx] [TO idx2] INTO itab2 [INDEX idx3].
FOR EXAMPLE:
TABLES:USER21.
DATA:BEGIN OF EMP OCCURS 0,
NAME LIKE USER21-BNAME,
END OF EMP.
DATA:EMPTAB1 LIKE EMP.
DATA:EMPTAB2 LIKE EMP OCCURS 10.
EMP='JERY'.
INSERT EMP INDEX 1."若内表有多行数据，该语句将新记录新增到第一行。
EMPTAB1='TOM'.
INSERT EMPTAB1 INTO TABLE EMP. “将结构体中数据新增到内表
SELECT BNAME AS NAME INTO TABLE EMPTAB2 FROM USER21.
INSERT LINES OF EMPTAB2 FROM 10 INTO EMP."将数据表EMPTAB2从第10行开始的所有数据插入到表EMP中。
3.MODIFY(直接修改内表数据)
按内表位置或者具体内表字段值相等条件修改内表数据。
MODIFY itab [FROM wa] [INDEX idx] [TRANSPORTING f1...fn] WHERE cond.
FOR EXAMPLE:
TABLES:USER21.
DATA:BEGIN OF EMP OCCURS 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
END OF EMP.
SELECT BNAME AS NAME PERSNUMBER AS TELNUM INTO TABLE EMP FROM USER21.
EMP-NAME='JERY'.
EMP-TELNUM='010-888888'.
MODIFY EMP INDEX 1."修改内表第一行数据为设定值
EMP-TELNUM='0755-888888'.
*查找内表中NAME等于TOM的数据，并按设定修改其TELNUM字段，有多行值时会同时修改。
MODIFY EMP TRANSPORTING TELNUMBER WHERE NAME='TOM'.
4.COLLECT（内表数据分类汇总）
将内表中相同的字段合并，若有类型为I的字段，则将其值加总。
COLLECT [wa INTO] itab.
FOR EXAMPLE:
TYPES:BEGIN OF COMPANY,
NAME(20) TYPE C,
SALES TYPE n,
ENF OF COMPANY.
DATA:COMP TYPE COMPANY,COMPTAB TYPE COMPANY OCCURS 0.
COMP-NAME = 'MOBILE'. COMP-SALES = 10. COLLECT COMP INTO COMPTAB.
COMP-NAME = 'NOTEBOOK'. COMP-SALES = 20. COLLECT COMP INTO COMPTAB.
COMP-NAME = 'MOBILE'.COMP-SALES = 30.COLLECT COMP INTO COMPTAB.
5.SORT（内表数据排序）
对内表进行排序，可以指定具体的排序字段、排序方式(升/降),语法如下：
SORT itab [BY f2 f2...fn] [ASCENDING/DESCENDING]
6.READ(读取)
依据具体行数或字段值等条件读取某一内表的数据。
READ TABLE itab FROM wa.
READ TABLE itab WITHKEY k1=v1...kn=vn [BINARY SEARCH].
内表与结构体基本类似，它同样是程序运行中被临时创建的一个存储空间，它是一个可包含多条记录的数据表。
内表共有3种类型：
1)Standard：标准表
2)Sorted：排序表
3)Hashed：哈希表，一般用的比较少
本篇文件将重点介绍Standart型内表的定义及功能
1.内表的定义
通过关键字DATA对内表进行创建，内一的定义可以直接参考结构体或者其它内表及透明表，也可以直接定义字段，其中关键字如下：
UNIQUE|NON-UNIQUE：指定关键字，只能应用于排序表或者哈希表。
INITIAL SIZE n：指定初始化内表大小。
WITH HEADER LINE：定义内表是否有表头。
具体定义有以下几种方式：
DATA <内表名> TYPE <结构类型> WITH [UNIQUE|NON-UNIQUE] [INITIAL SIZE n] [WITH HEADER LINE]。
DATA <内表名> LIKE TABLE OF <内表或者透明表> WITH [UNIQUE|NON-UNIQUE] [INITIAL SIZE n] [WITH HEADER LINE]。
DATA BEGIN OF itab OCCURS n,
......
END OF itab [VALID BETWEEN f1 AND f2]。
FOR EXAMPLE:
TABLES:USER21. “参考某一透明表时，必须先引用定义。类型于C#的USING。
TYPES:BEGIN OF EMP,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP。
*参考该结构定义一个初始化大小为10，并且有HEADER LINE的内表
DATA:EMPTAB TYPE STANDARD TABLE OF EMP INITIAL SIZE 10 WITH HEADER LINE.
*参考上例已建立内表，重新定义大小为20并且没有HEADER LINE的内表
DATA:EMPTAB2 LIKE STANDARD TABLE OF TMPTAB INITIAL SIZE 20.
*该方法定义初始化值为10，并有HEADER LINE的内表
DATA:EMPTAB3 LIKE EMPTAB OCCURS10.
*定义一个排序表，以NAME为关键字，该内表中NAME字段数据不能重复
DATA:EMPTAB4 LIKE SORTED TABLE OF EMPTAB WITH UNIQUE KEY NAME INITIAL SIZE 10 WITH HEADER LINE.
*定义一个初始化大小为0的哈希表
DATA:EMPTAB5 LIKE HASHED TABLE OF EMPTAB WITH UNIQYE KEY NAME WITH HEADER LINE.
通过第三种方式定义的内表可指定具体字段及初始化大小，默认内表存在HEADER LINE。
TABLES:USER21.
TYPES:BEGIN OF EMP OCCURS 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP.
2.内表的赋值
上面曾介绍过，内表分为有无HEADER LINE两种。对于有HEADER LINE的内表，可以通过填充HEADER LINE数据后或通过外部的Work Area向内表存储空间中追加数据，相关语法如下：
APPEND (<work area> into) <ITAB>.
FOR EXAMPLE:
TABLES:USER21.
DATA:BEGIN OF EMP OCCURES 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP.
EMP-NAME='JERY'.
EMP-TELNUM='010-123888'.
EMP-ADDR='BEIJING'.
APPEND EMP. "数据被赋给内表HEADER LINE后再APPEND到表中最后一行。
对于没有HEADER LINE的内表，只能通表外部WORK AREA来传递数据，如下所示：
TABLES:USER21.
DATA:BEGIN OF EMPTAB,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF TMPTAB.
DATA:EMP LIKE STANDART TABLE OF EMPTAB.
EMP-NAME='JERY'.
EMP-TELNUM='010-123888'.
EMP-ADDR='BEIJING'.
APPEND EMPTAB TO EMP. ”数据被赋给WORK AREA后再APPEND到表中。
除了上述的赋值方式外，还可以通过OPEN SQL将数据表中的数据按条件查询后放入内表中，对于OPEN SQL的具体用法，将后在后面介绍。
FOR EXAMPLE:
TABLES:USER21.
DATA:BEGIN OF EMP OCCURES 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP.
SELECT BNAME AS NAME PERSNUMBER AS TELNUM ADDRNUMBER AS ADDR
INTO TABLE EMP FROM USER21. "通过OPEN SQL将从数据表中抓取的数据直接复制给内表。
3.内表数据管理
1.内表的清空
对内表数据的清空共包括4种模式
CLEAR <ITAB>：仅清空HEADER LINE，对内表数据存储空间不影响。
REFRESH <ITAB>：清空内表数据存储空间，对HEADER LINE不影响。
REFRESH <itab> FROM TABLE <dbtab>：清空内表存储空间，填充从数据库表所获数据。
FREE <ITAB>：清空内表数据存储空间，对HEADER LINE不影响。
FOR EXAMPLE：
TABLES:USER21.
DATA:BEGIN OF EMP OCCURS 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
ADDR LIKE USER21-ADDRNUMBER,
END OF EMP.
SELECT BNAME AS NAME PERSNUMBER AS TELNUM ADDRNUMBER AS ADDR INTOTABLE EMP FROM USER21.
USER21-BNAME='JERY'.
REFRESH EMP FROM TABLE USER21. "清除EMP的存储空间，并从USER21中查找数据填充到内表。
2.INSERT（向内表插入数据）
可以按内表的具体字段向表中插入一行或者多行数据，具体语法如下：
INSERT [wa INTO|INITIAL LINE INTO] itab [INDEX idx].
INSERT [wa INTO|INITIAL LINE INTO] TABLE itab.
INSERT LINES OF itab1 [FROM idx] [TO idx2] INTO itab2 [INDEX idx3].
FOR EXAMPLE:
TABLES:USER21.
DATA:BEGIN OF EMP OCCURS 0,
NAME LIKE USER21-BNAME,
END OF EMP.
DATA:EMPTAB1 LIKE EMP.
DATA:EMPTAB2 LIKE EMP OCCURS 10.
EMP='JERY'.
INSERT EMP INDEX 1."若内表有多行数据，该语句将新记录新增到第一行。
EMPTAB1='TOM'.
INSERT EMPTAB1 INTO TABLE EMP. “将结构体中数据新增到内表
SELECT BNAME AS NAME INTO TABLE EMPTAB2 FROM USER21.
INSERT LINES OF EMPTAB2 FROM 10 INTO EMP."将数据表EMPTAB2从第10行开始的所有数据插入到表EMP中。
3.MODIFY(直接修改内表数据)
按内表位置或者具体内表字段值相等条件修改内表数据。
MODIFY itab [FROM wa] [INDEX idx] [TRANSPORTING f1...fn] WHERE cond.
FOR EXAMPLE:
TABLES:USER21.
DATA:BEGIN OF EMP OCCURS 0,
NAME LIKE USER21-BNAME,
TELNUM LIKE USER21-PERSNUMBER,
END OF EMP.
SELECT BNAME AS NAME PERSNUMBER AS TELNUM INTO TABLE EMP FROM USER21.
EMP-NAME='JERY'.
EMP-TELNUM='010-888888'.
MODIFY EMP INDEX 1."修改内表第一行数据为设定值
EMP-TELNUM='0755-888888'.
*查找内表中NAME等于TOM的数据，并按设定修改其TELNUM字段，有多行值时会同时修改。
MODIFY EMP TRANSPORTING TELNUMBER WHERE NAME='TOM'.
4.COLLECT（内表数据分类汇总）
将内表中相同的字段合并，若有类型为I的字段，则将其值加总。
COLLECT [wa INTO] itab.
FOR EXAMPLE:
TYPES:BEGIN OF COMPANY,
NAME(20) TYPE C,
SALES TYPE n,
ENF OF COMPANY.
DATA:COMP TYPE COMPANY,COMPTAB TYPE COMPANY OCCURS 0.
COMP-NAME = 'MOBILE'. COMP-SALES = 10. COLLECT COMP INTO COMPTAB.
COMP-NAME = 'NOTEBOOK'. COMP-SALES = 20. COLLECT COMP INTO COMPTAB.
COMP-NAME = 'MOBILE'.COMP-SALES = 30.COLLECT COMP INTO COMPTAB.
5.SORT（内表数据排序）
对内表进行排序，可以指定具体的排序字段、排序方式(升/降),语法如下：
SORT itab [BY f2 f2...fn] [ASCENDING/DESCENDING]
6.READ(读取)
依据具体行数或字段值等条件读取某一内表的数据。
READ TABLE itab FROM wa.
READ TABLE itab WITH
