SAPLAB-SAP Tips,ABAP Tips!

SY-SUBRC :  系統執行某指令后,表示執行成功与否的變數,’0′ 表示成功Return Value of ABAP Statements
SY-UNAME:  當前使用者登入SAP的USERNAME;
SY-DATUM:  當前系統日期; Current Date of Application Server
SY-UZEIT:    當前系統時間; Current Time of Application Server
SY-TCODE:   當前執行程式的Transaction code Current Transaction Code
SY-INDEX :   當前LOOP循環過的次數Loop Index
SY-TABIX:  當前處理的是internal table 的第几筆Index of Internal Tables
SY-TMAXL: Internal table的總筆數 Obsolete ABAP System Field
SY-SROWS: 屏幕總行數; Screens, numbers of lines
SY-SCOLS:  屏幕總列數; Screens, number of columns
SY-MANDT: CLIENT NUMBER Client ID of Current User
SY-VLINE:  畫豎線 Vertical Line
SY-ULINE:  畫橫線Horizontal Line

1. REFRESH <itab>

It is used in internal Table without HEADER LINE,clear all elements.

Example:

    REFRESH ITAB.

2. CLEAR <itab> []

It is used in Internal Table with HEADER LINE,clear all elements.

Example:

    CLEAR ITAB[].

3. Free <itab>

Release Internal Table’s memory space, it is used after REFRESH and CLEAR.

ABAP Syntax:

SORT <itab> [<order>] [BY <f1>] ….

[<order>] : (DESCENDING) (ASCENDING), (ASCENDING)

<f1>: Field

Example:

SORT ITAB DESCENDING BY COL2.

ABAP Syntax of Collect Line.

DATA: BEGIN OF ITAB OCCURS 3,

COL1(3) TYPE C,

COL2 TYPE I,

END OF ITAB.

ITAB-COL1 = ‘ABC’. ITAB –COL2 = 10.

COLLECT ITAB.

ITAB-COL1 = ‘XYZ’. ITAB-COL2 = 20.

COLLECT ITAB.

ITAB-COL1 = ‘ABC’. ITAB-COL2 = 30.

COLLECT ITAB. “Collect COL2 to COL1=ABC’s element

LOOP AT ITAB.

WRITE: / ITAB-COL1,ITAB-COL2.

ENDLOOP.

Result :

ABC 40

XYZ 20

Syntax

APPEND [<wa>] TO [Initial Line To] <itab>

[Initial Line To] 为增加一预设初值的元素

Example: Using Work Area

DATA: BEGIN OF LINE,

COL1 TYPE I,

COL2 TYPE I,

END OF LINE.

DATA ITAB LIKE LINE OCCURS 10.

DO 2 TIMES.

LINE-COL1 = SY-INDEX. “SY-INDEX为迥圈的 Counter

LINE-COL2 = SY-INDEX **2.

APPEND LINE INTO ITAB. “Add to Internal Table

ENDDO.

LOOP AT ITAB INTO LINE. “ITAB 总共有两个元素

WRITE: / LINE-COL1,LINE-COL2.

ENDLOOP.

Run Result:

1 1

2 4

Example: Don’t use Work Area

DATA: BEGIN OF ITAB OCCURS 10,

COL1 TYPE I,

COL2 TYPE I,

END OF ITAB.

DO 2 TIMES.

ITAB-COL1 = SY-INDEX.

ITAB-COL2 = SY-INDEX **2.

APPEND ITAB. “Add to Internal Table

ENDDO.

LOOP AT ITAB. “ITAB 总共有两个元素

WRITE: / ITAB-COL1,ITAB-COL2.

ENDLOOP.

Run Result:

1 1

2 4