ABAP MODIF ID 作用

语法:... MODIF ID modid 

  REPORT  ZTESTMODIFID.

PARAMETERS show_all AS CHECKBOX USER-COMMAND flag. 

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME. 
PARAMETERS: p1 TYPE c LENGTH 10, 
            p2 TYPE c LENGTH 10, 
            p3 TYPE c LENGTH 10. 
SELECTION-SCREEN END OF BLOCK b1. 

SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME. 
PARAMETERS: p4 TYPE c LENGTH 10 MODIF ID bl2, 
            p5 TYPE c LENGTH 10 MODIF ID bl2, 
            p6 TYPE c LENGTH 10 MODIF ID bl2. 
SELECTION-SCREEN END OF BLOCK b2. 

AT SELECTION-SCREEN OUTPUT.    "当show_all值改变时会触发此事件
  LOOP AT SCREEN. 
    IF show_all <> 'X' AND 
       screen-group1 = 'BL2'.  "
       screen-active = '0'.    "设置组内设置屏幕的显示和隐藏
    ENDIF. 
    MODIFY SCREEN.             "把弃置应用到当前屏幕
  ENDLOOP.