internal table – nocin.eu

ABAP

[ABAP] REDUCE as an alternative to line_exists for the use of other comparison operators such as >, <, >=, <=, CS, CN

December 12, 2024 December 12, 2024

By using line_exists you can check if a line exists or not exists, but it is not possible to use other comparison operators. A workaround can be REDUCE in that case.

In the following snippet, we want to check if there is a flight that costs more than $1000,

SELECT * FROM sflight INTO TABLE @DATA(flights).

* Check if flight with price > 1000 exist
IF REDUCE abap_bool( INIT price_gt_1000 = abap_false
                     FOR  line IN flights WHERE ( price > 1000 )
                     NEXT price_gt_1000 = abap_true ) EQ abap_true.
  " flight with price > 1000 exists
ENDIF.

ABAP

[ABAP] Sum column using reduce with where condition

October 12, 2022 November 12, 2024

SELECT * FROM sflight INTO TABLE @DATA(lt_sflight).

DATA(a319_paymant_sum) = REDUCE #( INIT sum = 0
                                   FOR flight IN lt_sflight WHERE ( planetype = 'A319' )
                                   NEXT sum += flight-paymentsum ).

ABAP

[ABAP] Finding maximum value of specific column in itab

October 10, 2022 October 10, 2022

    DATA(maximum) = REDUCE #( INIT max = VALUE myType( )
                              FOR  line IN myTable
                              NEXT max = COND #( WHEN line-myColumn > max THEN line-myColumn
                                                                          ELSE max ) ).