專案中遇到了一個需求:對自建表的資料進行操作的時候,需要對更改資訊進行記錄,到欄位級別~

使用到了SAP 的chenge document 功能.

Tcode : SCDO

首先建立一個自己的change document object ,在物件裡面填上需要記錄的表的名字. 要是需要記錄刪除欄位資訊的話,把第二個checkbox選上.

然後選擇生成更新程式 -> 儲存.

點選生成資訊的話,可以看見生成的程式還有function module資訊,要是上面截圖第一個checkbox被選擇的話,還會生成新的structure .

到這裡,change document object就建立好了~

在程式裡面直接呼叫生成的function module把原始值和更新值傳進去就可以了`

*------------------start-----------------------------------------------*

REFRESH : lt_icdtxt .

CALL FUNCTION 'ZYW8_WRITE_DOCUMENT'

EXPORTING

objectid = ls-objectid

tcode = ls-tcode

utime = ls-utime

udate = ls-udate

username = ls-username

* PLANNED_CHANGE_NUMBER = ' '

object_change_indicator = 'U'

* PLANNED_OR_REAL_CHANGES = ' '

* NO_CHANGE_POINTERS = ' '

* UPD_ICDTXT_ZYW8 = ' '

upd_zidowndata = 'U'

TABLES

icdtxt_zyw8 = lt_icdtxt

xzidowndata = lt_8_new

yzidowndata = lt_8_old .

*------------------end-------------------------------------------------*

SAP提供了一個標準的報表檢視修改記錄: RSSCD100 .

需要注意的一點,凡是需要記錄的欄位,dataelement裡面的 changedocument屬性必須設定~

自己實現的一個測試程式：

REPORT ZZ_TEST24.

data ls_person TYPE ztblperson.
data ls_person_old TYPE ztblperson.
data lt_person TYPE TABLE OF ztblperson.
data ls_person1 TYPE YZTBLPERSON.
data lt_person_new TYPE TABLE OF YZTBLPERSON.
data lt_person_old TYPE TABLE OF YZTBLPERSON.

ls_person-name = 'N10'.
ls_person-age = 50.
ls_person-job = 'ABAP'.
INSERT ls_person INTO TABLE lt_person.
MOVE-CORRESPONDING ls_person to ls_person1.

ls_person-name = 'N12'.
ls_person-age = 50.
ls_person-job = 'ABAP'.
INSERT ls_person INTO TABLE lt_person.
MOVE-CORRESPONDING ls_person to ls_person1.
INSERT ls_person1 INTO TABLE lt_person_old.

MODIFY ztblperson FROM TABLE lt_person. " update + insert

data lt_cdtxt TYPE TABLE OF CDTXT.
data ls_cdtxt TYPE CDTXT.
ls_cdtxt-TEILOBJID = ls_person-name.

ls_cdtxt-UPDKZ = 'I'.
INSERT ls_cdtxt INto table lt_cdtxt.
CALL FUNCTION 'ZPERSON_WRITE_DOCUMENT'
EXPORTING
OBJECTID = 'ZPERSON'
TCODE = sy-tcode
UTIME = sy-uzeit
UDATE = sy-datum
USERNAME = sy-uname
* PLANNED_CHANGE_NUMBER = ' '
OBJECT_CHANGE_INDICATOR = 'U'
* PLANNED_OR_REAL_CHANGES = ' '
* NO_CHANGE_POINTERS