获取当前使用某个TCODE的用户的程序样例
来源:互联网 发布:java 上传文件 原理 编辑:程序博客网 时间:2024/06/11 18:45
REPORT Z_ABAP_SELECT_USER_BY_TCODE .
TABLES:
TSTC,
TSTCT.
DATA OPCODE TYPE X.
DATA: BEGIN OF USR_TABL OCCURS 10.
INCLUDE STRUCTURE UINFO.
DATA: END OF USR_TABL.
SELECT-OPTIONS: S_TCODE FOR TSTC-TCODE.
START-OF-SELECTION.
CLEAR USR_TABL.
FREE USR_TABL.
* set the function call mode
OPCODE = 2.
* get list of all users actually logging on
CALL 'ThUsrInfo' ID 'OPCODE' FIELD OPCODE
ID 'TAB' FIELD USR_TABL-*SYS*.
SORT USR_TABL BY BNAME TCODE.
LOOP AT USR_TABL WHERE TCODE IN S_TCODE.
SELECT SINGLE TTEXT FROM TSTCT INTO TSTCT-TTEXT
WHERE SPRSL = SY-LANGU AND
TCODE = USR_TABL-TCODE.
TRANSLATE TSTCT-TTEXT TO UPPER CASE.
WRITE:/
USR_TABL-BNAME,
USR_TABL-TCODE,
TSTCT-TTEXT.
ENDLOOP.
IF SY-SUBRC <> 0.
MESSAGE I001(38) WITH 'NO ENTRIES FOR YOUR SELECTION CRITERIA!'.
ENDIF.
TABLES:
TSTC,
TSTCT.
DATA OPCODE TYPE X.
DATA: BEGIN OF USR_TABL OCCURS 10.
INCLUDE STRUCTURE UINFO.
DATA: END OF USR_TABL.
SELECT-OPTIONS: S_TCODE FOR TSTC-TCODE.
START-OF-SELECTION.
CLEAR USR_TABL.
FREE USR_TABL.
* set the function call mode
OPCODE = 2.
* get list of all users actually logging on
CALL 'ThUsrInfo' ID 'OPCODE' FIELD OPCODE
ID 'TAB' FIELD USR_TABL-*SYS*.
SORT USR_TABL BY BNAME TCODE.
LOOP AT USR_TABL WHERE TCODE IN S_TCODE.
SELECT SINGLE TTEXT FROM TSTCT INTO TSTCT-TTEXT
WHERE SPRSL = SY-LANGU AND
TCODE = USR_TABL-TCODE.
TRANSLATE TSTCT-TTEXT TO UPPER CASE.
WRITE:/
USR_TABL-BNAME,
USR_TABL-TCODE,
TSTCT-TTEXT.
ENDLOOP.
IF SY-SUBRC <> 0.
MESSAGE I001(38) WITH 'NO ENTRIES FOR YOUR SELECTION CRITERIA!'.
ENDIF.
Trackback: http://tb.blog.csdn.net/TrackBack.aspx?PostId=1175195
- 获取当前使用某个TCODE的用户的程序样例
- 获取当前使用某个TCODE的用户的程序样例
- 获取当前使用某个TCODE的用户的程序样例
- [微信小程序]获取用户当前的城市
- 通过TCODE查找用户增强的示例程序
- 使用 C# 获取当前用户的SID
- 获取当前程序的版本和获取某个文件的版本
- 获取系统当前的用户
- 获取当前用户的名字
- 获取当前用户的SID
- DB2中使用事件监控器获取某个时间段里某个用户执行的SQL语句
- SharePoint使用 C# 获取当前用户的SID
- SAP_如何使用SQVI批量查询用户用户拥有的TCODE
- 获取当前程序的版本号
- 获取当前程序的绝对路径
- 获取当前程序的版本号
- 根据tcode查找增强的程序
- SQUID 查看某个用户当前的连接数
- ABAP--将数字金额转换为人民币大写字符串
- ABAP--如何限制自己开发的耗时报表在sap系统中运行的个数,以保证正常业务的进行
- ABAP--如何创建动态结构的报表
- JAVA内存溢出
- 将EXCEL文件上传到SAP AS的内表
- 获取当前使用某个TCODE的用户的程序样例
- ABAP--SAP显示处理进度的函数
- SAP和ABAP内存的区别
- 如何使用SMOD和CMOD进行SD的用户增强
- ABAP--SAP的SCreen录入的简单模板
- 2006最新版个人所得税计算器
- 如何从SAP中连接其他数据库
- SAP--A List of BASIS Common TCode
- ABAP--编写应用服务器执行外部命令的程序示例