running sum

Author: sreenith

src/z_lc_power_of_2.prog.abap

@@ -0,0 +1,26 @@
+*&---------------------------------------------------------------------*
+*& Report Z_LC_POWER_OF_2
+*&---------------------------------------------------------------------*
+*&
+*&---------------------------------------------------------------------*
+REPORT z_lc_power_of_2.
+
+DATA: num TYPE i VALUE 1.
+
+PARAMETERS: p_input TYPE i.
+
+
+WHILE p_input > num .
+
+
+  num = num * 2.
+
+
+ENDWHILE.
+
+IF p_input  = num.
+
+  WRITE: / 'Power of two'.
+ELSE.
+  WRITE: / 'Not a Power of two'.
+ENDIF.

src/z_lc_power_of_2.prog.xml

@@ -0,0 +1,21 @@
+<?xml version="1.0" encoding="utf-8"?>
+<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
+ <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
+  <asx:values>
+   <PROGDIR>
+    <NAME>Z_LC_POWER_OF_2</NAME>
+    <SUBC>1</SUBC>
+    <RLOAD>E</RLOAD>
+    <FIXPT>X</FIXPT>
+    <UCCHECK>X</UCCHECK>
+   </PROGDIR>
+   <TPOOL>
+    <item>
+     <ID>R</ID>
+     <ENTRY>Report Z_LC_POWER_OF_2</ENTRY>
+     <LENGTH>22</LENGTH>
+    </item>
+   </TPOOL>
+  </asx:values>
+ </asx:abap>
+</abapGit>