2024年4月28日发(作者：)

(1).Screen 设计

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:

.... MEMORY ID . "从全局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'.