為什么要寫這個工具

我在做SAP CRM Fiori的開發時，需要在一個method的眾多repository里一個一個查看尋找我需要的關鍵字，太費時間和眼睛，所以寫了一個report把一個method所有version的source code都download下來，直接用Ctrl+F即可搜索，避免了manual effort。

如何使用

執行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_versionWHERE objname LIKE lv_name ORDER BY versno DESCENDING.LOOP AT lt_version ASSIGNING FIELD-SYMBOL(<version>).CALL FUNCTION 'SVRS_GET_REPS_FROM_OBJECT'EXPORTINGobject_name = <version>-objnameobject_type = 'METH'versno = <version>-versnoTABLESrepos_tab = lt_tableTRDIR_TAB = lt_trdirVSMODISRC = lt_VSMODISRCVSMODILOG = 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.

要獲取更多Jerry的原創文章，請關注公眾號"汪子熙":

總結

以上是生活随笔為你收集整理的自己开发的ABAP代码版本查看工具的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。