DATA: it_findstrings TYPE TABLE OF string,
      et_founds      TYPE TABLE OF rsfindlst,
      l_obj_cls      TYPE euobj-id.

PARAMETERS: p_object TYPE tadir-object,
            p_name   TYPE tadir-obj_name.

MOVE p_object TO l_obj_cls.
APPEND p_name TO it_findstrings.

CALL FUNCTION 'RS_EU_CROSSREF'
  EXPORTING
    i_find_obj_cls           = l_obj_cls
*   i_scope_obj_cls          = 'DT_'
  TABLES
    i_findstrings            = it_findstrings
    o_founds                 = et_founds
  EXCEPTIONS
    not_executed             = 1
    not_found                = 2
    illegal_object           = 3
    no_cross_for_this_object = 4
    batch                    = 5
    batchjob_error           = 6
    wrong_type               = 7
    object_not_exist         = 8
    OTHERS                   = 9.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.