*&---------------------------------------------------------------------* *& Report _LIB_BASIC_05_CYCLES *& *&---------------------------------------------------------------------* *& Description: *& ABAP Cycles *& *& Technical description: *& *& More Information: *& *&---------------------------------------------------------------------* *& Change log: *& Date Author Action *& *& *&---------------------------------------------------------------------* REPORT _LIB_BASIC_05_CYCLES. *-----------------------------------* * DECLARATIONS CONSTANTS: gc_number_of_rows TYPE i VALUE 10. CONSTANTS: BEGIN OF gc_cycle_colour, do_x_times TYPE i VALUE 4, do_endless TYPE i VALUE 3, inner_do_x_times TYPE i VALUE 7, while TYPE i VALUE 6, END OF gc_cycle_colour. DATA: gv_mod_result TYPE i. *-----------------------------------* * MAIN LOGIC *-----------------------------* " DO x TIMES Cycle FORMAT COLOR = col_heading. WRITE: / 'DO x TIMES Cycle'. SKIP. FORMAT COLOR = col_background. SKIP. ULINE. *-----------------------------* " ENDLESS DO Cycle FORMAT COLOR = col_heading. WRITE: / 'ENDLESS DO Cycle'. SKIP. FORMAT COLOR = col_background. SKIP. ULINE. *-----------------------------* " WHILE Cycle FORMAT COLOR = col_heading. WRITE: / 'WHILE Cycle'. SKIP. FORMAT COLOR = col_background.