Code :
REPORT ZVP_TASK.
PARAMETERS: P_VAL TYPE CHAR3,
RB1 RADIOBUTTON GROUP RBG,
RB2 RADIOBUTTON GROUP RBG.
DATA: VAL1 TYPE CHAR3,
VAL2 TYPE CHAR3.
IF RB1 = 'X'.
WRITE: 'PRINT 1 TO', P_VAL , 'ASCENDING ORDER'.
DO P_VAL TIMES.
VAL1 = VAL1 + 1.
WRITE:/ VAL1.
ENDDO.
ELSE.
WRITE: 'PRINT', P_VAL , 'TO 1 DESCENDING ORDER'.
DO P_VAL TIMES.
CONDENSE P_VAL NO-GAPS.
WRITE:/ P_VAL.
P_VAL = P_VAL - 1.
ENDDO.
ENDIF.
Output :
IDE Used To Test This Code : ABAP Editor.
Try this code in your computer for better understanding. Enjoy the code. If you have any Question you can contact us or mail us.We will reply you as soon as possible.
REPORT ZVP_TASK.
PARAMETERS: P_VAL TYPE CHAR3,
RB1 RADIOBUTTON GROUP RBG,
RB2 RADIOBUTTON GROUP RBG.
DATA: VAL1 TYPE CHAR3,
VAL2 TYPE CHAR3.
IF RB1 = 'X'.
WRITE: 'PRINT 1 TO', P_VAL , 'ASCENDING ORDER'.
DO P_VAL TIMES.
VAL1 = VAL1 + 1.
WRITE:/ VAL1.
ENDDO.
ELSE.
WRITE: 'PRINT', P_VAL , 'TO 1 DESCENDING ORDER'.
DO P_VAL TIMES.
CONDENSE P_VAL NO-GAPS.
WRITE:/ P_VAL.
P_VAL = P_VAL - 1.
ENDDO.
ENDIF.
Output :
IDE Used To Test This Code : ABAP Editor.
Try this code in your computer for better understanding. Enjoy the code. If you have any Question you can contact us or mail us.We will reply you as soon as possible.
Post a Comment