ABAP总结之十三，锁表机制

          SAP的一大特点，就是可以设置Batch Job，定时定量跑程序。

    但是这样就会碰到一个问题，会出现多个Batch job读写的情况。如果仅仅是读或是写的话，还好，最多是数据库延迟。但是如果对一个表，即读又写的话，就会产生数据一致性问题。比如，A Job读取数据X，然后做修改，但是修改的同时又有另外一个Job已经更新的X数据，结果A Job把另外一个更新的数据覆盖了，没有达到要预定的要求。

    这时候就要引进锁表机制：

           Exclusive lock: 排他锁，只有自己可以读、写

           Shared lock：共享锁，自己可以读、写，他人只能读

           Exclusive but not cumulative lock：排他但不累计，只有自己可以读、写，并且一个事务只能使用一次

两种实现方法：

1． SE11->新建Lock object(注意是E开头)->设置好表名和Lock Mode(就是我上面说的三种)->激活->Goto->Lock Modules(你可以在程序中调用自动生成的两个函数，进行锁表操作)

 

CALL FUNCTION 'ENQUEUE_EZKEVIN'
* EXPORTING
*   MODE_ZKEVIN          = 'E'
*   ID                   =
*   X_ID                 = ' '
*   _SCOPE               = '2'
*   _WAIT                = ' '
*   _COLLECT             = ' '
* EXCEPTIONS
*   FOREIGN_LOCK         = 1
*   SYSTEM_FAILURE       = 2
*   OTHERS               = 3

 

 

CALL FUNCTION 'DEQUEUE_EZKEVIN'
* EXPORTING
*   MODE_ZKEVIN       = 'E'
*   ID                =
*   X_ID              = ' '
*   _SCOPE            = '3'
*   _SYNCHRON         = ' '
*   _COLLECT          = ' '
          .

2．  还有一种就是动态的：

CALL FUNCTION 'ENQUEUE_E_TABLE'
* EXPORTING
*   MODE_RSTABLE         = 'E'
*   TABNAME              =
*   VARKEY               =
*   X_TABNAME            = ' '
*   X_VARKEY             = ' '
*   _SCOPE               = '2'
*   _WAIT                = ' '
*   _COLLECT             = ' '
* EXCEPTIONS
*   FOREIGN_LOCK         = 1
*   SYSTEM_FAILURE       = 2
*   OTHERS               = 3
          .

CALL FUNCTION 'DEQUEUE_E_TABLE'
* EXPORTING
*   MODE_RSTABLE       = 'E'
*   TABNAME            =
*   VARKEY             =
*   X_TABNAME          = ' '
*   X_VARKEY           = ' '
*   _SCOPE             = '3'
*   _SYNCHRON          = ' '
*   _COLLECT           = ' '
          .