CALL FUNCTION 'ENQUEUE_E_TABLE' EXPORTING MODE_RSTABLE = 'E' TABNAME = lv_tabname EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2 OTHERS = 3. IF sy-subrc <> 0. CONCATENATE '用户' sy-uname '当前正在操作该表!' INTO lv_msg. MESSAGE lv_msg TYPE 'E'. ENDIF. # 解锁 DATA lv_tab...
DATAit_zspfliLIKE TABLE OFzspfliWITH HEADER LINE. CALL FUNCTION'ENQUEUE_EZ_ZSPFLI'"加锁 EXPORTING mode_zspfli='E' mandt=sy-mandt carrid='AA' connid='0011' * X_CARRID = ' '"是否使用初始值填充参数CARRID * X_CONNID = ' '"是否使用初始值填充参数CONNID * _SCOPE = '2' * _WAIT ...
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 = ' '"是否使⽤初始值...
DATAit_zspfliLIKE TABLE OFzspfliWITH HEADER LINE. CALL FUNCTION'ENQUEUE_EZ_ZSPFLI'"加锁 EXPORTING mode_zspfli='E' mandt=sy-mandt carrid='AA' connid='0011' * X_CARRID = ' '"是否使用初始值填充参数 CARRID * X_CONNID = ' '"是否使用初始值填充参数 CONNID * _SCOPE = '2' * _WA...
更新自定义表时,可以使用通用的锁对象,而不用再为每一个自定义表创建锁对象(尽管SAP支持这种做法),当然解锁也有通用的解锁对象。代码如下: * 给自定义表 ZCOL2001 加锁对象 CALL FUNCTION 'ENQUEUE_E_TABLE' EXPORTING mode_rstable = 'E' tabname = 'ZCOL2001' x_tabname = ' ' x_varkey = ' ' _sc...
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
CALL FUNCTION 'ENQUEUE_E_TABLE' EXPORTING* MODE_RSTABLE = 'E' tabname = 'SFLIGHT'* VARKEY =* X_TABNAME = ' '"标示参数tabname是否是十六进制的* X_VARKEY = ' '"标示参数VARKEy是否是十六进制的* _SCOPE = '2'* _WAIT = ' '* _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_fail...
write / 'lock table spfli.'. call function 'ENQUEUE_EZ_SPFLI' exporting mode_spfli = 'E' mandt = sy-mandt _scope = '2' exceptions foreign_lock = 1 system_failure = 2 others = 3. if sy-subrc <> 0. message id sy-msgid type sy-msgty number sy-msgno ...
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'. ...
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 '', end of scope_range. constants: _sflight type tablename value 'SFLIGHT'. ...