获取当前使用某个TCODE的用户的程序样例
来源:互联网 发布:美工笔记本 编辑:程序博客网 时间:2024/06/07 01:39
2006年09月04日 11:22:00
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 查看某个用户当前的连接数
- 2006最新版个人所得税计算器
- ABAP--SAP的SCreen录入的简单模板
- 如何使用SMOD和CMOD进行SD的用户增强
- SAP和ABAP内存的区别
- ABAP--SAP显示处理进度的函数
- 获取当前使用某个TCODE的用户的程序样例
- 将EXCEL文件上传到SAP AS的内表
- ABAP--如何创建动态结构的报表
- ABAP--如何限制自己开发的耗时报表在sap系统中运行的个数,以保证正常业务的进行
- ABAP--将数字金额转换为人民币大写字符串
- FI--SAP财务成本知识库
- ABAP--如何在REUSE_ALV_GRID_DISPLAY标识不同行用不同的颜色
- FI--R/3 功能详解----财务会计
- 使用'SAPGUI_SET_PROPERTY'函数是GUI屏幕可见和不可见