Created by Jerry Wang, last modified on May 21, 2014

如下report 先后三次重复调用带参数的enqueue function module对database table CRMD_SOC_POST里一个uuid为0023的record上锁, 使用Function module ENQUEUE_READ读取该user持有的sap lock信息,打印出的cumulative counter的值依次为1, 2, 3. 每调用一次对应的dequeue function module,则counter 减1。
若不带参数调用enqueue function module,则cumulative counter与待参数时调用的counter是分别计数的。

REPORT zlock1.CONSTANTS: c_table TYPE tadir-obj_name VALUE 'CRMD_SOC_POST'.START-OF-SELECTION.WRITE: / 'First lock on uuid 23...' COLOR COL_NEGATIVE.CALL FUNCTION 'ENQUEUE_ECRMD_SOC_POST'EXPORTINGuuid = '00000000000000000000000000000023'.PERFORM display_lock.WRITE: / 'Second lock on uuid 23...' COLOR COL_NEGATIVE.CALL FUNCTION 'ENQUEUE_ECRMD_SOC_POST'EXPORTINGuuid = '00000000000000000000000000000023'.PERFORM display_lock.WRITE: / 'Third lock on the whole table...' COLOR COL_NEGATIVE.CALL FUNCTION 'ENQUEUE_ECRMD_SOC_POST'.PERFORM display_lock.WRITE: / 'Third lock on uuid 23...' COLOR COL_NEGATIVE.CALL FUNCTION 'ENQUEUE_ECRMD_SOC_POST'EXPORTINGuuid = '00000000000000000000000000000023'.PERFORM display_lock.WRITE: / 'release lock on uuid 23...' COLOR COL_NEGATIVE.CALL FUNCTION 'DEQUEUE_ECRMD_SOC_POST'EXPORTINGuuid = '00000000000000000000000000000023'.PERFORM display_lock.FORM display_lock.DATA: lv_subrc TYPE sy-subrc,lt_enq   TYPE STANDARD TABLE OF seqg3.CLEAR: lt_enq.CALL FUNCTION 'ENQUEUE_READ'EXPORTINGgclient               = sy-mandtguname                = sy-unameIMPORTINGsubrc                 = lv_subrcTABLESenq                   = lt_enqEXCEPTIONScommunication_failure = 2OTHERS                = 1.LOOP AT lt_enq ASSIGNING FIELD-SYMBOL(<lock>) WHERE gname = c_table.WRITE: / 'lock variable: ' , <lock>-garg+0(40) COLOR COL_POSITIVE,'Cumulative Counter: ', <lock>-gusevb COLOR COL_TOTAL.ENDLOOP.ENDFORM.

SAP ABAP实用技巧介绍系列之使用代码获得user的SAP lock信息相关推荐

  1. SAP ABAP实用技巧介绍系列之使用代码获得某个structure上的扩展字段

    Created by Jerry Wang, last modified on Apr 29, 2014 例如需要用代码获取以下structure的extension field list: 可以使用 ...

  2. SAP ABAP实用技巧介绍系列之 ABAP内存管理学习

    Created by Jerry Wang, last modified on May 26, 2014 使用如下report 测试ABAP memory: REPORT ztest_export. ...

  3. SAP ABAP实用技巧介绍系列之 使用XSLT替换xml中指定node的value

    Created by Jerry Wang, last modified on Jun 30, 2014 用于测试的xml: <catalog> <cd> <title& ...

  4. SAP ABAP实用技巧介绍系列之 使用simple transformation的mapping功能

    Created by Jerry Wang, last modified on Jun 25, 2014 Simple transformation如下: 当node VALTO_DATE的value ...

  5. SAP ABAP实用技巧介绍系列之 在xslt里call ABAP method

    Created by Jerry Wang, last modified on Jul 02, 2014 用于测试的xml: <catalog> <cd> <title& ...

  6. SAP ABAP实用技巧介绍系列之 ABAP XSLT 定义变量

    Created by Jerry Wang, last modified on Jul 01, 2014 下面的xslt 片段定义了两个变量: header变量的内容为一系列html tab,而col ...

  7. SAP ABAP实用技巧介绍系列之 获得webservice的schema node

    Created by Jerry Wang, last modified on Jul 23, 2014 webservice WSDL URL: https://:44324/sap/bc/srt/ ...

  8. SAP ABAP实用技巧介绍系列之反模式:一些低效的ABAP内表操作

    Created by Jerry Wang, last modified on Jun 15, 2015 Why is this message raised? From SAP help, we k ...

  9. SAP ABAP实用技巧介绍系列之将unicode字符转换成中文

    Created by Jerry Wang, last modified on May 29, 2014 输入unicode格式的字符: 输出是转换之后的对应中文字符: 代码如下. class_con ...

最新文章

  1. php 自动返回,PHP实现自动识别Restful API的返回内容类型
  2. win10软件拒绝访问删不掉_进程拒绝访问怎么结束_win10关闭进程拒绝访问的处理方法...
  3. PHP命令注入 Command injection
  4. Java ClassLoader setDefaultAssertionStatus()方法与示例
  5. Memcache缓存系统
  6. Git生成patch及打patch到源代码
  7. 书评专家_书评:“开放”探讨开放的广泛文化含义
  8. Eclipse-无法引用maven依赖的类/没有MavenDependencies/没有buildpath
  9. C语言中的类模拟(C++编程思想)
  10. JVM笔记7:类加载器
  11. 免费试用版CRM客户管理系统如何选择?
  12. 计算机视觉开篇---读史可以明智
  13. python灰色预测_python灰度预测
  14. 个人经典音乐收藏(五)love to be loved by you,Marc Terenzi
  15. 基于Gin+Vue+ElementUI实现的OA办公系统
  16. 3G杀手应用还是全方位轰炸?
  17. 将图像平移到画布中心python_python前端之Photoshop
  18. 如何用U盘启动做系统启动盘,如何重装系统
  19. QuasarRAT-windows下远程控制工具
  20. 【英译中】如何拍好沙滩照2——2014年7月24日

热门文章

  1. zookeeper 源码阅读(2)
  2. kafka通过零拷贝实现高效的数据传输
  3. springmvc入门学习
  4. pyecharts学习(part3)--简单图表绘制及参数优化
  5. 机器学习中的不平衡分类方法(part5)--决策树与随机森林
  6. XGBoost算法概述
  7. Django从理论到实战(part23)--模板继承
  8. cmd mysql log_如何使用mysqlbinlog工具?
  9. select计数语句_从零开始学 MySQL SELECT 语句详解
  10. SAP UI5 应用开发教程之五十五 - 如何将本地 SAP UI5 应用通过 Node.js Express 部署到公网上试读版