摘要:本文将带你了解JAVA语言之如何查看某个用户指定时间段的ABAP开发记录,希望本文对大家学JAVA有所帮助。
输入用户名和想查询的时间段:
1
执行得到结果。双击可查看具体代码:
2
工具源代码:
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.
以上就介绍了JAVA的相关知识,希望对JAVA有兴趣的朋友有所帮助。了解更多内容,请关注职坐标编程语言JAVA频道!
您输入的评论内容中包含违禁敏感词
我知道了
请输入正确的手机号码
请输入正确的验证码
您今天的短信下发次数太多了,明天再试试吧!
我们会在第一时间安排职业规划师联系您!
您也可以联系我们的职业规划师咨询:
版权所有 职坐标-一站式IT培训就业服务领导者 沪ICP备13042190号-4
上海海同信息科技有限公司 Copyright ©2015 www.zhizuobiao.com,All Rights Reserved.
沪公网安备 31011502005948号