Created by Jerry Wang, last modified on Dec 21, 2014

执行report，输入table name：

输出所有使用到comm_product这个ddic object的report name：

spot check：

source code:

PARAMETERS: tab TYPE D010TAB-TABNAME OBLIGATORY DEFAULT 'COMM_PRODUCT'.
 
DATA: lt_prog TYPE STANDARD TABLE OF d010tab,
lt_scope_programs LIKE lt_prog.
 

CALL FUNCTION 'RS_TABLE_IN_PROGRAMS'
EXPORTING
tabname = tab
TABLES
proglist = lt_prog
scope_programs = lt_scope_programs.
 
DELETE lt_prog WHERE table_line+0(1) = '/'.
 
LOOP AT lt_prog ASSIGNING FIELD-SYMBOL(<line>).
WRITE: / sy-tabix COLOR COL_NEGATIVE, <line>-master COLOR COL_TOTAL.
ENDLOOP.