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

SAP系统中,如果有需要对自建表的数据记录修改日志的,可以创建文档记录,由系统自动记录表字段的修改. 程序中只需要传入修改前和修改后的数据即可. 需要显示日志时,只需要读出修改记录,显示即可.一. SE11 进入要记录修改日志的自建表,进入需要记录修改的字段的数据元素中,在further characteristic页面中,勾选 更改文档二. TCODE : SCDO输入文档对象 ZMG_TEST001,点击继续输入描述,及需要记录日志的表名字注:如果是对比单条记录的修改,则不需要勾选 复制为内部表.(如抬头信息)如果需要批量对比多条记录的修改,则需要打勾.(如行项目信息)然后点击: 插入条目来到如下屏幕菜单栏 :实用程序 - 生成更新程序 系统将自动生成一个可以记录修改日志的更新函数，只需将修改前及修改后的记录填入函数相关参数中，系统会自动判断此次对哪些字段（数据元素中更改文档已打勾）做了修改，并记录下来点击保存.然后退出回到前一屏点击: 生成信息文档修改对象创建完成红框中的函数名即为更新程序三. 在程序中, (修改前的字段内容和修改后的字段内容)调用更新函数来记录修改日志.callfunction ZMG_TEST001_WRITE_DOCUMENTexportingobjectid=lv_obid“对象值 如PO号tcode=sy-tcode“修改记录的tocdeutime=sy-uzeit“当前时间udate=sy-datum“当前日期username=sy-uname“修改人object_change_indicator=Un_zmmsp1=zmmsp1 “修改后的数据记录(单条)o_zmmsp1=zmmsp1_old“修改前的数据记录(单条)upd_zmmsp3=Utablesicdtxt_zmm_sp=icdtxtxzmmsp2=zmmsp2_new“修改后的数据记录(多条)yzmmsp2=zmmsp2_old.“修改前的数据记录(多条)四. SE37创建读出日志并显示的函数Z_READ_HISTORY函数相关属性如下：IMPORTTABLESSource codedata:editpostypetableofcdredwithheaderline,aeditpostypetableofcdredwithheaderline.data:wk_repidtyperepid.iftablekeyisinitial.callfunctionCHANGEDOCUMENT_READexportingobjectclass=objectclassobjectid=objectidusername=usernametablename=tablenametableseditpos=aeditposexceptionsno_position_found=1wrong_access_to_archive=2time_zone_conversion_error=3others=4.else.loopattablekey.callfunctionCHANGEDOCUMENT_READexportingobjectclass=objectclassobjectid=objectidtablekey=tablekey-tabkeytablename=tablenameusername=usernametableseditpos=editposexceptionsno_position_found=1wrong_access_to_archive=2time_zone_conversion_error=3others=4.loopateditpos.appendeditpostoaeditpos.endloop.endloop.endif.ifaeditposisinitial.messages010(zac00).else.iftcodenespace.deleteaeditposwheretcodenetcode.endif.wk_repid=objectclass.callfunctionCHANGEDOCUMENT_DISPLAYexportingi_applicationid=wk_repidi_objectclas=objectclasstablesi_cdred=aeditpos.endif.注: 修改日志在AEDITPOS表中,可以按需自己定义输入的屏幕,不需要调用函数CHANGEDOCUMENT_DISPLAY输出五. 在程序中. 条用Z_READ_HISTORY来显示修改日志.callfunctionZ_READ_HISTORYexportingobjectclass= ZM