使用代码批量激活inactive object

DATA: lt_object TYPE STANDARD TABLE OF dwinactiv.

START-OF-SELECTION.

  SELECT object obj_name INTO CORRESPONDING FIELDS OF TABLE lt_object FROM dwinactiv WHERE uname = sy-uname.

  IF sy-subrc <> 0.
    WRITE: 'No inactive objects to be activated for user: ', sy-uname COLOR COL_NEGATIVE.
    RETURN.
  ENDIF.

  LOOP AT lt_object ASSIGNING FIELD-SYMBOL(<object>).
    CALL FUNCTION 'RS_WORKING_OBJECT_ACTIVATE'
      EXPORTING
        object   = <object>-object
        obj_name = <object>-obj_name.
  ENDLOOP.