博客
关于我
强烈建议你试试无所不能的chatGPT,快点击我
SAP中自定义输出字段的ALV实例
阅读量:5357 次
发布时间:2019-06-15

本文共 2693 字,大约阅读时间需要 8 分钟。

这是运行的结果。对于我们的数据表我们需要字段可以自定义以ALV的格式输出。

特别注意点:wa_alv_field-fieldname 'EMPID'.这个地方 EMPID一定要大写否则会在运行时报错。

*&---------------------------------------------------------------------*
*& Report  ZTBALV1
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT  ztbalv1.
*ALV使用到的类库
TYPE-POOLS: slis.
*一列描述
DATA wa_alv_field TYPE slis_fieldcat_alv.
*描述内表,列清单
DATA wa_alv_fieldcat TYPE slis_t_fieldcat_alv.
*定义内表 , 赋值
DATA wa_emp LIKE TABLE OF ztbemp WITH HEADER LINE.
SELECT * INTO TABLE wa_emp FROM ztbemp.
wa_alv_field-col_pos 1."*定义对应字段
wa_alv_field-fieldname 'EMPID'.
wa_alv_field-seltext_m '员工号'.
APPEND wa_alv_field TO wa_alv_fieldcat.
wa_alv_field-col_pos 2."*定义对应字段
wa_alv_field-fieldname 'EMPNAME'.
wa_alv_field-seltext_m '员工姓名'.
APPEND wa_alv_field TO wa_alv_fieldcat.
 wa_alv_field-col_pos 3."*定义对应字段
 wa_alv_field-fieldname 'AGE'.
 wa_alv_field-seltext_m '员工年龄'.
 APPEND wa_alv_field to wa_alv_fieldcat.
  wa_alv_field-col_pos 4."*定义对应字段
 wa_alv_field-fieldname 'EMAIL'.
 wa_alv_field-seltext_m '员工邮箱'.
 APPEND wa_alv_field to wa_alv_fieldcat.
  wa_alv_field-col_pos 5."*定义对应字段
 wa_alv_field-fieldname 'TEL'.
 wa_alv_field-seltext_m '员工电话'.
 APPEND wa_alv_field to wa_alv_fieldcat.
   wa_alv_field-col_pos 6."*定义对应字段
 wa_alv_field-fieldname 'ADDR'.
 wa_alv_field-seltext_m '员工地址'.
 APPEND wa_alv_field to wa_alv_fieldcat.
  wa_alv_field-col_pos 7."*定义对应字段
 wa_alv_field-fieldname 'GRAD'.
 wa_alv_field-seltext_m '员工标志'.
 APPEND wa_alv_field to wa_alv_fieldcat.
   wa_alv_field-col_pos 8."*定义对应字段
 wa_alv_field-fieldname 'UNAME'.
 wa_alv_field-seltext_m '员工登陆名'.
 APPEND wa_alv_field to wa_alv_fieldcat.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
 EXPORTING
*     I_INTERFACE_CHECK              = ' '
*     I_BYPASSING_BUFFER             =
*     I_BUFFER_ACTIVE                = ' '
*     I_CALLBACK_PROGRAM             = ' '
*     I_CALLBACK_PF_STATUS_SET       = ' '
*     I_CALLBACK_USER_COMMAND        = ' '
*     I_STRUCTURE_NAME               =
*     IS_LAYOUT                      =
       it_fieldcat                    =  wa_alv_fieldcat
*     IT_EXCLUDING                   =
*     IT_SPECIAL_GROUPS              =
*     IT_SORT                        =
*     IT_FILTER                      =
*     IS_SEL_HIDE                    =
*     I_DEFAULT                      = 'X'
*     I_SAVE                         = ' '
*     IS_VARIANT                     =
*     IT_EVENTS                      =
*     IT_EVENT_EXIT                  =
*     IS_PRINT                       =
*     IS_REPREP_ID                   =
*     I_SCREEN_START_COLUMN          = 0
*     I_SCREEN_START_LINE            = 0
*     I_SCREEN_END_COLUMN            = 0
*     I_SCREEN_END_LINE              = 0
*     IR_SALV_LIST_ADAPTER           =
*     IT_EXCEPT_QINFO                =
*     I_SUPPRESS_EMPTY_DATA          = ABAP_FALSE
*   IMPORTING
*     E_EXIT_CAUSED_BY_CALLER        =
*     ES_EXIT_CAUSED_BY_USER         =
  TABLES
    t_outtab                       =  wa_emp
* 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.

运行

转载于:https://www.cnblogs.com/tb176/p/3896026.html

你可能感兴趣的文章
python之sys模块详解
查看>>
如何通俗的理解张量
查看>>
mfc 动态创建EDIT控件
查看>>
关于tree节点的刷新
查看>>
面试心得
查看>>
win7网络发现不能启用,无法共享其他机器的解决办法
查看>>
iOS多线程--彻底学会多线程之『GCD』
查看>>
Gunicorn快速入门
查看>>
Docker for Windows 和虚拟机VMWare共存方案
查看>>
入门学习Linux常用必会命令实例详解
查看>>
035--MySQL基本操作
查看>>
并行排序
查看>>
正则提取参数关联
查看>>
oracle 怎样建自增长字段
查看>>
stl中string作为成员变量引起的core问题
查看>>
java用while循环设计轮询线程的性能问题
查看>>
unity3D OnTriggerEnter和OnCollisionEnter的区别
查看>>
[CF1082E] Increasing Frequency
查看>>
杭电1030
查看>>
Vcenter server 5.5上传ISO镜像
查看>>