abap 750 reduce example
DATA(out) = cl_demo_output=>new( )->write_data( it_ekpo ).
LOOP AT it_ekpo
ASSIGNING FIELD-SYMBOL(<fs_ekpo>).
<fs_ekpo>-netwr = REDUCE netwr( INIT val TYPE netwr
FOR wa IN
FILTER #( it_komv
USING KEY key_kposn
WHERE kposn EQ CONV #( <fs_ekpo>-ebelp ) )
NEXT val = val + wa-kwert ).
ENDLOOP.
out->write_text( 'Using REDUCE:' ).
out->write_data( it_ekpo )->display( ).
Are there any code examples left?
New code examples in category Abap
-
Abap 2021-11-16 03:04:15 abap cl_salv_table=>factory
-
Abap 2021-10-21 08:39:14 Institution:375 Uncaught ReferenceError: $ is not defined
-
Abap 2021-10-04 08:22:06 adobre forms abap tcode
-
Abap 2021-09-14 16:13:02 abap last row in loop
-
Abap 2021-09-09 21:05:02 hello world in abap
-
Abap 2021-09-08 12:32:02 abap alv popup