选择屏幕上做按钮

REPORT  MYSAP_FI04 .


TABLES sscrfields .

SELECTION-SCREEN  BEGIN  OF  BLOCK scr1  WITH  FRAME  TITLE  text - 001 .
PARAMETERS : p_path  TYPE rlgrap -filename
                         DEFAULT    'c:\upload.txt' OBLIGATORY .
SELECTION-SCREEN  END  OF  BLOCK scr1 .

SELECTION-SCREEN :  FUNCTION  KEY  1 .
SELECTION-SCREEN :  FUNCTION  KEY  2 .

INITIALIZATION .
  sscrfields -functxt_02  =  '下载上传格式' .
  sscrfields -functxt_01  =  'TEXT' .

AT  SELECTION-SCREEN .
   CASE sscrfields -ucomm .
     WHEN  'FC01' .
       WRITE  'FC01' .
     WHEN  'FC02' .
       WRITE  'FC02' .
   ENDCASE .