Делаем поле на селективном экране не активным

Привожу пример кода который делает поле на селективном экране не активным.

  1. REPORT  Z_TEST.
  2. PARAMETERS:
  3.  datum like sy-datum DEFAULT sy-datum,
  4.  zkunnr like kna1-kunnr.
  5.  
  6.  WRITE zkunnr.
  7.   AT SELECTION-SCREEN OUTPUT.
  8.   LOOP AT SCREEN.
  9.     IF screen-name = 'DATUM'."Указываем поле которое нужно сделать не активным
  10.       screen-input = 0.
  11.     ENDIF.
  12.     MODIFY SCREEN.
  13.   ENDLOOP.