DATA it_zspfli LIKE TABLE OF zspfli WITH HEADER LINE.CALL FUNCTION 'ENQUEUE_EZ_ZSPFLI'"加锁 EXPORTING mode_zspfli = 'E'mandt = sy-mandt carrid = 'AA'connid = '0011'* X_CARRID = ' '"是否使⽤初始值填充参数 CARRID * X_CONNID = ' '"是否使⽤初始值...
* X_VARKEY = ' ' * _SCOPE = '3' * _SYNCHRON = ' ' * _COLLECT = ' '. ABAP程序锁定 除了数据库有锁定外,ABAP程序本身也有锁定。 SAP提供了两个函数来解决程序运行时的同步锁定问题:ENQUEUE_ES_PROG和DEQUEUE_ES_PROG。 CALLFUNCTION'ENQUEUE_ES_PROG' * EXPORTING * MODE_TRDIR = 'E' * NAME...
更新自定义表时,可以使用通用的锁对象,而不用再为每一个自定义表创建锁对象(尽管SAP支持这种做法),当然解锁也有通用的解锁对象。代码如下: * 给自定义表 ZCOL2001 加锁对象 CALL FUNCTION 'ENQUEUE_E_TABLE' EXPORTING mode_rstable = 'E' tabname = 'ZCOL2001' x_tabname = ' ' x_varkey = ' ' _sc...
* MODE_RSTABLE = 'E' tabname = 'SFLIGHT'* VARKEY =* X_TABNAME = ' '* X_VARKEY = ' '* _SCOPE = '3'* _SYNCHRON = ' '* _COLLECT = ' '. ABAP程序锁定 除了数据库有锁定外,ABAP程序本身也有锁定。 SAP提供了两个函数来解决程序运行时的同步锁定问题:ENQUEUE_ES_PROG和DEQUEUE_ES_PROG...
DATA it_zspfli LIKE TABLE OF zspfli WITH HEADER LINE. CALL FUNCTION 'ENQUEUE_EZ_ZSPFLI'"加锁 EXPORTING mode_zspfli = 'E' mandt = sy-mandt carrid = 'AA' connid = '0011' * X_CARRID = ' '"是否使用初始值填充参数 CARRID
exclusivetypeenqmodevalue'E',end oflock_types.constants:"! Scopes for table lockbegin ofscope_range, _2typechar01 value'2',end ofscope_range.constants: _sflighttypetablenamevalue'SFLIGHT'.methods:"! Save data from carrier object to SFLIGHT table"! @parameter i_carrier | Carrier objectsav...
constants: "! Table lock types begin of lock_types, exclusive type enqmode value 'E', end of lock_types. constants: "! Scopes for table lock begin of scope_range, _2 type char01 value '2', end of scope_range. constants: _sflight type tablename value 'SFLIGHT'. methods: "! Save...
method unlock_table_line. call function 'DEQUEUE_E_TABLEE' exporting mode_rstable = lock_types-exclusive " Lock mode for table RSTABLE tabname = i_tabname " 01th enqueue argument varkey = i_varkey " 02th enqueue argument _scope = scope_range-_2. endmethod. method create_varkey. r_va...
DATA it_zspfli LIKE TABLE OF zspfli WITH HEADER LINE.CALL FUNCTION 'ENQUEUE_EZ_ZSPFLI'"加锁 EXPORTING mode_zspfli = 'E'mandt = sy-mandt carrid = 'AA'connid = '0011'* X_CARRID = ' '"是否使⽤初始值填充参数 CARRID * X_CONNID = ' '"是否使⽤初始值...
CALLFUNCTION'ENQUEUE_E_TABLE' EXPORTING * MODE_RSTABLE = 'E' tabname ='SFLIGHT' * VARKEY = * X_TABNAME = ' '"标示参数tabname是否是十六进制的 * X_VARKEY = ' '"标示参数VARKEy是否是十六进制的 * _SCOPE = '2' * _WAIT = ' ' ...