在sap的應用中，我們有時會需要設計折疊樣式的屏幕(類似ＭＩＧＯ的屏幕)，以緩解屏幕區域的太小的矛盾。折疊樣式屏幕實現的基本原理是用子屏幕根據用戶的輸入調用不同的子屏幕來實現的。現在以放置兩個子屏幕的折疊式的屏幕來說明實現的步驟。為了實現兩個子屏幕的折疊式的屏幕需要設計７個屏幕（一個主屏幕，兩個信息屏幕，一個全展示子屏幕，一個下半部展示子屏幕，一個上半部展示子屏幕，一個下全關閉子屏幕）。具體步驟如下：

Step 1:設計一個主屏幕，放置一個”子屏幕范圍”

屏幕的邏輯流為：

PROCESS BEFORE OUTPUT.

CALL SUBSCREEN sa_2200_1 INCLUDING sy-repid '2220'.

*

PROCESS AFTER INPUT.

MODULE USER_COMMAND_0100.

CALL SUBSCREEN sa_2200_1.

?

MODULE USER_COMMAND_0100 INPUT.

? DATA lv_return_code TYPE i.

?

? CLEAR save_ok.

? save_ok = ok_code.

? CLEAR ok_code.

? CLEAR gv_processed.

? CALL METHOD cl_gui_cfw=>dispatch

??? IMPORTING

????? return_code = lv_return_code.

? CHECK lv_return_code = cl_gui_cfw=>rc_noevent.

? CASE save_ok.

??? WHEN 'PB_2220_1' OR 'PB_2220_2' OR 'PB_2240_1' OR 'PB_2240_2' OR

???????? 'PB_2260_1' OR 'PB_2260_2' OR 'PB_2280_1' OR 'PB_2280_2'.

????? PERFORM set_the_col_area_screen.

??? WHEN others.

*???? action code from the menus will be processed here.

????? PERFORM get_screen_number USING save_ok.

? ENDCASE.

ENDMODULE.???????????????? " USER_COMMAND_0100? INPUT

?

*&---------------------------------------------------------------------*

*&????? Form? set_the_col_area_screen

*&---------------------------------------------------------------------*

*?????? This subroutine is used to set the subscreen for the collapsible

*?????? areas

*----------------------------------------------------------------------*

FORM set_the_col_area_screen .

? CASE save_ok.

??? WHEN 'PB_2220_1' OR 'PB_2260_2'. "打開下半部展開的子屏幕

????? gv_subscreen_2200_1? =? 2280.

??? WHEN 'PB_2220_2' OR 'PB_2260_1'. "打開上半部展開的子屏幕

????? gv_subscreen_2200_1? =? 2240.

??? WHEN 'PB_2240_1' OR 'PB_2280_2'. "打開全關閉的子屏幕

????? gv_subscreen_2200_1? =? 2260.

??? WHEN 'PB_2280_1' OR? 'PB_2240_2'. "打開全打開的子屏幕

????? gv_subscreen_2200_1? =? 2220.

? ENDCASE.

ENDFORM.??????????????????? " set_the_col_area_screen

?

?

Step 2: 最底層的兩個信息子屏幕

屏幕(2290)

邏輯流

PROCESS BEFORE OUTPUT.

*

PROCESS AFTER INPUT.

?

屏幕(2230)

邏輯流

PROCESS BEFORE OUTPUT.

*

PROCESS AFTER INPUT.

?

Step 3: 定義全展示子屏幕 (2220)

第一個按鈕的功能碼：PB_2220_1

第一個按鈕的功能碼：PB_2220_2

屏幕邏輯流

PROCESS BEFORE OUTPUT.

CALL SUBSCREEN SA_2220_1 including sy-repid '2290'.

CALL SUBSCREEN SA_2220_2 including sy-repid '2300'.

*

PROCESS AFTER INPUT.

CALL SUBSCREEN SA_2220_1.

CALL SUBSCREEN SA_2220_2.

?

Step 4:定義上半部展開的子屏幕(2240)

第一個按鈕的功能碼：PB_2240_1

第一個按鈕的功能碼：PB_2240_2

屏幕邏輯流

PROCESS BEFORE OUTPUT.

CALL SUBSCREEN SA_2240_1 including sy-repid '2290'.

*

PROCESS AFTER INPUT.

CALL SUBSCREEN SA_2240_1.

?

Step 5:定義下半部展開的子屏幕(2280)

第一個按鈕的功能碼：PB_2280_1

第一個按鈕的功能碼：PB_2280_2

屏幕邏輯流

PROCESS BEFORE OUTPUT.

CALL SUBSCREEN SA_2280_2 including sy-repid '2300'.

*

PROCESS AFTER INPUT.

CALL SUBSCREEN SA_2280_2.

?

Step 6:定義全關閉的子屏幕(2260)

第一個按鈕的功能碼：PB_2260_1

第一個按鈕的功能碼：PB_2260_2

屏幕邏輯流

PROCESS BEFORE OUTPUT.

*

PROCESS AFTER INPUT.

總結

以上是生活随笔為你收集整理的如何设计折叠样式的屏幕(类似ＭＩＧＯ的屏幕)的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。