【转载】各种屏幕元素显示

转载资料推荐：
1、ALV报表——选择屏幕选项卡
————————
https://www.cnblogs.com/StephenAmell/p/11401575.html

2、SAP选择屏幕开发（一）
————————
https://blog.csdn.net/wtxhai/article/details/90632686

---

转载：https://www.cnblogs.com/jiangzhengjun/p/7264657.html#_Toc410467014

1、SELECTION-SCREEN格式化屏幕、激活预设按钮：

2、各种屏幕元素演示

效果显示：

按钮、单选复选框、下拉框的FunCode
2.1 选择屏幕中的按钮

效果显示：

2.2 选择屏幕中的单选/复选按钮：点击显示、隐藏其他屏幕元素

效果显示：

---

&---------------------------------------------------------------------
*&选择屏幕事件
&---------------------------------------------------------------------
FORM gt_check .
LOOP AT SCREEN.
"显示
IF p_auart = ‘01’ OR p_auart = ‘02’ AND SCREEN-group1 = ‘BL1’.
SCREEN-active = ‘1’.
MODIFY SCREEN.
ELSEIF SCREEN-group1 = ‘BL1’.
"隐藏
SCREEN-active = ‘0’.
MODIFY SCREEN.
ENDIF.

"显示
IF p_auart = ‘03’ OR p_auart = ‘04’ AND SCREEN-group1 = ‘BL2’.
SCREEN-active = ‘1’.
MODIFY SCREEN.
ELSEIF SCREEN-group1 = ‘BL2’.
"隐藏
SCREEN-active = ‘0’.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
ENDFORM.

---

2.3 选择屏幕中下拉列表：AS LISTBOX

效果显示：

3、 屏幕流逻辑
PROCESS BEFORE OUTPUT. 屏幕输入前处理
PROCESS AFTER INPUT. 处理后输入
PROCESS ON HELP-REQUEST. 在求助请求过程
PROCESS ON VALUE-REQUEST. 过程VALUE-REQUEST

资料转载：https://www.cnblogs.com/foxting/archive/2012/06/12/2545875.html

PARAMETERS:MATNRR LIKE MARA-MATNR. "文本域
PARAMETERS:TYPE AS CHECKBOX. "多选框
PARAMETERS:P1 RADIOBUTTON GROUP GRP1,"单选域
P2 RADIOBUTTON GROUP GRP1 DEFAULT ‘X’, "默认选中 ”X“
P3 RADIOBUTTON GROUP GRP1.

2.PARAMETERS常用的扩展语法
…DEFAULT f:定义默认值。
…TYPE type:参照某一类型对象定义PARAMETERS。
…DECIMALS dec：定义小数位，对输入参数自动格式化，该语法只对P类型有效(参数某一类型定义关键字TYPE)。
…LIKE g：參照某一字典对象定义PARAMETERS。
…MEMORY ID pi：将PARAMETERS存储在SAP内存，参数名长度不能超过三位。
…NO-DISPLAY：将PARAMETERS设置为隐藏，不会的屏幕上输出。
…LOWER CASE：输入值中不允许输入小写字符，否则会自动转换为大写。
…OBLIGATORY：限制该PARAMETERS为必填，否则会提示输入。
…AS CHECKBOX：创建CHECKBOX对象。
…RADIO BUTTON GROUP radi：创建（RADIO）单选框。
…VISIBLE LENGTH vlen：定义显示长度。
…USER-COMMAND ucom：为创建对象分配对象名，该值保存在内表中可供其它对象操作。
…AS LISTBOX VISIBLE LENGTH vlen：创建一个下拉框，并指定长度。
以下示例展示如何对下拉框填充数据。
[For Example]

*定义一个下拉框对象，其可视数据长度一般比输出数据长度大2用于放置下拉图标
PARAMETERS:P_LANG(20) AS LISTBOX VISIBLE LENGTH 22.
*该变量用于记录下拉列表数值是否初始化，否则每次屏幕初始化都会重新加载重复数据
DATA:INIT.

---

初始化填充在range table表里：
效果图：

TABLES : vbak , vbep , vbap.

DEFINE apd_cls.
  APPEND &1 TO &2. CLEAR &1.
END-OF-DEFINITION.

SELECTION-SCREEN BEGIN OF BLOCK bk0.

  SELECT-OPTIONS :
  s_auart FOR vbak-auart,
   s_abgru FOR vbap-abgru NO INTERVALS.
SELECTION-SCREEN END OF BLOCK bk0.

INITIALIZATION.

DATA : ls_auart LIKE LINE OF s_auart,
      ls_abgru LIKE LINE OF s_abgru.

ls_auart = 'ICPZ*0'.
apd_cls ls_auart s_auart.
ls_auart = 'ICPZ*1'.
apd_cls ls_auart s_auart.
ls_auart = 'ICPZ*2'.
apd_cls ls_auart s_auart.
ls_auart = 'ICPZ*6'.
apd_cls ls_auart s_auart.
ls_auart = 'ICPZ*7'.
apd_cls ls_auart s_auart.
ls_auart = 'ICPZ*B'.      "Add By Joey Start 20200312
apd_cls ls_auart s_auart.
ls_auart = 'ICPZ*C'.
apd_cls ls_auart s_auart.
ls_auart = 'ICPZ*D'.
apd_cls ls_auart s_auart.
ls_auart = 'ICPZ*E'.
apd_cls ls_auart s_auart. "Add By Joey End  20200312
ls_abgru = 'IEQZ1'.
apd_cls ls_abgru s_abgru.
ls_abgru = 'IEQZ2'.
apd_cls ls_abgru s_abgru.