REPORT zabapgit_test_ssl.
PARAMETERS:
listbox AS LISTBOX VISIBLE LENGTH 10 OBLIGATORY USER-COMMAND zzz,
listbox1 AS LISTBOX VISIBLE LENGTH 10.
"AT SELECTION-SCREEN OUTPUT.
"AT SELECTION-SCREEN.
INITIALIZATION.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR listbox.
DATA:
name TYPE vrm_id,
list TYPE vrm_values,
"list1 TYPE vrm_values,
value TYPE vrm_value.
CLEAR: list.
name = 'LISTBOX'. " Name should be in UPPER CASE
value-key = '1'.
value-text = 'Text 1'.
APPEND value TO list.
value-key = '2'.
value-text = 'Text 2'.
APPEND value TO list.
CALL FUNCTION 'VRM_SET_VALUES'
EXPORTING
id = name
values = list
EXCEPTIONS
id_illegal_name = 0
OTHERS = 0.
CLEAR listbox1.
AT SELECTION-SCREEN .
DATA:
name TYPE vrm_id,
"list TYPE vrm_values,
list1 TYPE vrm_values,
value TYPE vrm_value.
CLEAR list1.
clear listbox1.
name = 'LISTBOX1'. " Name should be in UPPER CASE
IF listbox = '1'.
value-key = '1'.
value-text = 'Text 10'.
APPEND value TO list1.
ELSE.
value-key = '2'.
value-text = 'Text 20'.
APPEND value TO list1.
ENDIF.
CALL FUNCTION 'VRM_SET_VALUES'
EXPORTING
id = name
values = list1
EXCEPTIONS
id_illegal_name = 0
OTHERS = 0.
ListBox联动
©著作权归作者所有,转载或内容合作请联系作者
- 文/潘晓璐 我一进店门，熙熙楼的掌柜王于贵愁眉苦脸地迎上来，“玉大人，你说我怎么就摊上这事。” “怎么了？”我有些...
- 文/花漫 我一把揭开白布。 她就那样静静地躺着，像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上，一...
- 文/苍兰香墨 我猛地睁开眼，长吁一口气：“原来是场噩梦啊……” “哼！你这毒妇竟也来了？” 一声冷哼从身侧响起，我...
推荐阅读更多精彩内容
- 为建立中文知识库加块砖——中科大胡不归 0. 问题描述 作为wpf的初学者，最近处理MVVM下动态增加和修改Lis...
- 1.创建 2.多选 可以按住Shift或者Control 3.鼠标移动选中 默认就是这种情况 4.鼠标移动不选中 ...
- 前言 之前用 Objective-C 写了一篇联动的 demo 和文章，后来有小伙伴私信我有没有 Swfit 语言...
- 需求：后台管理系统中店铺信息修改及新增店铺信息中要用到地址三级联动，在vue中没找到合适的案例，在elementU...
- 前言 现在市面上有很多 app 都有联动功能，有的是两个 TableView 之间的联动，比如美团外卖，百度外卖，...
