Skip to content

Instantly share code, notes, and snippets.

@larshp

larshp/reverse_hex.abap

Created March 14, 2024 06:52
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save larshp/43197bc9f084bed9fb09ff02ef67fd3d to your computer and use it in GitHub Desktop.
Save larshp/43197bc9f084bed9fb09ff02ef67fd3d to your computer and use it in GitHub Desktop.
Download ZIP
Raw
reverse_hex.abap
CONSTANTS lc_iterations TYPE i VALUE 5000.
DATA hex TYPE x LENGTH 4.
DATA str TYPE string.
GET RUN TIME FIELD DATA(lv_start).
DO lc_iterations TIMES.
hex = '11223344'.
str = hex.
str = reverse( str ).
hex = str.
ENDDO.
GET RUN TIME FIELD DATA(lv_end).
DATA(lv_runtime) = lv_end - lv_start.
WRITE / lv_runtime.
GET RUN TIME FIELD lv_start.
DO lc_iterations TIMES.
hex = '11223344'.
CONCATENATE hex+3 hex+2(1) hex+1(1) hex(1) INTO hex IN BYTE MODE.
ENDDO.
GET RUN TIME FIELD lv_end.
lv_runtime = lv_end - lv_start.
WRITE / lv_runtime.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment