ABAP4基础

ABAP4基础

一概念：

数据类型：

1 不占用内存空间。

2 描述了数据对象的属性。

3 用户可以自定义。

数据对象：

1占用内存空间。

2 一个特殊的类型。

3 是数据类型的具体实例。

//就是类型和变量ex:int i;

二定义数据对象

通过指定预定义的ABAP类型

DA TA: TYPE

例如：DATA: counter TYPE I.

2 通过指定自定义类型

DA TA: TYPE < user-defined-type>

例如：DATA: splight TYPE my_struc.

3 通过指定词典对象

DA TA: LIKE

例如：DATA: data LIKE sy-datum.

4 通过指定一个已经存在的数据对象

DATA: LIKE

例如：DATA: mycounter LIKE counter.

//定义变量的时候要在前面加上DATA:变量的数据类型不同,中间的关键词也不相同

如果数据类型是预定义的或者自定义的,关键词用TYPE

如果数据类型是词典对象或者是已经存在的数据对象,关键词用LIKE

三在ABAP/4中按结构和定义对数据类型分类。数据类型是：

基本的（非结构化的）或结构化的。

预定义的或用户定义的。

因此，有四类数据类型。预定义数据类型的名称是固定的。用户定义的数据类型的名称由程序员在程序中定义。

1 预定义的基本的数据类型:

ABAP/4 包含8 个预定义基本数据类型。

注意：

类型I 数据

类型I 数据的数值范围是-2**31 到2**31-1 并且仅包括整数。

对算术运算的非整型结果（如分数）进行四舍五入，而不是截断。

类型I 数据可用于计数器、项目号、索引和时间期段等。

类型P 数据

类型P 数据允许在小数点后有数字。

类型P 数据的数值范围取决于大小和小数点后的位数。有效大小可以是从1 到16 字节的任何值。将两个十进制数字压缩到一个字节，而最后一个字节包含一个数字和符号。在小数点后最多允许14个数位。

使用类型P 数据时，最好将程序属性设置为“定点算法(Fixed pt.arithmetic)”（参见指定程序属性）。否则，将类型P 数位作为整型对待。

类型P 数据可用于如距离、重量和钱数等数值。

类型F 数据

对于正数和负数，类型F 数的数值范围是1x10**-307 到1x10**308，包括0（零）。

精确范围近似为15 位十进制数，这取决于硬件平台的浮点算法。

由于是在内部将类型F数据转换为二进制系统，因此可能出现舍入误差。尽管ABAP/4 处理器试图将这些影响减至最小，

但是如果要求高精度，则不应该使用类型 F 数据。而应代之以类型P数据。

如果需要大的数值范围，而且舍入误差不重要，则可以使用类型 F 资料。

因为对类型I 和 F 字段的算术运算与机器码语句关系更紧密，所以用类型I 和类型 F 字段的计算比用类型P字段的计算要快；同时对P字段的运算要求更多的软件支持。尽管如此，可能仍必须使用类型P 数据以满足精度或数值范围的要求。

类型N 数据不包含数值。虽然由数字组成，但这些数字不用于计算。科目号和邮编是典型的类型N 字段。

例如：DATA: counter TYPE I V ALUE 1,

name(18) TYPE C,

start_date TYPE D,

sum(3) TYPE DECIMALS 2.

2 用户定义的基本数据类型

完全是以预定义的基本数据类型为基础的。要定义自己的基本数据类型用TYPES 语句

例如：

TYPES: LENGTH TYPE P DECIMALS 2,

CODE(3) TYPE C.

DA TA: DISTANCE TYPE LENGTH,

CITY_CODE TYPE CODE.

3 预定义的结构化类型（TABLES）

例如：TABLES: sbooks.

定义一个工作区，名字必须与表名相同。

4 用户定义的结构化数据类型

结构：

TYPE: BEGIN OF ,

…….

END OF .

DA TA: TYPE .

注意：结构没有数据。可以嵌套。

例如：

TYPE: BEGIN OF rec_type,

Flag TYPE C,

Name(30 ) TYPE C,

Sum_field TYPE P DECIMALS 2,

END OF rec-type.

DA TA: wa_rec TYPE rec-type.

字符串

字段串是程序中的一组内表。要声明字段串，使用DATA 语句并用BEGIN OF 和END OF 标记该字段组的起始和结束。

语法如下：

DA TA: BEGIN OF ,

,

..............

END OF .

例如：

DA TA: BEGIN OF ADDRESS,

NAME(20) TYPE C,

STREET(20) TYPE C,

NUMBER TYPE P,

POSTCODE(5) TYPE N,

CITY(20) TYPE C,

END OF ADDRESS.

该示例定义了一个长度为73 的字段串ADDRESS。可以通过ADDRESS-NAME、ADDRESS-STREET等寻址组件。

注释：可以将长字段串的声明收集在包括程序中（参见包含程序）。但是，如果频繁使用该数据结构，则最好将它们保存在ABAP/4 词典中。

内表

定义常数：CONSTANTS.

语法：CONSTANTS [] []. CONSTANTS: MYNAME(10) V ALUE 'Fred',

BIRTHDAY TYPE D V ALUE '19600110',

ZERO TYPE I V ALUE IS INITIAL.

要将字段串定义为常量，请写：

CONSTANTS: BEGIN OF ,

,

..............

END OF .

例如：CONSTANTS: BEGIN OF MYADDRESS,

NAME(20) TYPE C V ALUE 'Fred Flintstone',

STREET(20) TYPE C V ALUE 'Cave Avenue',

NUMBER TYPE P V ALUE 11,

POSTCODE(5) TYPE N V ALUE 98765,

CITY(20) TYPE C V ALUE 'Bedrock',

END OF MYADDRESS.

四类型转换规则：

1 基本类型的转换规则：

转换

2 结构类型的转换：

DATA: BEGIN OF REC1,

TEXT1(3) TYPE C V ALUE …AAA?,

TEXT2(2) TYPE C V ALUE …BB?, PACK TYPE P DECIMALS V ALUE …2.26?, TEXT3(10) TYPE C V ALUE …XY?, END OF REC1, BEGIN OF REC2,

TEXT1(5) TYPE C V ALUE …CCCCC?, PACK TYPE P DECIMALS V ALUE ?72.34?, TEXT3 TYPE C V ALUE …Z?, END OF REC2.

注释：ABAP 对基本类型到结构，结构到基本类型的转换也有一定的规则。 内表只能转换到另一个内表，适当的行类型被转换。

五 数值运算

语法： COMPUTE = .

关键词 COMPUTE 可选。换句话说，该语句也可以写成： = . 两条语句效果等同。

1 基本算术运算

ABAP/4 支持四种基本算术运算 ，同时还支持乘方计算 。可以用数学表达式指定以下算术运算符：

+ 加法

- 减 法

* 乘法

/ 除 法 DIV 整 除 MOD 求 余 ** 求幂 例如： COUNTER = COUNTER +

2.

也可以用关键词 ADD 、SUBTRACT 、 MULTIPLY 和 DIVIDE 进 行基本算术运算 ADD TO . 等同于

= + . SUBTRACT FROM 等同于

= - .

MULTIPL Y BY . 等同于

= * DIVIDE BY . 等同于

= /

2 执行字段串的算术运算

可以用以下关键词，执行字段串的算术运算：

ADD-CORRESPONDING

SUBTRACT-CORRESPONDING

MULTIPL Y-CORRESPONDING

DIVIDE-CORRESPONDING

例如：

DA TA: BEGIN OF RATE,

USA TYPE F V ALUE '0.6667',

FRG TYPE F V ALUE '1.0',

AUT TYPE F V ALUE '7.0', Array END OF RATE.

DA TA: BEGIN OF MONEY,

USA TYPE I V ALUE 100,

FRG TYPE I V ALUE 200,

AUT TYPE I V ALUE 300,

END OF MONEY.

MULTIPL Y-CORRESPONDING MONEY BY RATE.

WRITE / MONEY-USA.

WRITE / MONEY-FRG.

WRITE / MONEY-AUT.

输出如下：

67

200

2,100

六系统函数

例如：

错误：a = (B+EXP(C))*E/SIN(3-G).

正确：a = ( B + EXP( C ) ) * E / SIN( 3 –

七处理日期字段

日期字段数据类型不是数值型。但是，由于进行自动类型转换，可以采用类似于数值型字段的处理方法，

例如：

DA TA: DIFF TYPE P,

DA TE LIKE SY-DA TUM,

BEGIN OF DATEREC,

YEAR(4) TYPE C,

MONTH(2) TYPE C,

DAY(2) TYPE C,

END OF DATEREC.

DATEREC = SY-DA TUM.

DATEREC-DAY = …01?. “该月的第一天

DATE = DATEREC.

DATE = DATE – 1. “上月的最后一天

DIFF = SY-DATUM –DA TE. “相差的天数

参考书page of 4-25

八条件语句

1 使用CASE 的条件分支

要根据特殊数据域位的内容执行不同的语句块，可以如下使用CASE 语句：

语法：

CASE .

WHEN .

WHEN .

WHEN .

WHEN ...

......

WHEN OTHERS.

ENDCASE.

例如：

DA TA: TEXT1 V ALUE 'X',

TEXT2 V ALUE 'Y',

TEXT3 V ALUE 'Z',

STRING V ALUE 'A'.

CASE STRING.

WHEN TEXT1.

WRITE: / 'String is', TEXT1.

WHEN TEXT2.

WRITE: / 'String is', TEXT2.

WHEN TEXT3.

WRITE: / 'String is', TEXT3.

WHEN OTHERS.

WRITE: / 'String is not', TEXT1, TEXT2, TEXT3.

ENDCASE.

产生如下输出：

String is not X Y Z

这里，执行WHEN OTHERS 后面的语句块，因为STRING 的内容“A”不等于“X”、“Y”或“Z”，

2 使用IF 的条件分支

IF 语句允许依据条件将程序流转到特定的语句块中。该语句块包括IF语句及其后面的ELSEIF、ELSE 或ENDIF 之间的所有命令。

语法：

IF .

ELSEIF .

ELSEIF .

.....

ELSE.

ENDIF.

九循环语句

1 使用DO 的无条件循环

如果想要多次执行语句块，则可以如下使用DO 语句编程循环：

语法：

DO [ TIMES] [V ARYING FROM NEXT ].

ENDDO.

在发现EXIT、STOP 或REJECT 语句之前，系统继续执行由DO 引导、ENDDO 结束的语句块。可以使用TIMES 选项限制循环次数。 可以是文字或变量。如果 是0 或负数，系统不执行该循环。

注意：使用DO 语句时要避免死循环。如果不使用TIMES 选项，则在语句块中至少应包含一个EXIT、STOP 或REJECT 语句，以便系统能够退出循环。

例如：

DO.

WRITE SY-INDEX.

IF SY-INDEX = 3.

EXIT.

ENDIF.

ENDDO.

产生如下输出：

1 2 3

2 使用WHILE 的条件循环

如果只要条件为真，就不止一次执行语句，可以如下使用WHILE 语句编程：

语法：

WHILE [V ARY FROM NEXT ].

ENDWHILE.

如何终止循环

a 无条件终止循环过程

要立即无条件终止循环，如下使用CONTINUE 语句：

语法:

CONTINUE.

在CONTINUE 语句之后， 系统跳过当前语句块中所有剩余语句块，继续该语句后面的循环。 例如： DO 4 TIMES.

CONTINUE.

ENDIF.

WRITE SY-INDEX. ENDDO.

产生如下输出： 1 3 4

b 有条件终止循环过程

要有条件终止循环过程 ，使用 CHECK 语句：

语法:

CHECK .

如果条件是假，系统跳过当前语句块中所有剩余语句块， 继续后面的循环过程。 对于， 可使用编程逻辑表达式中描述的任何逻辑表达式。 例如： DO 4 TIMES.

CHECK SY-INDEX BETWEEN 2 and 3. WRITE SY-INDEX. ENDDO.

产生如下输出：

2 3

c 完全终止循环

要无条件完全终止循环 ，使用 EXIT 语句： 语法: EXIT.

EXIT 语句之后， 系统立即退出循环，继续结束语句 (ENDDO 、 ENDWHILE 、 ENDSELECT)后面的处理。 在嵌套循环中，系统仅退出当前循环。 例如： DO 4 TIMES. IF SY-INDEX = 3. EXIT.

ENDIF.

WRITE SY-INDEX.

产生如下输出：

1 2

十逻辑运算符

NOT AND OR

十一操作符

注意：逻辑运算符和操作符两边要有空格。

十二语法结构

1 语句结构

下列图表显示ABAP/4 语句的结构。

ABAP/4 没有格式限制。可以自由格式输入语句。这意味着可以缩排语句、在一行中写几条语句或者一条语句跨越几行。

在语句中必须以至少一个空格分开词。系统也将行结束符解释为空格。

程序段

PROGRAM SAPMZTST.

WRITE 'This is a statement'.

也可以如下编写：

PROGRAM SAPMTEST. WRITE 'This is a statement'.

或者如下：

PROGRAM

SAPMTEST.

WRITE

'This is

a statement'.

注意：应该使用自由格式提高程序的可读性，但是应避免使用复杂格式。

2 注释结构

可以在程序的任意处插入注释行。在程序中有两种方法表明注释：

如果要将整行变为注释，则在行开始处输入星号（*）。

如果要将某行的一部分变为注释，则在注释之前输入双引号（"）。

例如：

PROGRAM SAPMTEST.

* The following line contains a WRITE statement

WRITE 'First Program'. " Output on List

3连接相似语句

ABAP/4 编程语言允许将带相同起始部分的连续语句连入链语句。

要连接分开的语句，只要写一次相同部分，并且在其后设置冒号（:）。在冒号后，列出语句的其余部分并用逗号（,）分开。请保证在最后部分之后设置句号以通知系统链的结束处。

例如：

a. 语句顺序：

WRITE SPFLI-CITYFROM.

WRITE SPFLI-CITYTO.

WRITE SPFLI-AIRPTO.

链语句：

WRITE: SPFLI-CITYFROM, SPFLI-CITYTO, SPFLI-AIRPTO.

在链中，冒号将语句的开始部分与可变部分分开。可以在冒号（或逗号）之前或之后插入任

意个空格。

也可以写如下相同语句：

WRITE: SPFLI-CITYFROM,

SPFLI-CITYTO,

SPFLI-AIRPTO.

在链语句中，第一部分（冒号之前）不受语句关键词的限制。

b. 语句顺序：

SUM = SUM + 1.

SUM = SUM + 3.

SUM = SUM + 2.

SUM = SUM + 4.

链语句：

SUM = SUM + : 1, 2, 3, 4.

十三事件和时间关键词

下列事件出现在典型报表程序的运行时间处，该报表程序使用逻辑数据库：

处理报表程序输出列表时，出现下列事件：

一般程序的执行顺序是：

十四创建简单的ABAP/4 程序

命名程序规则

使用至少1 个但不超过8 个字符。（好像ABAP4.5没有这个限制）

不要使用下列字符

句点（.）

逗号( , )

空格（）

括号' ( ' ' ) '

单引号( ' )

双引号( " )

等号( = )

星号( * )

元音变音(?, ?, ?, ?, ?, ?) 和'?'

百分号(%) 和下划线(_)：因为这些符号是SQL 语句的通配符。SAP 建议在程序名称中不要使用它们。

报表程序：Yaxxxxxx 或Zaxxxxxx。用应用程序区的分类字母替换a。用任何有效字符替换x 。

任何其它ABAP/4 程序：SAPMYxxx 或SAPMZxxx。用有效字符替换x 。

参见BCAB4

单击“ Create ”

系统能正确处理程序。

要输入程序属性，请进行如下操作：

1. 在字段“标题”中输入程序标题。选择描述程序功能的标题。系统自动将标题与文本摘要合并。如果以后要更改标题，请按如下操作进行：

- 选择“ABAP/4 编辑器初始屏幕”上的“文本摘要”或“属性”。

- 选择“更改”。

2. 完成两个强制字段：

- 如果创建报表程序，则在“类型”字段中输入1 ，如果创建模块存储，则在“类型”字段中输入M。关于可能类型的列表，请单击可能条目箭头。

- 在“应用程序”字段中为应用程序输入分类字母，如财务会计输入F 。

3. 如果创建报表（类型= 1），请选择“确定”。

系统将特定报表属性自动插入输入字段。然后看见附加字段“逻辑数据库”、“从应用程序”和“选择屏幕”（版本）。

4. 指定与程序相关的所有其它属性。

5. 选择“保存”以保存属性。

6. 出现“维护对象目录条目”窗口。

7. 输入开发类。

如果为培训或测试目的创建程序（如某私有对象），则输入开发类$TMP 或选择“逻辑对象”。

8. 选择“保存”以保存开发类。

这将关闭“维护对象目录条目”窗口并返回“ABAP/4：程序属性”屏幕。

9. 选择“后退”离开屏幕。如果要直接转到ABAP/4 编辑器，请选择“转向-> 源代码”。

Display <-> Change: Changes the screen from display mode to change mode. Press it again to change it back to display mode.

Check: Checks the syntax of the current program.

Where-Used List: When you press this button while your cursor is on any variable name, it will display all the lines of code that use it.

Stack: Displays the contents of the current navigation stack.

Cut: Deletes the line containing the cursor and places it in the buffer.

Copy To Buffer: Copies the contents of the line containing the cursor to the buffer.

Insert From Buffer: Inserts the contents of the buffer to a new line above the current cursor position.

Insert Line: Inserts a blank line above the current cursor position.

Select: Selects a single line or a block of lines for moving, cutting, and pasting. Place your cursor on the first line of the block and press Select. Place your cursor on the last line of the block and press Select again. The lines contained in the block will turn red. You can now cut, copy, or duplicate the block of code the same way you did for a single line. To deselect the selected lines, choose the menu pathEdit->Deselect.

Undo: Reverses your last change. Only one level of undo is available.

ABAP/4 Help: Provides help about the editor and about ABAP/4 in general.

Pattern: Enables you to insert an automatically generated ABAP/4 statement. For example, to insert a write statement that writes out the contents of a variable named v1, press the Pattern button, choose the Write radio button, press the Continue button, enter the variable name in the Fld field, and then press the Copy button. A write statement will be inserted at the current cursor position.

Concatenate: Joins two lines together. To use it, place your cursor at the end of a line and press the Concatenate button to concatenate the next one to it. To split a line, position your cursor where you want the split to occur and press the Enter key.

Duplicate Line: Duplicates a single line or an entire block of code if one is selected (refer to the Select button, above).

Move Line: Moves lines left and right. To move a line, put your cursor at the target position and press the Move Line button. To move a whole block of code, mark the block and place your cursor on the first line of the block at the position to which it should be moved, and then press the Move Line button. To move it to the left, place your cursor to the left of the beginning of the line and press the Move Line button.

Mark Line: Places a bookmark on a line. You can display all marked lines with the menu path Goto -> Markers.

注意：

规范代码：程序―>规范代码。

写完程序后如果没有语法错误，要现启动一下(Ctrl+F3)，再执行(F8)

十五ABAP 词典

ABAP 词典是用来创建和管理数据的定义的，它集中描述了系统中的所有数据，添加，修改数据后对系统中所有组件都有效，这样保证了数据的完整性，一致性和安全性。

可以把词典看作数据库的远程接口

你可以创建与数据库对应的对象(表或视图等)，ABAP 词典描述了程序开发时用到的对象的逻辑结构，并且显示了他们和数据库的表和视图的映射关系。

ABAP 词典中最重要的对象类型有：

1 表

在R/3中有三种表类型：

透明表格

共享表格

簇表