输入用户名和想查询的时间段:

执行得到结果。双击可查看具体代码:

工具源代码:


REPORT tool_dev_history. PARAMETERS: name TYPE usr02-bname OBLIGATORY,             fro  TYPE sy-datum OBLIGATORY DEFAULT sy-datum,             to_  TYPE sy-datum OBLIGATORY DEFAULT sy-datum. CONSTANTS: c_name TYPE trdir-name VALUE 'Name',            c_date TYPE trdir-udat VALUE 'Date'. AT SELECTION-SCREEN.   IF fro > to_.     WRITE: / 'Invalid date period.' COLOR COL_NEGATIVE.     RETURN.   ENDIF. START-OF-SELECTION.   DATA: lt_record TYPE STANDARD TABLE OF trdir.   SELECT name udat INTO CORRESPONDING FIELDS OF TABLE lt_record FROM trdir      WHERE unam = name AND udat BETWEEN fro AND to_.   IF sy-subrc <> 0.     WRITE: / 'No record found at given date period.' COLOR COL_NEGATIVE.     RETURN.   ENDIF.   SORT lt_record BY udat DESCENDING.   WRITE:  10 c_name, 80 c_date.   LOOP AT lt_record INTO DATA(ls_data).     WRITE: / ls_data-name UNDER c_name COLOR COL_POSITIVE, ls_data-udat UNDER c_date COLOR COL_TOTAL.     HIDE ls_data-name.   ENDLOOP. AT LINE-SELECTION.   DATA: bdcdata_tab  TYPE TABLE OF bdcdata,         opt          TYPE ctu_params,         bdcdata_line TYPE bdcdata.   bdcdata_line-program = 'SAPLWBABAP'.   bdcdata_line-dynpro = '0100'.   bdcdata_line-dynbegin = 'X'.   APPEND bdcdata_line TO bdcdata_tab.   CLEAR: bdcdata_line.   bdcdata_line-fnam = 'BDC_CURSOR'.   bdcdata_line-fval = 'RS38M-PROGRAMM'.   APPEND bdcdata_line TO bdcdata_tab.   CLEAR: bdcdata_line.   bdcdata_line-fnam = 'BDC_OKCODE'.   bdcdata_line-fval = '=SHOP'.   APPEND bdcdata_line TO bdcdata_tab.   CLEAR: bdcdata_line.   bdcdata_line-fnam = 'RS38M-PROGRAMM'.   bdcdata_line-fval = ls_data-name.   APPEND bdcdata_line TO bdcdata_tab.   opt-dismode = 'E'.   opt-defsize = 'X'.   CALL TRANSACTION 'SE38' USING bdcdata_tab  OPTIONS FROM opt.   CLEAR: bdcdata_tab.

要获取更多Jerry的原创技术文章,请关注公众号"汪子熙"或者扫描下面二维码:

如何查看某个用户指定时间段的ABAP开发记录的更多相关文章

  1. 怎么清屏?怎么退出当前命令?怎么执行睡眠?怎么查看当前用户 id?查看指定帮助用什么命令?

    清屏:clear 退出当前命令:ctrl+c 彻底退出 执行睡眠 :ctrl+z 挂起当前进程 fg 恢复后台 查看当前用户 id:"id":查看显示目前登陆账户的 uid 和 g ...

  2. Linux常用命令学习4---(挂载命令mount umount、用户登陆查看和用户交互命令 w who last lastlog)

    紧接着上一篇Linux的命令行的学习:Linux学习3---(文件的压缩和解压缩命令zip unzip tar.关机和重启命令shutdown reboot……) 1.挂载命令     简介      ...

  3. Oracle查看所有用户

    1.查看所有用户:select * from dba_users;   select * from all_users;   select * from user_users; 2.查看用户或角色系统 ...

  4. linux下查看所有用户以及用户组

    groups 查看当前登录用户的组内成员groups gliethttp 查看gliethttp用户所在的组,以及组内成员whoami 查看当前登录用户名 /etc/group文件包含所有组/etc/ ...

  5. 【转】Linux下查看所有用户及用户组

    groups 查看当前登录用户的组内成员groups gliethttp 查看gliethttp用户所在的组,以及组内成员whoami 查看当前登录用户名/etc/group文件包含所有组/etc/s ...

  6. Linux 下搭建ftp服务器 指定用户指定目录及其他操作

    搭建 Linux下 rpm -qa |grep vsftpd查看是否安装 没安装yum安装 /etc/vsftpd/目录下有vsftpd.conf配置文件 根据需求 进行配置  是否使用匿名用户以及文 ...

  7. Linux学习总结(十二)—— CentOS用户管理:创建用户、修改用户、修改密码、密码有效期、禁用账户、解锁账户、删除用户、查看所有用户信息

    文章首发于Linux学习总结(十二)-- CentOS用户管理,请尊重原创保留原文链接. 创建用户 useradd -g webadmin -d /home/zhangsan zhangsan pas ...

  8. linux查看当前用户登陆信息

    @(Linux基础)[linux查看当前用户登陆信息] linux查看当前用户登陆信息 作为系统管理员,你可能经常会(在某个时候)需要查看系统中有哪些用户正在活动.有些时候,你甚至需要知道他(她)们正 ...

  9. oracle 表空间及查看所有用户的表空间

    用户有默认表空间,但是只能指定一个,但是你有其它表空间的限额的话,可以将表建到其它表空间中. 语法 create table xxx(xxxx xx) tablespace xxxxx 1.查看当前用 ...

随机推荐

  1. 2016"百度之星" - 资格赛(Astar Round1)D

    Problem Description 度熊所居住的 D 国,是一个完全尊重人权的国度.以至于这个国家的所有人命名自己的名字都非常奇怪.一个人的名字由若干个字符组成,同样的,这些字符的全排列的结果中的 ...

  2. Appium——appium之mac环境安装

    一.安装brew:Homebrew是一款Mac OS平台下的软件包管理工具执行:/usr/bin/ruby -e "$(curl -fsSL https://raw.githubuserco ...

  3. Photoshop入门教程(三):图层

    学习心得:图层可以说是Photoshop的核心,看似简单,但是对于图像的各种编辑都是基于图层.他就像一层透明的.没有厚度的玻璃纸,每张玻璃纸设置不同的效果,层层叠加,最后显现出绚烂的效果. 在进行图像 ...

  4. 17.JavaMail

    1.电子邮件 电子邮件是目前网络上使用最多的服务,电子邮件的应用越来越广泛正常的通信往来账号注册时,找回密码时等一般发送的邮件主要可以分解成2大部分一部分是发信人.接信人.主题等邮件标头另外一部分是邮 ...

  5. Callable,Runnable的区别及用法

    编写多线程程序一般有三种方法,Thread,Runnable,Callable. Runnable和Callable的区别是: (1)Callable规定的方法是call(),Runnable规定的方 ...

  6. hadoop和spark比较

    http://blog.51cto.com/13943588/2165946 3.hadoop和spark的都是并行计算,那么他们有什么相同和区别?  两者都是用mr模型来进行并行计算,hadoop的 ...

  7. Golang常用数据结构(对照python)

    python golang init get set extend/update find index size loop list list l := list.New()   l.PushBack ...

  8. 源码剖析Linux epoll实现机制及Linux上惊群

    转载:https://blog.csdn.net/tgxallen/article/details/78086360 看源码是对一个技术认识最直接且最有效的方式了,之前用Linux Epoll做过一个 ...

  9. [转]js 判断图片存在

    转自:http://blog.csdn.net/qq415734794/article/details/7261479 .//检查图片是否存在 .function CheckImgExists(img ...

  10. apache服务器启动出错

    启动本地xampp的服务器时,报错如下所示: 错误提示很明确: 就是指我们希望使用的端口被占用,由于xampp默认使用的端口是80(http协议).443(https协议),也就是说这两个端口被其他的 ...