如何使用
执行report，输入要查看version 信息的ABAP class name和method name:
执行后输出结果：
download到本地后即可使用各种文本处理工具进行所需的查询：
source code
REPORT ZTEST_CAG_CAT.
PARAMETERS: cname TYPE SEOCOMPO-clsname OBLIGATORY DEFAULT 'CL_CRM_OPPORTUNITY_MPC_EXT',
mname TYPE seocompo-cmpname OBLIGATORY DEFAULT 'DEFINE_OPPORTUNITY'.
data: lv_name TYPE vrsd-objname,
lt_version TYPE STANDARD TABLE OF vrsd,
lt_table TYPE STANDARD TABLE OF ABAPTXT255,
lt_trdir TYPE STANDARD TABLE OF TRDIR,
lt_VSMODISRC TYPE STANDARD TABLE OF SMODISRC,
lt_VSMODILOG TYPE STANDARD TABLE OF SMODILOG.
lv_name = cname && '%' && mname.
SELECT objname versno datum zeit FROM vrsd INTO CORRESPONDING FIELDS OF TABLE lt_version
WHERE objname LIKE lv_name ORDER BY versno DESCENDING.
LOOP AT lt_version ASSIGNING FIELD-SYMBOL(<version>).
CALL FUNCTION 'SVRS_GET_REPS_FROM_OBJECT'
EXPORTING
object_name = <version>-objname
object_type = 'METH'
versno = <version>-versno
TABLES
repos_tab = lt_table
TRDIR_TAB = lt_trdir
VSMODISRC = lt_VSMODISRC
VSMODILOG = lt_VSMODILOG.
ASSERT sy-subrc = 0.
WRITE: / 'version number: ' COLOR COL_GROUP, <version>-versno COLOR COL_NEGATIVE,
'Date: ' COLOR COL_KEY, <version>-datum COLOR COL_HEADING, ' time: ' COLOR COL_POSITIVE, <version>-zeit COLOR COL_NORMAL.
LOOP AT lt_table ASSIGNING FIELD-SYMBOL(<line>).
WRITE: / <line>-line.
ENDLOOP.
ENDLOOP.