SCREEN 設計
阿新 • • 發佈：2018-05-05
area 事件 高亮 com 設置 select 不可見 AS man
TABLES: SSCRFIELDS. PARAMETERS: P_EBLEN LIKE VBRK-EBLEN DEFAULT * *. PARAMETERS: P_CK1 AS CHECKBOX DEFAULT *X*. PARAMETERS: P_CK2 AS CHECKBOX. PARAMETERS: P_RAD1 RADIOBUTTON GROUP SG1 DEFAULT *X*. PARAMETERS: P_RAD2 RADIOBUTTON GROUP SG1 . SELECT-OPTIONS: S_EBLEN FOR VBRK-EBLEN NO-EXTENSTION. “無後邊的箭頭SELECT-OPTIONS: S_EBLEN FOR VBRK-EBLEN NO INTERVALS. ”無到後邊的選項 SELECTION-SCREEN SKIP 1. "產生空行 SELECTION-SCREEN BEGIN OF LINE . "將元素排列到一行 SELECTION-SCREEN END OF LINE. SELECTION-SCREEN ULINE. "畫直線 SELECTION-SCREEN COMMENT 10(20) TEXT-001."屏幕上輸出文本 SELECTION-SCREEN BEGIN OF BLOCK BK1 WITH FRAME TITLE TEXT-002. SELECTION-SCREEN END OF BLOCK BK1. SELECTION-SCREEN PUSHBUTTON 50(10) TEXT-003 USER-COMMAND BUT1. "產生按鈕 SELECTION-SCREEN FUNCTION KEY 1. "工具條按鈕 最多為5個. PARAMETERS: <P> .... MEMORY ID <PID>. "從全局SAP內存(SPA/GPA參數)使用缺省值 SET PARAMETERS ID *HK* FIELD *Test Parameters* "以*HK*為名稱在全局SAP內存中存儲值. PARAMETERS: P_TEST(16) TYPE C MEMORY ID HK. "使用缺省值 GET PARAMETERS ID * * FIELD * *. INITIALIZATION. SSCRFIELDS-FUNCTXT_01 = *Button 1*. SSCRFIELDS-UCOMM = *FC01*. (2).修改SCREEN NAME “字段名稱 GROUP1 ”字段組1 GROUP2 “字段組2 GROUP3 ”字段組3 GROUP4 “字段組4 ACTIVE ”可見並準備輸入的字段 REQUIRED “強制輸入的字段 INPUT ”字段準備輸入 OUTPUT ”字段僅用來顯示 INTENSIFIED ”高亮顯示字段 INVISIBLE “字段不可見 LENGTH “設置字段長度 DISPLAY_3D “以3圍框架顯示字段 VALUE_HELP ”顯示有值幫助的字段 在PBO模塊中對字段進行屬性修改 MODULE MODIFY_SCREEN OUTPUT. LOOP AT SCREEN. CHECK SCREEN-GROUP1 = *MOD*. SCREEN-INPUT = 0. MODIFY SCREEN. ENDLOOP. ENDMODULE. (3) 使用子屏幕 CALL SUBSCREEN <AREA> INCLUDING <PROGRAM> <SCREEN> (4)設置光標位置 SET CURSOR FIELD <FIELD_NAME> OFFSEY <POSITION> 設置光標的特定位置 (5)設置下一個屏幕 SET SCREEN <SCREEN_NUMBER>. CALL SCREEN <SCREEN_NUMBER>.調用新的屏幕序列 LEAVE TO SCREEN 0. SET SCREEN 0. LEAVE SCREEN. (6)後臺處理屏幕 可以使用SUPPRESS DIALOG 取消所有屏幕. *---------PBO MODULE OF SCREEN 100. CALL SCREEN 110 STARTING AT 10 5. *---------SCREEN 110 FLOW LOGIC MODULE DIALOG_WINDOWS OUTPUT. SUPPRESS DIALOG. LEAVE TO LIST-PROCESSING AND RETURN TO SCREEN 0. WRITE: /. WRITE: /. ENDMODULE. (7)報表及選擇屏幕事件過程 報表事件過程 INITIALIZATION 用於屏幕初始化，例如屏幕字段默認值的填充 START-OF-SELECTION END-OF-SELECTION 選擇屏幕事件 在INITIALIZATION之前 STATR-OF-SELECTION之後觸發 AT SELECTION-SCREEN OUTPUT."對選擇屏幕字段進行修改 處理特殊輸入字段 AT SELECTION-SCREEN ON <FIELD> 創建值輸入列表 AT SELECTION-SCREEN ON VALUE-REQUEST FOR <FIELD>. 創建輸入字段的幫助 AT SELECTION-SCREEN ON HELP-REQUEST FOE <FIELD>. 處理單選按鈕組 AT SELECTION-SCREEN ON RADIOBUTTON GROUP <RADIO> 處理輸入字段塊 AT SELECTION-SCREEN ON BLOCK <BK1>.
SCREEN 設計