溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊(cè)×
其他方式登錄
點(diǎn)擊 登錄注冊(cè) 即表示同意《億速云用戶服務(wù)條款》

怎么查看某個(gè)用戶指定時(shí)間段的ABAP開發(fā)記錄

發(fā)布時(shí)間:2021-12-29 17:19:44 來(lái)源:億速云 閱讀:113 作者:iii 欄目:大數(shù)據(jù)

本篇內(nèi)容介紹了“怎么查看某個(gè)用戶指定時(shí)間段的ABAP開發(fā)記錄”的有關(guān)知識(shí),在實(shí)際案例的操作過(guò)程中,不少人都會(huì)遇到這樣的困境,接下來(lái)就讓小編帶領(lǐng)大家學(xué)習(xí)一下如何處理這些情況吧!希望大家仔細(xì)閱讀,能夠?qū)W有所成!

輸入用戶名和想查詢的時(shí)間段:

怎么查看某個(gè)用戶指定時(shí)間段的ABAP開發(fā)記錄

執(zhí)行得到結(jié)果。雙擊可查看具體代碼:

怎么查看某個(gè)用戶指定時(shí)間段的ABAP開發(fā)記錄

工具源代碼:

 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.

“怎么查看某個(gè)用戶指定時(shí)間段的ABAP開發(fā)記錄”的內(nèi)容就介紹到這里了,感謝大家的閱讀。如果想了解更多行業(yè)相關(guān)的知識(shí)可以關(guān)注億速云網(wǎng)站,小編將為大家輸出更多高質(zhì)量的實(shí)用文章!

向AI問(wèn)一下細(xì)節(jié)

免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI