Редактирование объектов после их транспорта в систему

lonely

Помогите решить следующую, надеюсь, не очень сложную, проблему, ибо опыта пока маловато, а нужно сделать очень срочно.
Ситуация следующая: загрузил в свою систему transport of copies из другой системы (никак с моей не связанной). Объекты вроде как нормально загрузились, но редактировать их уж в моей системе возможности нет (в частности это касается дата-элементов, доменов и программ, таблицы почему-то редактируются). Возможно ли как-нибудь "отвязать" импортированные объекты от transport request'а и работать с ними так, как будто они были созданы с нуля мной и в моей системе? Если возможно, то как это сделать?

Заранее спасибо за помощь!

№1

Вот в закромах нашел... Change an original system status of an SAP object - program
Может наведет на какие-то идеи...

Code:

REPORT YCHORIG .
TABLES: SSCRFIELDS, TADIR.
************************************************************************
SELECTION-SCREEN SKIP.
SELECTION-SCREEN COMMENT 5(72) AAA.
SELECTION-SCREEN COMMENT /5(72) BBB.
SELECTION-SCREEN COMMENT /5(72) CCC.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF BLOCK BLOCK WITH FRAME.
SELECTION-SCREEN COMMENT /2(72) DDD.
SELECTION-SCREEN COMMENT /2(72) EEE.
SELECTION-SCREEN COMMENT /2(72) FFF.
SELECTION-SCREEN COMMENT /2(72) GGG.

SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: A LIKE E071-PGMID.
PARAMETERS: B LIKE E071-OBJECT.
PARAMETERS: C LIKE E071-OBJ_NAME.
SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN COMMENT /1(72) HHH.
SELECTION-SCREEN COMMENT /1(72) III.
SELECTION-SCREEN SKIP 2.
SELECTION-SCREEN PUSHBUTTON 3(30) MMM USER-COMMAND DISP.
SELECTION-SCREEN PUSHBUTTON 36(8) JJJ USER-COMMAND PROC.
SELECTION-SCREEN PUSHBUTTON 47(8) KKK USER-COMMAND EXIT.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN COMMENT /1(72) LLL.

SELECTION-SCREEN END OF BLOCK BLOCK .
************************************************************************
INITIALIZATION.
  AAA = 'This program changes the specifyed object''s original system.'.
  BBB = 'The new SID will be the login SID.'.
  CCC = 'USE THIS PROGRAM WITH EXTREME CARE!!!'.
  DDD = 'Name of R/3 ABAP/4 Development Workbench object'.
  EEE = '|      Object type'.
  FFF = '|      |      Object name'.
  GGG = '|      |      |'.
  HHH = 'Example:'.
  III = 'R3TR PROG ZLOAD'.
  JJJ = 'PROCEED'.
  KKK = 'EXIT'.
  MMM = 'DISPLAY RECENT ORIGINAL SYSTEM'.
  LLL = ' '.

AT SELECTION-SCREEN.
  IF SSCRFIELDS-UCOMM = 'EXIT'.
    SET SCREEN 0.LEAVE SCREEN.
  ELSEIF SSCRFIELDS-UCOMM = 'PROC'.
    CLEAR TADIR.
    SELECT SINGLE * FROM TADIR WHERE PGMID = A AND OBJECT = B AND
    OBJ_NAME = C.
    IF TADIR-PGMID IS INITIAL.
      LLL = 'THIS OBJECT DOES NOT EXIST'.
    ELSE.
      IF SY-SYSID <> TADIR-SRCSYSTEM.
        TADIR-SRCSYSTEM = SY-SYSID.
        MODIFY TADIR.
        COMMIT WORK.
        LLL = 'THE ORIGINAL SYSTEM CHANGED TO:'.
        LLL+31(3) = SY-SYSID.
      ELSE.
   LLL = 'NO CHANGE: THE ORIGINAL SYSTEM AND LOGIN SYSTEM ARE THE SAME'.
      ENDIF.
    ENDIF.
  ELSEIF SSCRFIELDS-UCOMM = 'DISP'.
    CLEAR TADIR.
    SELECT SINGLE * FROM TADIR WHERE PGMID = A AND OBJECT = B AND
    OBJ_NAME = C.
    IF TADIR-PGMID IS INITIAL.
      LLL = 'THIS OBJECT DOES NOT EXIST'.
    ELSE.
      LLL = 'THE RECENT ORIGINAL SYSTEM IS: '.
      LLL+31(3) = TADIR-SRCSYSTEM.
    ENDIF.
  ENDIF.

lonely

№1, как раз то, что нужно! Оказывается, все это дело в TADIR хранится. Спасибо большое за оперативный ответ!

№1

Собственно не за что. На самом деле есть стандартное средство для лечения такого... Просто вчера сразу не вспомнил - склероз, однако

в SE03 выбрать пункт Change object directory entry:

Цитата:

Description

This program can be used to edit the development class and the persons responsible in the object directory:

On the selection screen, you can restrict the object set according to various criteria:

Object type and object name
Development class
Person responsible
Original system
Development class
Generation flag
Original language
Objects with repair flag
If you do not make any restrictions on object type and object name, then the selection will be made according to all object types and object names.

Output

A hierarchical list of objects is displayed. You can edit their object directory entries. Choose Edit > Select sub-tree to select a subset. Then choose Change object directory.

lonely

Впринципе, и этот вариант довольно неплохо работает. Проблема лишь в том, что при попытке изменить сразу много объектов в поддереве (а их там порядка 70 штук) диалоговое окошко для указания таких параметров как development class, responsible person и system выскакивает для каждого из них в отдельности. Пытаюсь сейчас разобраться, как один раз указать одинаковые параметры сразу для всех объектов. В крайнем случае, поскольку имена объектов из чужой системы начинаются с 4-х одинаковых символов, можно будет быстро написать отчет, который напрямую сделает все через TADIR, находя объекты по маске.

№1

Думаю, что в SE03 можно указать исходную систему, выделить все поддерево и поменять всЁ сразу

Правила форума

Редактирование объектов после их транспорта в систему

Кто сейчас на конференции