Jerry has written this tool for support colleague in Zeiss to enable them to conveniently check a given OData Model cache status at any time.

How to use

執行report，輸入OData model name和metadata 實現class name：

執行report，可在debuger里查看該model的所有cache數據(如果cache確實存在）:

并打印model class 最后修改的時間戳：

源代碼分享給大家：

REPORT tool_gateway_model_cache_view.PARAMETERS: cls TYPE seoclsname OBLIGATORY DEFAULT 'CL_CRM_OPPORTUNITY_MPC_EXT',name TYPE /iwbep/med_mdl_technical_name OBLIGATORY DEFAULT 'CRM_OPPORTUNITY'.DATA: ls_data TYPE /iwbep/if_mgw_med_odata_types=>ty_s_med_model,lv_found TYPE abap_bool,lv_lastchange TYPE timestamp,lv_timezone TYPE tzonref-tzone,lv_include_name TYPE program,lv_sdate TYPE rdir_sdate, " Standard selection screen generation: Datelv_stime TYPE rdir_stime.CALL FUNCTION 'GET_SYSTEM_TIMEZONE'IMPORTINGtimezone = lv_timezoneEXCEPTIONSOTHERS = 0. " initial lv_timezone means UTC in CONVERT ...lv_include_name = cl_oo_classname_service=>get_classpool_name( clsname = cls ). "Is enough for last_modified SELECT SINGLE sdate stimeFROM reposrcINTO (lv_sdate, lv_stime)WHERE progname = lv_include_nameAND r3state = 'A'.* Create timestampCONVERT DATE lv_sdate TIME lv_stime INTO TIME STAMP lv_lastchange TIME ZONE lv_timezone.CALL METHOD /iwbep/cl_mgw_med_utils=>get_cached_modelEXPORTINGiv_last_modified = lv_lastchangeiv_version = '0001'iv_technical_name = nameIMPORTINGes_model_data = ls_dataev_found = lv_found.WRITE: / 'Cache found? : ' , lv_found COLOR COL_NEGATIVE, ' name: ' , ls_data-header-ext_model_tname COLOR COL_GROUP,' last changed' , ls_data-header-changed_timestmp COLOR COL_POSITIVE.

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

總結

以上是生活随笔為你收集整理的后台OData model data查看工具的全部內容，希望文章能夠幫你解決所遇到的問題。

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