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
Below ABAP syntax is for beginner.You can check the ‘Mdate’’s value.
DATA: Mdate type D.
Mdate = SY-DATUM. ” Mdata’s value ‘20080508′
Mdate+6(2) = ‘01′. ” Mdata’s value ‘20080501′
Mdate = Mdate - 1. “Mdata’s value ‘20080430′
WRITE: MDATE.
The result is ‘20080430‘.
—————————————–
DATA: HOURS TYPE I,
MINUTES TYPE I,
T2 TYPE T VALUE ‘200000′,
T1 TYPE T VALUE ‘183000′.
HOURS = ( T2 - T1 ) / 3600.
MINUTES = ( T2 - T1 ) / 60.
WRITE: HOURS,
/ MINUTES.
Result is : 2
90.
—————————————–
DATA: HOURS TYPE P DECIMALS 2,
MINUTES TYPE P DECIMALS 2,
T2 TYPE T VALUE ‘200000′,
T1 TYPE T VALUE ‘183000′.
HOURS = ( T2 - T1 ) / 3600.
MINUTES = ( T2 - T1 ) / 60.
WRITE: HOURS,
/ MINUTES.
Result is: 1.50
90.00
When we use variable,we can use Call By Value method.
For example :
ABAP Syntax : WRITE (<f>) TO <g>
Example:
DATA: NAME(20) VALUE ‘SOURCE’,
SOURCE(10) VALUE ‘LILY’,
TARGET(10).
WRITE (NAME) TO TARGET.
WRITE / TARGET.
Display Result is: LILY
SAP ABAP syntax about Check box is for ABAP beginners.
DATA: FLAG1 VALUE ‘ ‘,
FLAG2 VALUE ‘X’.
WRITE: / ‘CHECK FLAG 1:’ , FLAG1 AS CHECKBOX.
WRITE: / ‘CHECK FLAG 2:’ , FLAG2 AS CHECKBOX.
Result:
Recent Comments