ABAP中CHECKBOX 和LISTBOX的使用(屏幕字段的控制)1

*&---------------------------------------------------------------------*
*& Report  ZDIALOGTEST
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  zdialogtest.

TYPE-POOLS: vrm.  "存放combobox内容的type pool
DATA: name  TYPE vrm_id,  "list box的名称
list  TYPE vrm_values,  "list box的值
value  LIKE  LINE  OF list. "list box的结构
*定义checkbox，指定command，为了能够响应选择屏幕中值的改变
PARAMETERS: p_cb1  TYPE  c  AS  CHECKBOX  DEFAULT  'X'  USER-COMMAND check,
p_cb2  TYPE  c  AS  CHECKBOX  DEFAULT  'X'  USER-COMMAND check.
*定义listbox，必须指定visible length
PARAMETERS: p_list1(10)  TYPE  c  AS LISTBOX
VISIBLE LENGTH  15 ,
p_list2(20)  TYPE  c  AS LISTBOX
VISIBLE LENGTH  25 .
*开始执行
AT