Skip to content

Instantly share code, notes, and snippets.

@benjnw

benjnw/group_by_and_loop.abap

Created August 6, 2025 14:32
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save benjnw/76358ed4e19fdf77bc3db64c911fe4e9 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save benjnw/76358ed4e19fdf77bc3db64c911fe4e9 to your computer and use it in GitHub Desktop.
Download ZIP
group_by_and_loop
Raw
group_by_and_loop.abap
SORT t_vibdmeas BY intreno meas.
DATA l_sum_measval TYPE rebdmeasvalue VALUE 0.
DATA ls_vibd_sum TYPE ty_vibdmeas_sum.
LOOP AT t_vibdmeas INTO DATA(ls_vibdmeas)
GROUP BY ls_vibdmeas-intreno.
LOOP AT GROUP ls_vibdmeas INTO DATA(ls_vibdmeas_unit).
IF ls_vibdmeas_unit-meas EQ 'A001'.
l_sum_measval = ls_vibdmeas_unit-measvalue.
ELSE.
SUBTRACT ls_vibdmeas_unit-measvalue FROM l_sum_measval.
ENDIF.
ENDLOOP.
ls_vibd_sum-intreno = ls_vibdmeas-intreno.
ls_vibd_sum-measvalue = l_sum_measval.
ls_vibd_sum-measunit = ls_vibdmeas-measunit. "check
APPEND ls_vibd_sum TO t_vibdmeas_sum.
ENDLOOP.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment