*&---------------------------------------------------------------------* *& Report ZLJ_TEST01 *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT zlj_test01. TABLES : mara. *SELECTION-SCREEN BEGIN OF BLOCK BK1 表示加块 SELECTION-SCREEN BEGIN OF BLOCK bk1 WITH FRAME TITLE TEXT-t01."WITH FRAME 显示框架 , "TITLE TEXT-T0 设置文本 如‘基本信息’ PARAMETERS p_school TYPE mara-matnr DEFAULT '1'. "OBLIGATORY."OBLIGATORY 必输项 SELECT-OPTIONS s_school FOR mara-matnr NO INTERVALS NO-EXTENSION ." SELECT-OPTIONS s_name FOR mara-matnr. SELECTION-SCREEN END OF BLOCK bk1. SELECTION-SCREEN BEGIN OF BLOCK bk2 WITH FRAME TITLE TEXT-t04. *单选框竖着写法 PARAMETERS r_male11 RADIOBUTTON GROUP gp1. PARAMETERS r_fema RADIOBUTTON GROUP gp1. PARAMETERS r_fema1 RADIOBUTTON GROUP gp1. **单选框横着写 SELECTION-SCREEN BEGIN OF LINE. PARAMETERS r_male RADIOBUTTON GROUP gp2. SELECTION-SCREEN COMMENT (10) TEXT-t02 FOR FIELD r_male. SELECTION-SCREEN POSITION 40."男女间隔调成40,但不能小于上面的10 PARAMETERS r_female RADIOBUTTON GROUP gp2. SELECTION-SCREEN COMMENT (10) TEXT-t03 FOR FIELD r_female. SELECTION-SCREEN END OF LINE. SELECTION-SCREEN END OF BLOCK bk2. SELECTION-SCREEN SKIP 1."跳行 *复选框用法 PARAMETERS p_check AS CHECKBOX USER-COMMAND hide. "USER-COMMAND HIDE 指明功能代码,表示一个刷新按钮 * 初始化事件 INITIALIZATION . " 变量的初始赋值、清空。。。 * PBO 事件 AT SELECTION-SCREEN OUTPUT. " 元素的属性设置,比如是否可编辑,是否必输,是否显示、、执行完就可以看到选择界面了 * PAI 事件 AT SELECTION-SCREEN. " 回车或者按钮等操作,做界面跳转、数据检查、权限检查。。。 START-OF-SELECTION . " 内表取数、取数逻辑的开始 END-OF-SELECTION. " 取数逻辑结束,输出逻辑的开始
网友评论