自定义输出字段ALV实例

来源：互联网发布：国信弘盛怎么样知乎编辑：程序博客网时间：2024/05/21 10:40

*-----------------Alv处定义字段输出控制----------------------------
*ALV使用到的类库
type-pools:slis.
*一列的描述
Data wa_alv_field type slis_fieldcat_alv.
*列描述内表，列清单。
Data wa_alv_fieldcat type slis_t_fieldcat_alv.
*定义内表
Data wa_spfli like table of SPFLI WITH HEADER LINE.
*内表赋值
select * into table wa_spfli from spfli.
*定义第一个字段
wa_alv_field-COL_POS = 1.
wa_alv_field-fieldname = 'CARRID'.
wa_alv_field-seltext_m = '航班承运人'.
append  wa_alv_field to wa_alv_fieldcat.

wa_alv_field-COL_POS = 2.
wa_alv_field-fieldname = 'CONNID'.
wa_alv_field-seltext_m = '航班连接'.
append  wa_alv_field to wa_alv_fieldcat.

wa_alv_field-COL_POS = 3.
wa_alv_field-fieldname = 'CITYFROM'.
wa_alv_field-seltext_m = '起飞城市'.
append  wa_alv_field to wa_alv_fieldcat.

wa_alv_field-COL_POS = 4.
wa_alv_field-fieldname = 'CITYTO'.
wa_alv_field-seltext_m = '目标城市'.
append  wa_alv_field to wa_alv_fieldcat.

call function 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
  IT_FIELDCAT = wa_alv_fieldcat
TABLES
  T_OUTTAB  =  WA_SPFLI
EXCEPTIONS
  PROGRAM_ERROR = 1
  OTHERS = 2 .
if sy-subrc <> 0.
  message id sy-msgid type sy-msgty number sy-msgno
          with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.