zoukankan      html  css  js  c++  java
  • 按月统计tcode和report使用次数的工具

    执行report,输入要查询的日期和user,

    工具会按照使用次数从高到低列出输入日期所在的月份内所有该user 曾经使用过的tcode 和report list:

    REPORT zusertcode.
    PARAMETER: month TYPE dats DEFAULT sy-datum OBLIGATORY,
               user type usr02-bname OBLIGATORY DEFAULT sy-uname.
    TYPES: BEGIN OF zusertcode,
             operation type char30,
             type type char10,
             count  TYPE swncshcnt,
           END OF zusertcode.
    TYPES: tt_zusertcode TYPE STANDARD TABLE OF zusertcode WITH KEY operation type.
    DATA: lt_usertcode  TYPE swnc_t_aggusertcode,
          wa_usertcode TYPE swncaggusertcode,
          wa           TYPE zusertcode,
          t_ut         TYPE tt_zusertcode,
          ls_result    TYPE zusertcode,
          lt_result     TYPE tt_zusertcode.
    CONSTANTS: cv_tcode TYPE char30 VALUE 'Tcode',
               cv_report TYPE char30 VALUE 'Report',
               cv_count TYPE char5 value 'Count'.
    START-OF-SELECTION.
    * Set date to the first day of the month
      "month+6(2) = '01'.
      CALL FUNCTION 'SWNC_COLLECTOR_GET_AGGREGATES'
        EXPORTING
          component     = 'TOTAL'
          periodtype    = 'M'
          periodstrt    = month
        TABLES
          usertcode     = lt_usertcode
        EXCEPTIONS
          no_data_found = 1
          OTHERS        = 2.
      DELETE lt_usertcode WHERE tasktype <> '01'.
      LOOP AT lt_usertcode ASSIGNING FIELD-SYMBOL(<user>) WHERE account = user.
         CLEAR: ls_result.
         ls_result-operation = <user>-entry_id.
         ls_result-type = <user>-entry_id+72.
         ls_result-count = <user>-count.
         COLLECT ls_result INTO lt_result.
      ENDLOOP.
      SORT lt_result BY count DESCENDING.
      WRITE:  10 cv_tcode, 20 cv_report, 60 cv_count COLOR COL_NEGATIVE.
      LOOP AT lt_result ASSIGNING FIELD-SYMBOL(<result>).
          IF <result>-type = 'T'.
            WRITE: / <result>-operation COLOR COL_TOTAL UNDER cv_tcode,
                     <result>-count COLOR COL_POSITIVE UNDER cv_count.
          ELSE.
            WRITE: / <result>-operation COLOR COL_GROUP UNDER cv_report,
                     <result>-count COLOR COL_POSITIVE UNDER cv_count.
          ENDIF.
      ENDLOOP.
  • 相关阅读:
    四叉树空间索引原理及其实现
    深入理解空间搜索算法 ——数百万数据中的瞬时搜索
    空间索引
    Microsoft.Office.Core 引用以及 Microsoft.Office.Core.MsoTriState 的问题
    Visual studio 2017 中的Javascript智能提示与调试
    EasyUI Tooltip 提示框
    java编程中的断言工具类(org.springframework.util.Assert)
    Guava学习笔记:Google Guava 类库简介
    Jquery autocomplete插件
    easyui-textbox
  • 原文地址:https://www.cnblogs.com/goodsmith/p/4874052.html
Copyright © 2011-2022 走看看