An SAP Consultant

REPORT ztest_notepad.
 
PARAMETERS p_check AS CHECKBOX USER-COMMAND uc1.
 
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.
PARAMETERS p_1 TYPE char10 MODIF ID mod.
SELECTION-SCREEN END OF BLOCK b1.
 
AT SELECTION-SCREEN OUTPUT.
 
  IF p_check NE 'X'.
    LOOP AT SCREEN.
      IF screen-group1 = 'MOD'.
        screen-active = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
  ELSE.
    LOOP AT SCREEN.
      IF screen-group1 = 'MOD'.
        screen-active = '1'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
  ENDIF.