sap部分开发笔记11

kokovop

【内表定义示例-1】  

[2005-06-29 11:5]

内表定义示例-1

下列程序是 有关如何将 结构化数据 对象声明为 内表的示例 。

PROGRAM SAPMZTST.

TYPES: BEGIN OF MYSTRING,

NUMBER TYPE I,

NAME(10) TYPE C,

END OF MYSTRING.

TYPES MYTAB TYPE MYSTRING OCCURS 5.

DATA STRING TYPE MYSTRING.

DATA ITAB TYPE MYTAB.

STRING-NUMBER = 1. STRING-NAME = 'John'.

APPEND STRING TO ITAB.

STRING-NUMBER = 2. STRING-NAME = 'Paul'.

APPEND STRING TO ITAB.

STRING-NUMBER = 3. STRING-NAME = 'Ringo'.

APPEND STRING TO ITAB.

STRING-NUMBER = 4. STRING-NAME = 'George'.

APPEND STRING TO ITAB.

LOOP AT ITAB INTO STRING.

WRITE: /
STRING-NUMBER,STRING-NAME.

ENDLOOP.

该程序在屏 幕上产生下 列输出：

1
John

2
Paul

3
Ringo

4
George

示例中，首
先将数据类
型 MYSTRING 定义为字段
串。然后，
根据字段串 MYSTRING，
利用 TYPES 语句的 OCCURS 参数将数据
类型 MYTAB 定义为内表
。利用数据
类型 MYSTRING 和 MYTAB 声明数据对
象 STRING 和 ITAB。
然后逐行填
充内表 ITAB 的字段。通
过使用字段
串 STRING，
在屏幕上显
示 ITAB 的内容。关
于内表的详
细信息，参
见
创建和处理内表。

唯美北纬30度

楼主相当给力哈