RSA1 написал(а):
Изя Шниперсон написал(а):
RSA1 написал(а):
Изя Шниперсон написал(а):
Добрые день уважаемые BWшники.
Подскажите <я не знать русский языка> ФМ для удаления данных инфо-объекта из ABAP.
Вы хотите удалить мастер-данные ? Я боюсь, что такого ФМ может и не быть. Уж слишком это дело, скажем так, хлопотное и чревато проблемами.
Да, необходимо удалить мастер-данные.
А как тогда их удалять? По таблицам инфообъекта лазить и на каждую delete писать?
RSDMD_DEL_MASTER_DATA
но, опять, подчеркну. Головная боль это... ОГРОМНАЯ !
Большое спасибо.
Именно этим методом и воспользовался.
Вроде никаких проблем не возникло.
Code:
REPORT ZRFSUBJ_DELETE_MASTERDATA_TEST.
write: / 'start deletion'.
DATA: lt_pZRFSUBJ LIKE TABLE OF /BIC/TZRFSUBJ with header line.
TYPES: rsd_chavl LIKE rsgeneral-chavl.
TYPES: rsd_t_chavl TYPE rsd_chavl OCCURS 100.
DATA : rsdt TYPE RSD_T_CHAVL.
DATA: line_rsdt LIKE LINE OF rsdt.
DATA: subj_rf TYPE /BIC/OIZRFSUBJ.
data: res type i.
subj_rf = '099'.
line_rsdt = subj_rf.
append line_rsdt to rsdt.
call function 'RSDMD_DEL_MASTER_DATA'
exporting
I_IOBJNM = 'ZRFSUBJ'
I_FLG_DELETE_SIDS = 'X'
I_FLG_DELETE_SIDS_ASK = ''
I_FLG_DELETE_TEXTS = 'X'
I_T_CHAVL = rsdt
I_FLG_DIALOG = ''
I_FLG_FORCE_DELETE = 'X'
importing
e_result = res
exceptions
ILLEGAL_INPUT = 1
IOBJ_ERROR = 2
SID_ERROR = 3
PROGRAM_ERROR = 4
ENQUEUED = 5
QUEUE_ERROR = 6
NO_CHKTAB = 7
CHKTAB_NOT_GENERATED = 8
NO_AUTHORITY = 9
RSDPW_ERROR = 10
others = 11.