1. 程式人生 > >ABAP 自動獲取系統時間和日期

ABAP 自動獲取系統時間和日期

 

有些程式在新增或者修改資料的時候需要記錄建立和修改時間,當然這些欄位我們不可能手動輸入,這就要在提交資料時獲取系統時間,用如下module就可以完成此操作。

 

*----------------------------------------------------------------------*
***INCLUDE LZVRQSBI01 .
*----------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*&      Module  AUTO_FILL  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE auto_fill INPUT.
  IF zvrqsb-zcrtdat IS INITIAL.
    MOVE: sy-uname TO zvrqsb-zcrtacc,
          sy-datum TO zvrqsb-zcrtdat,
          sy-uzeit TO zvrqsb-zcrttim.
  ENDIF.
  MOVE: sy-uname TO zvrqsb-zmodacc,
        sy-datum TO zvrqsb-zmoddat,
        sy-uzeit TO zvrqsb-zmodtim.
ENDMODULE.                 " AUTO_FILL  INPUT