十二、ALV报表

1. 选择屏幕

（1）PARAMETERS对象及其属性

PARAMETERS: p_id like dbtab-id,

            　　       p_checkbox AS CHECKBOX DEFAULT ‘X’,

                          p_radio RADIOBUTTON GROUP g1 DEFAULT ‘X’,

                     　 p_radio RADIOBUTTON GROUP g1,

                    　  p_radio RADIOBUTTON GROUP g1.

语法	说明
DEFAULT ‘A’	初始值
LENGTH N	定义长度，只适用于C、N、X、P类型
DECIMALS des	指定小数点位数
MEMORY ID pid	指定SAP内存参数ID
MATCHCODE OBJECT mobj	设定使用的Search Help
MODIF ID	通过SCREEN-GROUP1为屏幕元素分组
NO-DISPLAY	不显示在画面上
LOWER CASE	区分大小写（默认大写）

（2）SELECT-OPTIONS对象及其属性

SELECT-OPTIONS: so_id FOR itab-id DEFAULT 1,

                       so_age FOR itab-age OBLIGATORY NO INTERVALS NO-EXTENSION.

语法	说明
DEFAULT ‘A’	初始值
DEFAULT g… OPTION op… SIGN s	初始的option和sign
DEFAULT g TO h	初始的low值和high值，SIGN为‘BT’
DEFAULT ID pid	指定SAP内存参数ID
MATCHCODE OBJECT mobj	设定使用的Search Help
OBLIGATORY	必输项
VISIBLE LENGTH vlen	显示长度
NO-EXTENSION	隐藏多指输入按钮
NO INTERVALS	隐藏high输入部分

（3）空行

SELECTION-SCREEN SKIP 2.

（4）分割线

SELECTION-SCREEN ULINE /1(30)

（5）屏幕框架

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE t-001.

……

SELECTION-SCREEN END OF BLOCK b1.

1. 事件流

事件流	说明
INITIALZATION	在屏幕未显示前初始化
AT SELECTION-SCREEN OUTPUT	用于对屏幕输入值的校验
AT SELECTION-SCREEN ON …	屏幕输入遇错处理，检查某个具体的输入值
	AT SELECTION-SCREEN ON VALUE REQUEST FOR { para|selcrit-low|selcrit-high } (F4) 用于实现屏幕输入域的自定义F4搜索帮助
	AT SELECTION-SCREEN ON HELP REQUEST FOR { para|selcrit-low|selcrit-high } (F1) 用于实现屏幕输入域的自定义F1帮助
	AT SELECTION-SCREEN ON { para|selcrit } 指定输入域输入值时触发
	AT SELECTION-SCREEN ON BLOCK (block) 用于管控框架中的屏幕输入值
	AT SELECTION-SCREEN ON RADIOBUTTON GROUP (radi) 用于管控单选框按钮组输入值
	AT SELECTION-SCREEN ON END OF （selcrit） 用于SELECT-OPTIONS对象，在输入域进行多行数据输入时触发
AT SELECTION-SCREEN	用于屏幕输入检查
START-OF-SELECTION	在执行程序时触发
END-OF-SELECTION	在START-OF-SELECTION执行后，输出屏幕还未显示前触发
GET…	从逻辑数据库中得到数据
TOP-OF-PAGE	设计输出单的页头
END-OF-PAGE	设计输出单的页脚
AT USER COMMAND
AT LINE SELECTION

（1）报表事件的终止命令

①    STOP.

结束当前事件，直接转向END-OF-SELECTION（只能用于AT SELECTION-SCREEN/START-OF-SELECTION/GET事件）

②    EXIT.

离开过程块，直接转向列表输出屏幕，不执行END-OF-SELECTION

③    RETURN.

离开过程块，直接转向列表输出屏幕，不执行END-OF-SELECTION

④    CHECK <condition>.

当条件为假时，离开当前事件，并转向下一个事件

 

2.ALV

（1）ALV通过函数方式实现

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'
    EXPORTING
      i_callback_program       = gv_repid
      it_fieldcat_lvc          = gt_fieldcat[]
      is_layout_lvc            = gs_layout
      i_callback_pf_status_set = 'FRM_SET_PF_STATUS'
      i_callback_user_command  = 'FRM_USER_COMMAND'
      i_save                   = 'A'
    TABLES
      t_outtab                 = gt_so
    EXCEPTIONS
      program_error            = 1
      OTHERS                   = 2.

（2）设置显示列

常用属性字段（LVC_S_FCAT）

gs_fieldcat-fieldname         = &1.

gs_fieldcat-coltext           =

gs_fieldcat-coltext_l            =

gs_fieldcat-coltext_m          =

gs_fieldcat-coltext_s           =

gs_fieldcat-reptext              = &2.

gs_fieldcat-key                   = &3.

gs_fieldcat-checkbox          = &4.

gs_fieldcat-edit                  = &5.

gs_fieldcat-hotspot            = &6.

gs_fieldcat-ref_table           = &7.

gs_fieldcat-ref_field            = &8.

gs_fieldcat-qfieldname       =’REDDI’.

gs_fieldcat-no_zero            = ‘X’.

APPEND gs_fieldcat TO gt_fieldcat.

在REUSE_ALV_GRID_DISPLAY_LVC函数中添加it_fieldcat_lvc = gt_fieldcat[]

字段	说明
FIELDNAME	字段名称
SXRTEXT_L/M/S	列标题描述
KEY	是否关键字，设置’X’，位置固定
CHECKBOX	是否显示复选框
EDIT	是否可编辑
HOSTSPOT	鼠标是否出现手型光标标识
REF_TABLE/REF_FIELD	字段参考数据库表和字段
DO_SUM	是否显示总计值
ICON	是否显示为图标

（3）设置布局

常用属性字段（LVC_S_LAYO）

gs_layout-cwidth_opt = abap_true.

gs_layout-zebra     = abap_true.

gs_layout-box_fname = ‘LILI’

在REUSE_ALV_GRID_DISPLAY_LVC函数中添加is_layout_lvc = gs_layout

字段	说明
ZEBRA	ALV是否深浅颜色间隔显示
SMALLTITLE	ALV小标题
CWIDTH_OPT	列宽是否按照该列最长显示字段自动调整宽度
NO_ROWMARK	左侧选择按钮是否显示
BOX_FNAME	左侧选择按钮选中后对应的字段
EDIT	ALV单元格是否可编辑
STYLEFNAME	指定颜色
NO_TOOLBAR	工具栏不显示
NO_TOTLINE	设置不输出总计行

（4）设置排序参数

常用属性字段（LVC_S_SORT）

gs_sort-spos = 1.

gs_sort-fieldname = ‘ID’.

gs_sort-down = ‘X’.

gs_sort-subtot = ‘X’.

APPEND gs_sort TO gt_sort.

在REUSE_ALV_GRID_DISPLAY_LVC函数中添加it_sort_lvc = gt_sort

字段	说明
SPOS	指定排序字段的先后顺序
FIELDNAME	排序字段名称
UP	按升序排列输出
DOWN	按降序排序输出
SUBTOT	是否执行并输出小计，此设置必须与列属性的DO_SUM一同使用

（5）设置自定义工具栏

FORM frm_pf_status_prt USING u_extab TYPE slis_t_extab ##CALLED.
  SET PF-STATUS 'PF_STATUS_PRT' EXCLUDING u_extab.
ENDFORM.

在REUSE_ALV_GRID_DISPLAY_LVC函数中添加i_callback_pf_status_set = ‘FRM_SET_PF_STATUS’

（6）用户命令和响应

 

FORM frm_user_command USING uv_ucomm LIKE sy-ucomm
                            us_selfield TYPE slis_selfield.
  CASE uv_ucomm.
    WHEN 'ALL'. 
      PERFORM frm_sel_all.
    WHEN 'SAVE'. 
      PERFORM frm_save_all.

  ENDCASE.

ENDFORM.

在REUSE_ALV_GRID_DISPLAY_LVC函数中添加i_callback_user_command = ‘FRM_USER_COMMAND’

标签：SELECTION,gs,报表,fieldcat,SCREEN,十二,ALV,屏幕
来源： https://www.cnblogs.com/liujiameiblogs/p/15899292.html