不小心在PRD里用se10做了一个传输请求,已释放一个子项目,想删除它,但是系统报错说已经释放,不能修改,请问有什么办法删除它吗?
1、在STMS中可以刪除, 不過也可以加回來.
2、此问题已解决,思路是直接删除传输请求表中的请求号。表通过查询为e070
3、不推荐这种删除,推荐从STMS中删除
PROGRAM ZSTDELREQ.
DATA: ITAB_E070 LIKE E070 OCCURS 0 WITH HEADER LINE,
IWA_E070C LIKE E070C,
ITAB_E071 LIKE E071 OCCURS 0 WITH HEADER LINE,
IWA_E07T LIKE E07T,
IWA_E070A LIKE E070A,
ITAB_E071K LIKE E071K OCCURS 0 ,
ITAB_TLOCK LIKE TLOCK OCCURS 0 WITH HEADER LINE.
PARAMETER REQNO LIKE E070-TRKORR DEFAULT '' .
SELECT * INTO TABLE ITAB_E070 FROM E070
WHERE TRKORR EQ REQNO OR STRKORR EQ REQNO.
IF SY-SUBRC NE 0.
WRITE : 'The Request No. :' , Reqno , 'not exist!'.
endif.
select single * into iwa_e070c from e070c
where trkorr eq reqno .
select * into table itab_e071 from e071
where trkorr eq reqno .
select single * into iwa_e07t from e07t
where trkorr eq reqno.
select * from e071k into table itab_e071k
where trkorr eq reqno .
if itab_e070 is initial .
select * into table itab_tlock from tlock
where trkorr eq reqno.
else.
select * into table itab_tlock from tlock
for all entries in itab_e070
where trkorr eq itab_e070-trkorr.
endif.
if sy-subrc ne 0.
write : / 'No Locked object for request NO. was found!'.
endif.
delete :
e070 from table itab_e070,
e070c from iwa_e070c,
e071 from table itab_e071,
e070A from iwa_e070A,
e07t from iwa_e07t,
e071K from table itab_e071K,
TLOCK from table itab_tlock.
write : / 'The Request No.:' ,Reqno ,
'has already been successfully Full deleted'.
DATA:
PARAMETER
SELECT
IF
endif.
select
select
select
select
if
else.
endif.
if
endif.
delete
write
'has