ABAP while ,do ,case
REPORT zabap12. data : inc type i value 1 . start-of-selection. *while inc <= 100. * write : / inc . * inc += 1 . * *endwhile . do 10 times. write : / inc . inc += 1 . enddo.
if chk_oprt = 'X'. case oprt. when '+'. opr_desc = 'Addition'. when '-'. opr_desc = 'Subtraction'. when '*'. opr_desc = 'Multification'. when '/'. opr_desc = 'Division'. endcase. write: / 'Operater:' ,oprt, / 'Operation description:', opr_desc. endif.