1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42
|
PARAMETERS p_matnr LIKE mara-matnr.
PARAMETERS : rb1 TYPE c RADIOBUTTON GROUP radi USER-COMMAND rad,
rb2 TYPE c RADIOBUTTON GROUP radi.
AT SELECTION-SCREEN ON RADIOBUTTON GROUP radi.
CALL SCREEN 1000.
START-OF-SELECTION.
*&---------------------------------------------------------------------*
*& Module init_screen OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE init_screen OUTPUT.
LOOP AT SCREEN.
IF screen-name = 'P_MATNR'.
IF NOT rb1 IS INITIAL.
screen-input = '0'.
ELSE.
screen-input = '1'.
ENDIF.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
ENDMODULE. " init_screen OUTPUT |
Partager