SAP中ABAP中根据前台事务代码TCODE查找增强(源代码)
一:效果图
二:源代码:
*&---------------------------------------------------------------------*
*& Report ZZQ001
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT zzq001.
"定义使用的内表
TABLES : tstc,tadir,modsapt,modact,trdir,tfdir,enlfdir, sxs_attrt ,tstct.
DATA : v_devclass LIKE tadir-devclass.
DATA : jtab LIKE tadir OCCURS 0 WITH HEADER LINE.
"定义需要使用的类型池
TYPE-POOLS:slis,truxs.
"引入Alv常用的变量、
DATA: gwa_field TYPE slis_fieldcat_alv." 相当于工作区
DATA: git_field LIKE TABLE OF gwa_field.
DATA: gwa_layout TYPE slis_layout_alv.
DATA: gd_repid TYPE sy-repid.
DATA: lit_sort TYPE slis_t_sortinfo_alv.
DATA: lwa_sort TYPE slis_sortinfo_alv,
gc_grid_title(50) TYPE c .
"定义要显示的结构及内表
DATA: BEGIN OF it_display OCCURS 0.
DATA: system(50) TYPE c,"系统
type(5) TYPE c,"类型
name(20) TYPE c,"名称