In this SAP ABAP tutorial I will show you the use COLLECT STATEMENT in SAP ABAP.
Collect statement is used to summarize the data of the internal table.
SYNTAX : collect <work_area> into <internal_table>.
Some points before using collect statement:
- Before using collect statement, all the fields of an internal table that are not part of the key of the table should be of numeric type ( f, p, i).
- When we use collect statement to add a new line or record
in an internal table, the SAP system checks whether the line with the
same key value already exist in the table. IF no such line exists, then
collect will act as a normal append.
However, if the line having the same key value is found in the internal table, the collect statement will adds the content of the numeric field in the work area with the contents of the numeric fields in the existing entry of the table.
REPORT ztest_r_05.
TYPES : BEGIN OF ty_shop,
item TYPE char10,
quantity TYPE i,
amount TYPE i,
END OF ty_shop.
DATA : lt_shop TYPE STANDARD TABLE OF ty_shop INITIAL SIZE 1,
ls_shop TYPE ty_shop,
lt_shop_summ LIKE lt_shop.
FIELD-SYMBOLS : <fs_shop> TYPE ty_shop.
DO 6 TIMES.
CASE sy-index.
WHEN 1.
ls_shop-item = ‘SOAP’.
ls_shop-quantity = 1.
ls_shop-amount = 50.
APPEND ls_shop TO lt_shop.
CLEAR ls_shop.
WHEN 2.
ls_shop-item = ‘SAMPOO’.
ls_shop-quantity = 1.
ls_shop-amount = 120.
APPEND ls_shop TO lt_shop.
CLEAR ls_shop.
WHEN 3.
ls_shop-item = ‘FACE_WASH’.
ls_shop-quantity = 1.
ls_shop-amount = 100.
APPEND ls_shop TO lt_shop.
CLEAR ls_shop.
WHEN 4.
ls_shop-item = ‘SOAP’.
ls_shop-quantity = 1.
ls_shop-amount = 70.
APPEND ls_shop TO lt_shop.
CLEAR ls_shop.
WHEN 5.
ls_shop-item = ‘SAMPOO’.
ls_shop-quantity = 1.
ls_shop-amount = 200.
APPEND ls_shop TO lt_shop.
CLEAR ls_shop.
WHEN 6.
ls_shop-item = ‘FACE_WASH’.
ls_shop-quantity = 1.
ls_shop-amount = 240.
APPEND ls_shop TO lt_shop.
CLEAR ls_shop.
WHEN OTHERS.
ENDCASE.
ENDDO.
LOOP AT lt_shop ASSIGNING <fs_shop>.
WRITE : / <fs_shop>-item , <fs_shop>-quantity, <fs_shop>-amount.
ENDLOOP.
ULINE.
WRITE : / ‘Summarized records using Collect statement’.
LOOP AT lt_shop INTO ls_shop.
COLLECT ls_shop INTO lt_shop_summ.
ENDLOOP.
LOOP AT lt_shop_summ INTO ls_shop.
WRITE : / <fs_shop>-item , <fs_shop>-quantity, <fs_shop>-amount.
ENDLOOP.
Serkan AKKAVAK
Computer Engineer
ABAP Developer & SAP MM SD Consultant
serkurumsal@yandex.com
Social Plugin