SAP-SCDO-表的修改日志记录.doc

《SAP-SCDO-表的修改日志记录.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、SAP系统中,如果有需要对自建表的数据记录修改日志的,可以创建文档记录,由系统自动记录表字段的修改.程序中只需要传入修改前和修改后的数据即可.需要显示日志时,只需要读出修改记录,显示即可.一.SE11进入要记录修改日志的自建表,进入需要记录修改的字段的数据元素中,在furthercharacteristic页面中,勾选更改文档二.TCODE:SCDO输入文档对象ZMG_TEST001,点击继续输入描述,及需要记录日志的表名字注:如果是对比单条记录的修改,则不需要勾选复制为内部表.(如抬头信息)如果需要批量对比多条记录的修改,则需要打

2、勾.(如行项目信息)然后点击:插入条目来到如下屏幕菜单栏:　实用程序->生成更新程序系统将自动生成一个可以记录修改日志的更新函数，只需将修改前及修改后的记录填入函数相关参数中，系统会自动判断此次对哪些字段（数据元素中更改文档已打勾）做了修改，并记录下来．点击保存.然后退出回到前一屏点击:生成信息文档修改对象创建完成红框中的函数名即为更新程序．一.在程序中,(修改前的字段内容和修改后的字段内容)调用更新函数来记录修改日志.      call function 'ZMG_TEST001_WRITE_DOCUMENT'        e

3、xporting          objectid                = lv_obid　　　“对象值如PO号          tcode                   = sy-tcode“修改记录的tocde          utime                   = sy-uzeit“当前时间          udate                   = sy-datum“当前日期          username                = sy-uname“修改人      

4、    object_change_indicator = 'U'          n_zmmsp1                = zmmsp1“修改后的数据记录(单条)          o_zmmsp1                = zmmsp1_old“修改前的数据记录(单条)          upd_zmmsp3              = 'U'        tables          icdtxt_zmm_sp           = icdtxt          xzmmsp2          

5、       = zmmsp2_new“修改后的数据记录(多条)          yzmmsp2                 = zmmsp2_old.“修改前的数据记录(多条)二.SE37创建读出日志并显示的函数Z_READ_HISTORY函数相关属性如下：IMPORTTABLESSourcecode  data:editpos type table of cdred  with header line,       aeditpos type table of cdred with header line.  data:w

6、k_repid type repid.  if tablekey[] is initial.    call function 'CHANGEDOCUMENT_READ'      exporting        objectclass                = objectclass        objectid                   = objectid        username                   = username        tablename              

7、    = tablename      tables        editpos                    = aeditpos      exceptions        no_position_found          = 1        wrong_access_to_archive    = 2        time_zone_conversion_error = 3        others                     = 4.  else.    loop at tablekey 

8、.      call function 'CHANGEDOCUMENT_READ'        exporting          objectclass                = objectclass