*&---------------------------------------------------------------------*
*& Report  ZNN_MD_USAGE
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT znn_md_usage.
TYPE-POOLS:
  rsddv,
  rsd.
TABLES:
  dd02l.
DATA:
  l_valtable        TYPE dd02l-tabname,
  l_obj_sid         TYPE i,
  l_iobjnm          TYPE rsd_iobjnm,
  lt_outl_sid       TYPE rrsi_t_sid,
  lt_outl_sid_used  TYPE rsr_th_sid,
  lt_ulist_sid      TYPE rsddv_t_ulist_sid,
  lt_ulist_dim      TYPE rsddv_t_ulist_dim,
  lt_ulist_mdata    TYPE rsddv_t_ulist_mdata,
  lt_ulist_atr      TYPE rsddv_t_ulist_atr,
  lt_ulist_atr_nav  TYPE rsddv_t_ulist_atr,
  lt_ulist_cmp      TYPE rsddv_t_ulist_cmp,
  lt_ulist_hie      TYPE rsddv_t_ulist_hie,
  lt_ulist_hie_node TYPE rsddv_t_ulist_hie_node,
  lt_ulist_query    TYPE rsddv_t_ulist_query,
  lt_ulist_odso     TYPE rsddv_t_ulist_odso,
  gc_alv_table      TYPE REF TO cl_salv_table,
  gc_columns        TYPE REF TO cl_salv_columns_table,
  gc_colwork        TYPE REF TO cl_salv_column_table,
  tab_name          TYPE lvc_title.
FIELD-SYMBOLS:
  <so_val>           TYPE rrrange,
  <lt_ulist_dim>     LIKE LINE OF lt_ulist_dim,
  <lt_ulist_atr_nav> LIKE LINE OF lt_ulist_atr_nav,
  <lt_ulist_odso>    LIKE LINE OF lt_ulist_odso.
*&---------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS:
  l_iobj TYPE rsdiobjv-iobjnm OBLIGATORY. " rsd_iobjnm.
SELECTION-SCREEN END OF BLOCK b1.
l_valtable = '/BIC/S' && l_iobj.   " модный in-line
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
SELECT-OPTIONS:
  lt_val FOR (l_valtable) NO INTERVALS.
SELECTION-SCREEN END OF BLOCK b2.
*&---------------------------------------------------------------------*