
Сам спросил, сам ответил. Вот, слабалась такая программка, может кому пригодится. Подменяете строку 32.
REPORT ztal_tmp.
CLASS cl_rsr_cache_mm DEFINITION LOAD.
DATA: p_r_mem_mon TYPE REF TO if_rsr_cache_memory_monitor,
p_s_mm TYPE rsrcb_s_mm,
p_r_mem TYPE REF TO if_rsr_cache_memory,
l_s_key TYPE rsrcb_s_key,
instance TYPE REF TO if_rsr_cache_mon,
n_r_mem TYPE REF TO cl_rsr_cache_mm,
p_t_alv TYPE rsrcc_t_alv,
l_s_mm_line TYPE rsrcb_s_mm_line,
l_s_alv TYPE rsrcc_s_alv,
l_flag TYPE c VALUE 'X'.
WHILE l_flag = 'X'.
CALL METHOD cl_rsr_cache_qu_mon=>if_rsr_cache_mon~create
RECEIVING
r_r_instance = instance.
n_r_mem = cl_rsr_cache_mm=>create( 'm' ).
p_r_mem = n_r_mem.
p_r_mem_mon = n_r_mem.
p_s_mm = p_r_mem_mon->get_monitor_data( ).
LOOP AT p_s_mm-t_mm_line INTO l_s_mm_line.
MOVE-CORRESPONDING l_s_mm_line TO l_s_alv.
APPEND l_s_alv TO p_t_alv.
ENDLOOP.
CALL METHOD instance->get_prop
EXPORTING
i_r_mem = n_r_mem
CHANGING
c_t_alv = p_t_alv.
LOOP AT p_t_alv INTO l_s_alv
WHERE mem_id_ext CP 'NEWORSMRC*'.
EXIT.
ENDLOOP.
IF sy-subrc IS INITIAL.
l_s_key-mem_id = l_s_alv-mem_id.
l_s_key-log_id = l_s_alv-log_id.
p_r_mem->delete( l_s_key ).
ELSE.
CLEAR l_flag.
ENDIF.
CLEAR: p_t_alv[], l_s_alv.
ENDWHILE.