Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

how to cummuale the quantity

Former Member
0 Kudos

hi

how can i cummulate the quantity from multile records into one record from unique fields Plant,matnr,lgort.

please help me

11 REPLIES 11

former_member181962
Active Contributor
0 Kudos

hi ramesh,

use collect statement in the loop at cotrol break events.

0 Kudos

Here is an example of how the COLLECT statement works.



report zrich_0003 .


data: begin of itab occurs 0,
      matnr type mard-matnr,
      werks type mard-werks,
      lgort type mard-lgort,
      labst type mard-labst,
      end of itab.

data: begin of itab2 occurs 0,
      werks type mard-werks,
      lgort type mard-lgort,
      labst type mard-labst,
      end of itab2.



select * into corresponding fields of table itab
       from mard up to 100 rows.


loop at itab.
  move-corresponding itab to itab2.
  collect itab2.
endloop.


loop at itab2.
  write:/ itab2-werks, itab2-lgort, itab2-labst.
endloop.

Regards,

Rich Heilman

Former Member
0 Kudos

use the statement collect.

0 Kudos
Syntax Diagram 
COLLECT 


Basic form 
COLLECT [wa INTO] itab. 



Extras: 
1. ... ASSIGNING <fs> 

2. ... REFERENCE INTO dref 

3. ... SORTED BY f 



The syntax check performed in an ABAP Objects context is stricter than in other ABAP areas. See Cannot Use Short Forms in Line Operations. 

Effect 
COLLECT allows you to create unique or summarized datasets. The system first tries to find a table entry corresponding to the table key. (See also Defining Keys for Internal Tables). The key values are taken either from the header line of the internal table itab, or from the explicitly-specified work area wa. The line type of itab must be flat - that is, it cannot itself contain any internal tables. All the components that do not belong to the key must be numeric types ( ABAP Numeric Types). 

If the system finds an entry, the numeric fields that are not part of the table key (see ABAPNumeric Types) are added to the sum total of the existing entries. If it does not find an entry, the system creates a new entry instead. 
The way in which the system finds the entries depends on the kind of the internal table: 


STANDARD TABLE: 
The system creates a temporary hash administration for the table to find the entries. This means that the runtime required to find them does not depend on the number of table entries. The administration is temporary, since it is invalidated by operations (such as DELETE, INSERT, MODIFY, or SORT). A subsequent COLLECT is then no longer independent of the table size, because the system has to use a linear search to find entries. For this reason, you should only use COLLECT to fill standard tables. 


SORTED TABLE: 
The system uses a binary search to find the entries. There is a logarithmic relationship between the number of table entries and the search time. 


HASHED TABLE: 
The system uses the internal hash administration of the table to find records. Since (unlike standard tables), this remains intact even after table modification operations, the search time is always independent of the number of table entries. 


For standard tables and SORTED TABLEs, the system field SY-TABIX contains the number of the existing or newly-added table entry after the COLLECT. With HASHED TABLEs, SY-TABIX is set to 0. 


Notes 
COLLECT allows you to create a unique or summarized dataset, and you should only use it when this is necessary. If neither of these characteristics are required, or where the nature of the table in the application means that it is impossible for duplicate entries to occur, you should use INSERT [wa INTO] TABLE itab instead of COLLECT. If you do need the table to be unique or summarized, COLLECT is the most efficient way to achieve it. 



If you use COLLECT with a work area, the work area must be compatible with the line type of the internal table. 



If you edit a standard table using COLLECT, you should only use the COLLECT or MODIFY ... TRANSPORTING f1 f2 ... statements (where none of f1, f2, ... may be in the key). Only then can you be sure that: 

-The internal table actually is unique or summarized 

-COLLECT runs efficiently. The check whether the dataset 
already contains an entry with the same key has a constant 
search time (hash procedure). 

If you use any other table modification statements, the check for entries in the dataset with the same key can only run using a linear search (and will accordingly take longer). You can use the function module ABL_TABLE_HASH_STATE to test whether the COLLECT has a constant or linear search time for a given standard table. 



Example 
Summarized sales figures by company: 



TYPES: BEGIN OF COMPANY, 
        NAME(20) TYPE C, 
        SALES    TYPE I, 
      END OF COMPANY. 

DATA: COMP    TYPE COMPANY, 
      COMPTAB TYPE HASHED TABLE OF COMPANY 
                                WITH UNIQUE KEY NAME. 

COMP-NAME = 'Duck'.  COMP-SALES = 10. COLLECT COMP INTO COMPTAB. 
COMP-NAME = 'Tiger'. COMP-SALES = 20. COLLECT COMP INTO COMPTAB. 
COMP-NAME = 'Duck'.  COMP-SALES = 30. COLLECT COMP INTO COMPTAB. 



Table COMPTAB now has the following contents: 

          NAME    | SALES 
          --------------- 
          Duck    |   40 
          Tiger   |   20 




Addition 1 
... ASSIGNING <fs> 

Effect 
If this statement is successfully executed, the field symbol <fs> is set to the changed or new entry. Otherwise the field symbol remains unchanged. 



Addition 2 
... REFERENCE INTO dref 

Effect 
If this statement is successfully executed the reference to the relevant line is placed in dref. Otherwise the data reference dref remains unchanged. 



Addition 3 
... SORTED BY f 

Effect 
COLLECT ... SORTED BY f is obsolete, and should no longer be used. It only applies to standard tables, and has the same function as APPEND ... SORTED BY f, which you should use instead. (See also Obsolete Language Elements). 



Note 
Performance: 


If you are still using internal tables with headers but, as recommended, keep your data in work areas with a different name, you do not need to assign the data to the header first in order to pass it to the internal tables. Instead, you should use the work area directly as with tables without headers. For example, "APPEND wa TO itab." is roughly twice as fast as "itab = wa. APPEND itab.". The same applies to COLLECT and INSERT. 


The runtime of a COLLECT increases with the width of the table key and the number of numeric fields whose contents are summated. 



Exceptions 
Catchable Exceptions 

CX_SY_ARITHMETIC_OVERFLOW 

Cause: Overflow in the integer field when forming totals 
Runtime Error: COLLECT_OVERFLOW 

Cause: overflow in type P field when forming totals 
Runtime Error: COLLECT_OVERFLOW_TYPE_P 



Non-Catchable Exceptions 

Cause: COLLECT on non-numeric fileds 
Runtime Error: TABLE_COLLECT_CHAR_IN_FUNCTION 



Related 
APPEND, WRITE ... TO, MODIFY, INSERT 


Additional help 
Inserting Summarized Table Lines 





former_member188685
Active Contributor
0 Kudos
data: itab2 like itab1 occurs 0 with header line.

loop at itab1.
  MOVE ITAB1 TO ITAB2.
  collect itab2.
endloop.

Former Member
0 Kudos

sort itab by plant matnr lgort.

loop at itab.

at end of lgort.

collet itab.

endloop.

0 Kudos

my requirement is like this:

PLANT MATNR PERIOD LGORT QUAN MEINS

A001 03201780 03122004 AA01 4 EA

A001 03201780 03122004 AA01 -2 LB

A001 03201780 03122004 AA01 8 LB

A003 03201782 03122004 AA02 4 EA

A003 03201782 03122004 AA02 -2 LB

A003 03201782 03122004 AA02 8 LB

now i want to cummulate the quantity from

UNIQUE fileds are : PLANT MATNR PERIOD LGORT QUAN MEINS

help me

Thanks & Regards

0 Kudos

data: itab2 like itab1 occurs 0 with header line.

loop at itab1.

MOVE ITAB1 TO ITAB2.

collect itab2.

endloop.

0 Kudos

Put MEINS in front of QUAN when defining the internal table. You will then get values like this.

PLANT MATNR PERIOD LGORT QUAN MEINS
A001 03201780 03122004 AA01 4 EA
A001 03201780 03122004 AA01 6 LB
A003 03201782 03122004 AA02 4 EA
A003 03201782 03122004 AA02 6 LB

Regards,

RIch Heilman

former_member181962
Active Contributor
0 Kudos

One more example.

DATA: BEGIN OF seats occurs 0,

carrid TYPE sflight-carrid,

connid TYPE sflight-connid,

seatsocc TYPE sflight-seatsocc,

END OF seats.

DATA seats_tab LIKE HASHED TABLE OF seats

WITH UNIQUE KEY carrid connid.

DATA wa_seats_tab LIKE line OF seats.

  • WITH UNIQUE KEY carrid connid.

SELECT carrid connid seatsocc

FROM sflight

INTO table seats.

*ENDSELECT.

loop at seats.

COLLECT seats INTO seats_tab.

endloop.

loop at seats_tab into wa_seats_tab.

write:/ wa_seats_tab-carrid,

wa_seats_tab-connid,

wa_seats_tab-seatsocc.

endloop.

Former Member
0 Kudos

Dear Ramesh,

you can do tha tin multiple ways but the best way hadled by system itself is using collect statement.

loop at itab.

move corresponding itab into itab_temp.

collect itab_temp.

endloop.

Ramesh, but only numerical fields are cumilated when all the other non numeric fields are similar.

e.g.

1 a

2 a

5 b

the result table is

3 a

5 b

hope this should be useful to you.

do reward points if it really useful to you.

Best Regards,

suresh.