ABAP 锁对象

最新推荐文章于 2024-07-29 16:12:12 发布

雨落星辰C

最新推荐文章于 2024-07-29 16:12:12 发布

阅读量217

点赞数 3

分类专栏： ABAP 文章标签： SAP

本文链接：https://blog.csdn.net/qq_34276316/article/details/138665862

版权

ABAP 专栏收录该内容

22 篇文章 0 订阅

订阅专栏

表：

1、SE11创建锁对象

2、SE38代码

2.1加锁

 L_TYPE = 'S'.
  L_DATE = '99991231'.


  CALL FUNCTION 'ENQUEUE_EZ_ZTDATE_NUM'
    EXPORTING
      MODE_ZTDATE_NUM = 'X'
      MANDT           = SY-MANDT
      TYPE            = L_TYPE
      ERDAT           = L_DATE
*     X_TYPE          = ' '
*     X_ERDAT         = ' '
*     _SCOPE          = '2'
*     _WAIT           = ' '
*     _COLLECT        = ' '
    EXCEPTIONS
      FOREIGN_LOCK    = 1
      SYSTEM_FAILURE  = 2
      OTHERS          = 3.
  IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
              WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.

2.2解锁

  CALL FUNCTION 'DEQUEUE_EZ_ZTDATE_NUM'
    EXPORTING
      MODE_ZTDATE_NUM = 'X'
      MANDT           = SY-MANDT
      TYPE            = L_TYPE
      ERDAT           = L_DATE
*     X_TYPE          = ' '
*     X_ERDAT         = ' '
*     _SCOPE          = '3'
*     _SYNCHRON       = ' '
*     _COLLECT        = ' '
    .