选择屏幕动态显示BLOCK title

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS p_r  RADIOBUTTON GROUP g1 USER-COMMAND select DEFAULT 'X'. "日模式
PARAMETERS p_y  RADIOBUTTON GROUP g1  .                                                               "月模式
SELECTION-SCREEN END OF BLOCK b1.


SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE T1.
SELECT-OPTIONS:
      s_bukrs    FOR    bsid-bukrs  .                 "  公司代码
SELECTION-SCREEN END OF BLOCK b2.AT SELECTION-SCREEN OUTPUT .
 IF p_r IS NOT INITIAL.
    t1 = '日'
  ELSE.
    t1 = '月'
  ENDIF.这样就行了。
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE T1.
这里已经声明了t1这个变量，不需要重新定义