编辑删除SM12锁记录

有时候异常退出系统导致SM12锁记录未能清空,而又无删除权限的情况下, 可用如下代码删除某个用户的锁记录.

DATA: it_enq TYPE TABLE OF seqg3,      lv_rc  TYPE sy-subrc,      lv_cnt type i.CALL FUNCTION 'ENQUEUE_READ'  EXPORTING    guname = 'USERNAME'  TABLES    enq    = it_enq  EXCEPTIONS    OTHERS = 0.DESCRIBE TABLE it_enq LINES lv_cnt.CHECK lv_cnt > 0.CALL FUNCTION 'ENQUE_DELETE'  EXPORTING    suppress_syslog_entry = 'X'  IMPORTING    subrc                 = lv_rc  TABLES    enq                   = it_enq.COMMIT WORK AND WAIT.IF lv_rc = 0.  WRITE 'OK'.ELSE.  WRITE 'ER'.ENDIF.