kg-xm昆钢bwep项目模型设计mm模板

1、 昆钢BW&EP项目 第43页 共43页昆钢BW&EP项目模型配置文档2008年04月文档管理文 档 地 址应保证该文档是现行的. 已打印的文件和文件副本应由于主文件的更改而作废.该文档可在项目文档服务器中找到, 地址为: 版 本 修 改 历 史本次修改日期: 年 月 日上次修改日期:修改次数修改日期修改概况修改注明批 准该文档需要以下批准. 批准表格归档在 部门姓 名职 位分 发该文档应分发至姓 名职 位 目录 TOC o 1-1 h z HYPERLINK l _Toc196730318 1.说明 PAGEREF _Toc196730318 h 4 HYPERLINK l _Toc1967

2、30319 2.信息范围 InfoArea PAGEREF _Toc196730319 h 5 HYPERLINK l _Toc196730320 3.信息对象 InfoObject PAGEREF _Toc196730320 h 7 HYPERLINK l _Toc196730321 4.R3数据源 PAGEREF _Toc196730321 h 9 HYPERLINK l _Toc196730322 5.BW信息源 PAGEREF _Toc196730322 h 12 HYPERLINK l _Toc196730323 6. 数据目标 Data Target PAGEREF _Toc196

3、730323 h 13 HYPERLINK l _Toc196730324 7.处理链设计 Process Chain PAGEREF _Toc196730324 h 47 HYPERLINK l _Toc196730325 8授权设计 Authorization PAGEREF _Toc196730325 h 481.说明本文当作为模型的数据设计，需要由相关用户审核并签字确认。BW和R3的系统实现将依据此文档进行。以后模型更改后需要在此文档中增加和修改相关内容。2.信息范围 InfoArea信息范围层次设置为:ZKGBW1 昆钢数据仓库平台 ZKGBW1_GG 公共对象 ZKGBW1_FI

4、财务 ZKGBW1_CO 成本 ZKGBW1_PS工程 . ZKGBW1_SD 销售ZKGBW1_MM 采购与库存ZKGBW1_MM_ZC 数据仓库层ZCMM_O09 物料价格和库存金额ZCMM_O03 物料移动凭证ZCMM_O05 物料移动凭证-2005ZCMM_O06 物料移动凭证-2006ZCMM_O07 物料移动凭证-2007ZKGBW1_MM_ZE 原始数据层ZEMM_O09 定期结束库存ZEMM_O12 定期结束库存 (销售订单库存)ZEMM_O04 物料价值重估ZEMM_O10 物料价格ZEMM_O03 物料移动凭证ZEMM_O06 物料移动凭证-2005 ZEMM_O07 物料

5、移动凭证-2006ZEMM_O08 物料移动凭证-2007ZEMM_O01 采购收货和发票校验ZEMM_O02 采购运费 ZKGBW1_MM_ZA 数据分析层ZAMM_C06 月未物料单价和库存金额ZAMM_C07 月未物料工厂库存ZAMM_C04 物料移动凭证ZAMM_C05 物料移动凭证（月汇总）ZAMM_C01 采购收货和发票ZAMM_M02 物料移动凭证ZA_MM_M01 采购收货和发票ZKGBW1_MM_ZM 主数据ZGCWL 工厂物料ZEMM_O05 工厂物料主数据 ZKGBW1_PP 生产 ZKGBW1_QM质量 ZKGBW1_PM 设备 ZKGBW1_HR人力资源3.信息对象

6、InfoObject特性的缺省属性设置项目属性缺省设置一般小写字母空格转换列程空格仅属性空格特性是文档属性空格常数空格业务浏览器显示关键字业务浏览器描述中文本描述选择无限制选择查询定义的F4帮助使用维查询执行的F4帮助关于选定的数据相关的权限空格主数据文本有主数据是带文本是短文本存在是中等长度文本存在是存在长文本是文本语言相关否文本与时间相关否层次无属性无组合无 除非特别说明，新建的特性采用如上缺省设置。特性技术名称描述类型长度详细说明属性(D/N:显示/导航属性)数据源业务处理/事件类型ZCGYWLXCHAR1供应商级别ZGYSJBCHAR2冲消标识ZCSBSCHAR2冷轧/十二棍标识ZPC

7、BS1CHAR1删除标识ZSCBSCHAR1工厂物料ZGCWLCHAR22收货/发货库存地ZSFKCDCHAR4步聚号ZBJHNUMC3生产物料ZSCWLCHAR18税代码ZCGSDMCHAR2计数器ZJSQNUMC2关键指标KEY描述类型/单位聚集说明ZCGSL数量QUANZCGJE按本位币计的金额（采购收货和发票金额）CURRZQMJG2期未单价CURRZQMJGJC期末价格基础QUANZQMKCSL期末库存数量QUANZQMKCJE期末库存金额CURRZCGJEGRIR用本位币计算的GR/IR帐户结算价值CURR4.R3数据源 主数据属性名称2LIS_03_BF文本描述物料移动凭证信息范

8、围是否自动激活No是否自动更新到数据目标No主要用途关键字段信息对象描述数据源字段0DOC_NUMBERBW: 凭证编号KDAUF数据字段信息对象描述数据源字段0ACCOUNT总帐科目编号SAKTO0BASE_UOM基本计量单位MEINS0BATCH批号CHARG0BUS_AREA业务范围GSBER0BWAPPLNM应用程序组件BWAPPLNM0BWCOUNTERBW: 行项目的唯一标识BWCOUNTER0CO_AREA控制范围KOKRS0COMP_CODE公司代码BUKRS0COORDER订单号AUFNR0COSTCENTER成本中心KOSTL0COSTOBJ成本对象KSTRG0CPNOIT

9、EMS项目计数器NOPOS0CPPVLCBW: 按本币的成本值BWGEO0CPQUABUBW: 按基本计量单位的数量BWMNG0CPSTLCBW: 按本币的含税零售值BWGVP0CPSVLCBW: 按本币的零售值BWGVO0CUSTOMER客户的帐户编号KUNNR0DCINDIC借方/贷方标识SHKZG0DLV_COSTS用本币计算的交货成本BNBTR0DOC_DATE凭证中的凭证日期BLDAT0DOC_NUMBER销售订单号KDAUF0DOC_YEAR物料凭证年度MJAHR0FISCVARNT会计年度变式PERIV0ID_VALAREA估价范围BWKEY0INDSPECSTK特定库存的评估K

10、ZBWS0LOC_CURRCY本币WAERS0MAT_DOC物料凭证编号MBLNR0MAT_ITEM物料凭证中的项目ZEILE0MATERIAL物料号MATNR0MATMREA货物移动原因GRUND0ME_REVO_PA获利能力段编号(CO-PA)PAOBJNR0MOVE_PLANT收货工厂/发货工厂UMWRK0MOVETYPE移动类型(库存管理)BWART0NETWORK科目分配的网络号NPLNR0OI_EBELN采购凭证号EBELN0OI_EBELP采购凭证的项目编号EBELP0OI_ERFMG条目单位的数量ERFMG0PLANT工厂WERKS0PROCESSKEYSAP BW 事务代码B

11、WVORG0PROFIT_CTR利润中心PRCTR0PSTNG_DATE凭证中的记帐日期BUDAT0QUANT_B数量MENGE0RECORDMODE？标识符: 取消数据记录ROCANCEL0RT_PROMO操作AKTNR0S_ORD_ITEM销售订单中的条款数KDPOS0SCHED_LINE销售订单交货计划KDEIN0SOLD_TO收货者WEMPF0STOCKCAT后勤信息系统中的库存种类BSTTYP0STOCKRELEVBW: 相关库存BWBREL0STOCKTYPE后勤信息系统库存值BSTAUS0STOR_LOC库存地点LGORT0STRGE_BIN仓位LGPLA0STRGE_TYPE仓

12、储类型LGTYP0UNIT条目单位ERFME0VAL_CLASS评估类BKLAS0VAL_TYPE评估类型BWTAR0VALSPECST特殊库存标识SOBKZ0VALUE_LC按本位币计的金额DMBTR0VENDOR供应商帐户号LIFNR0WBS_ELEMT工作分解结构元素 (WBS 元素)PS_PSP_PNR0WBS_ELM_EX工作细目结构元素 (外部)BWPSPEX0WHSE_NUM仓库号/混合仓库LGNUM 其它索引更新规则一信息源描述销售订单项目数据开始例程结束例程更新规则5.BW信息源 目前我们针对每个源系统创建单独的信息源. 一般我们不建议开发传输例程或者在传输规则时对原始数据做

13、更改.6. 数据目标 Data Target 数据目标指可以更新并存出数据的对象，包括：主数据 MasterData信息块 InfoCube运营数据存储 ODS6.1主数据工厂物料ZGCWL名称ZGCWL文本描述工厂物料类型主数据连接的信息块主要用途主要用于工厂物料所有主数据工厂物料主数据（ZEMM_O05）属性名称ZEMM_O05文本描述抽取工厂物料主数据信息范围是否可以基于ODS做报表是否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源0MATERIAL物料凭证编号MATERIAL0PLANT物料凭证中的项目PLANT数据字段信息对象描述数据源MRP控制员MRP_CONTRL生产

14、调度员0PRODSCHEDPRODSCHED采购组0PUR_GROUPRECORDMODE采购组织0PURCH_ORGPUR_GROUP其它索引更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明其它索引定期结束库存（ZEMM_O09）属性名称ZEMM_O09文本描述定期结束库存信息范围是否可以基于ODS做报表是否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源0COMP_CODE0CURRENCY0FISCPER0FISCVARNT0MATERIAL0PLANT0PRICE_CTRL0STLMT_CTRL0VALUATION0VAL_CLASS公司代码货币会计年

15、度/期间会计年度变式物料工厂价格控制定价评估视图估价类COMP_CODECURRENCYFISCPERFISCVARNTMATERIALPLANTPRICE_CTRLSTLMT_CTRLVALUATIONVAL_CLASS数据字段信息对象描述数据源0STOCK_QTY0UNIT0STOCK_VAL0CURTYPE存货数量计量单位库存值货币类型STOCK_QTYUNITSTOCK_VALCURTYPE其它索引更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明其它索引物料价值重估（ZEMM_O04）属性名称ZEMM_O04文本描述物料价值重估信息范围是否可以基于ODS做报表是

16、否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源0STOCKTYPE0MATERIAL0FISCVARNT0FISCYEAR0DOC_NUM库存类型物料会计年度变式会计年度BW: 凭证编号STOCKTYPEMATERIALFISCVARNTFISCYEARDOC_NUM数据字段信息对象描述数据源0STORNO0RT_PROMO0VAL_CLASS0DOC_DATE0COMP_CODE0BWAPPLNM0MOVETYPE0CPPVLC0CPQUABU0PROCESSKEY0BUS_AREA0SOLD_TO0DCINDIC0CPNOITEMS0LOC_CURRCY0BASE_UOM0C

17、OSTCENTER0CO_AREA0PSTNG_DATE0VENDOR0PLANT0QUANT_B0VALUE_LC0RECORDMODE0STOCKCAT0INDSPECSTK0STOR_LOC冲销标识促销估价类 凭证日期公司代码应用公司移动类型BW: 采购价值 BW: BUnitM 中金额 BW: 交易码 业务范围售达方 借/贷 BW: Number本位币 基本单位成本中心成本控制范围记帐日期供应商 工厂按基本计量单位的数量按本币计的金额 更新模式库存类别专用存货的估价 库存地点STORNORT_PROMOVAL_CLASSDOC_DATECOMP_CODEBWAPPLNMMOVETYPE

18、CPPVLCCPQUABUPROCESSKEYBUS_AREASOLD_TODCINDICCPNOITEMSLOC_CURRCYBASE_UOMCOSTCENTERCO_AREAPSTNG_DATEVENDORPLANTQUANT_BVALUE_LCRECORDMODESTOCKCATINDSPECSTKSTOR_LOC其它索引更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明其它索引物料价格（ZEMM_O10）属性名称ZEMM_O10文本描述物料价格信息范围是否可以基于ODS做报表是否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源0COMP_CODE0CUR

19、TYPE0FISCPER0FISCVARNT0PRICE_CTRL0STLMT_CTRL0VALUATION0VAL_CLASS0VAL_TYPE0PLANT0MATERIAL0PRICE_TYPE0RECORDMODE公司代码货币类型会计年度/期间会计年度变式价格控制定价评估视图估价类 评估类型工厂物料价格类型更新模式COMP_CODECURTYPEFISCPERFISCVARNTPRICE_CTRLSTLMT_CTRLVALUATIONVAL_CLASSVAL_TYPEPLANTMATERIALPRICE_TYPERECORDMODE数据字段信息对象描述数据源0PRICE_MAT0UNIT

20、0CURRENCY0PRICE_BASE物料价格计量单位货币价格的基础数量PRICE_MATUNITCURRENCYPRICE_BASE其它索引更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明其它索引物料移动凭证（ZEMM_O03）属性名称ZEMM_O03文本描述物料移动凭证信息范围是否可以基于ODS做报表是否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源0FISCVARNT0DOC_NUM0DOC_YEAR0DOC_ITEM0BWCOUNTER0MATERIAL0STOCKTYPE会计年度变式BW: 凭证编号BW: 凭证年度BW: 凭证行编号 计数器 物料

21、库存类型FISCVARNTDOC_NUMDOC_YEARDOC_ITEMBWCOUNTERMATERIALSTOCKTYPE数据字段信息对象描述数据源0STORNO0RT_PROMO0VAL_CLASS0STOCKCAT0PSTNG_DATE0COMP_CODE0BWAPPLNM0MOVETYPE0STOCKRELEV0CPPVLC0CPSVLC0CPSTLC0CPQUABU0VAL_TYPE0PROCESSKEY0BATCH0MATMREA0BUS_AREA0COSTCENTER0SOLD_TO0WHSE_NUM0STOR_LOC0STRGE_BIN0STRGE_TYPE0VENDOR0BA

22、SE_UOM0PROFIT_CTR0DCINDIC0LOC_CURRCY0PLANT0CPNOITEMS0CO_AREA0VALUE_LC0COORDER0QUANT_B0MOVE_PLANT0RECORDMODE0RT_RMAPIDA0INDSPECSTK0GN_R3_SSYZSFKCD0DLV_COSTS0ID_VALAREA0WBS_ELM_EX0OI_EBELN0OI_EBELP0DOC_NUMBER0SCHED_LINE0S_ORD_ITEM0NETWORK0ME_REVO_PA0WBS_ELEMT0ACCOUNT0VALSPECST0CHRT_ACCTS0COSTOBJ0CUSTO

23、MER0UNIT0OI_ERFMG冲销标识促销估价类 凭证日期库存类别记帐日期公司代码应用公司移动类型BW: 适当库存BW: 采购价值 BW: 以本币计的零售额以本币计的销售价值 BW: BUnitM 中金额 评估类型BW: 交易码 批次移动原因业务范围成本中心售达方 仓库编号库存地点储存箱 仓储类型供应商 基本单位利润中心借/贷 本位币 工厂BW: Number成本控制范围按本币计的金额 订单编号按基本计量单位的数量收货工厂更新模式RMA 物理库存日期专用存货的估价 R/3 实体的源系统收货/发货库存地 交货成本ID_VALAREAWBS 元素 (外部)采购凭证项目销售凭证 计划行 项目网络

24、获利能力段 (CO-PA)工作分解结构要素科目号 指示符: 专用存货估价会计科目表 成本对象客户计量单位按录入单位的数量STORNORT_PROMOVAL_CLASSDOC_DATESTOCKCATPSTNG_DATECOMP_CODEBWAPPLNMMOVETYPESTOCKRELEVCPPVLCCPSVLCCPSTLCCPQUABUVAL_TYPEPROCESSKEYBATCHMATMREABUS_AREACOSTCENTERSOLD_TOWHSE_NUMSTOR_LOCSTRGE_BINSTRGE_TYPEVENDORBASE_UOMPROFIT_CTRDCINDICLOC_CURRCY

25、PLANTCPNOITEMSCO_AREAVALUE_LCCOORDERQUANT_BMOVE_PLANTRECORDMODERT_RMAPIDAINDSPECSTKGN_R3_SSY/BIC/ZSFKCDDLV_COSTSID_VALAREAWBS_ELM_EXOI_EBELNOI_EBELPDOC_NUMBERSCHED_LINES_ORD_ITEMNETWORKME_REVO_PAWBS_ELEMTACCOUNTVALSPECSTCHRT_ACCTSCOSTOBJCUSTOMERUNITOI_ERFMG其它索引更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明其它索

26、引物料移动凭证-2005（ZEMM_O06）属性名称ZEMM_O06文本描述物料移动凭证-2005信息范围是否可以基于ODS做报表是否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源同物料移动凭证数据字段信息对象描述数据源其它索引更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明其它索引物料移动凭证-2006（ZEMM_O07）属性名称ZEMM_O07文本描述物料移动凭证-2006信息范围是否可以基于ODS做报表是否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源同物料移动凭证数据字段信息对象描述数据源其它索引更新规则一信息源描述 开始例程更新规则数据

27、字段处理说明关键字段的处理说明其它索引物料移动凭证-2007（ZEMM_O08）属性名称ZEMM_O08文本描述物料移动凭证-2007信息范围是否可以基于ODS做报表是否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源同物料移动凭证数据字段信息对象描述数据源其它索引更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明其它索引采购运费（ZEMM_O02）属性名称ZEMM_O05文本描述抽取工厂物料主数据信息范围是否可以基于ODS做报表是否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源0MATERIAL物料凭证编号MATERIAL0PLANT物料凭证中的项

28、目PLANT数据字段信息对象描述数据源MRP控制员MRP_CONTRL生产调度员0PRODSCHEDPRODSCHED采购组0PUR_GROUPRECORDMODE采购组织0PURCH_ORGPUR_GROUP其它索引更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明其它索引采购收货和发票校验（ZEMM_O01）名称ZEMM_O01文本描述抽取采购收货和发票校验的数量和金额信息范围是否可以基于ODS做报表是否自动激活是否自动更新到数据目标主要用途关键字对象描述数据源0MAT_DOC物料凭证编号BELNR0MAT_ITEM物料凭证中的项目BUZEI0DOC_YEAR物料凭证

29、年度GJAHR数据字段信息对象描述数据源ZGSDM公司代码BUKRSZGC工厂WERKS0STOR_LOC库存地点LGORT0PSTNG_DATE凭证中的记帐日期BUDATZGYS供应商编号LIFNR0DOC_NUM采购凭证号EBELN0DOC_ITEM采购凭证的项目编号EBELP0ITM_CAT采购凭证中的项目类别PSTYP0PUR_GROUP采购组EKGRP0PURCH_ORG采购组织EKORGZWL物料号MATNR0MOVETYPE移动类型 (库存管理)BWARTZCGSDM销售/购买税代码MWSKZZCGYWLX业务处理/事件类型,采购订单的历史记录VGABEZCGJE按本位币计的金额

30、(采购收货和发票金额)DMBTRZCGJE_GRIR用本位币计算的GR/IR帐户结算价值AREWR0BASE_UOM基本计量单位LMEINZCGSL 数量 (采购收货和发票数量) MENGE0LOC_CURRCY货币代码（DMBTR/AREWR引用的本位币）WAERS其它索引更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明6.2数据分析层物料移动凭证（ZAMM_C04）属性名称ZAMM_C04文本描述物料移动凭证是否分区NO主要用途物料移动凭证数据结构定义维行特性导航属性 说明组织机构 0MOVE_PLANT收货工厂/发货工厂ZGC工厂ZGSDM公司代码ZKCD库存地Z

31、SFKCD收货/发货库存地时间维0CALDAY日历天0CALMONTH2日历月20CALMONTH日历年/月 0CALQUARTER1日历季度0CALYEAR日历年 关键指标单位0BASE_UOM基本计量单位0LOC_CURRCY本位币更新规则一信息源描述物料移动凭证数据开始例程结束例程更新规则更新对象更新规则更新说明 ZGCWL工厂物料CONCATENATE( /BIC/ZGC, /BIC/ZWL ) 采购收货和发票（ZAMM_C01）属性名称ZAMM_C01文本描述采购收货和发票是否分区NO主要用途用于采购收货和发票结构定义维行特性导航属性 说明时间维0CALDAY日历天0CALMONTH

32、2日历月20CALMONTH日历年/月 0CALQUARTER1日历季度0CALYEAR日历年 关键指标单位0STAT_CURR统计货币更新规则一信息源ZAMM_C01描述采购收货和发票开始例程结束例程更新规则更新对象更新规则更新说明按本位币计的金额（采购收货和发票金额）ZCGJEIF SOURCE_FIELDS-DCINDIC = H. RESULT = - SOURCE_FIELDS-/BIC/ZCGJE. ELSE. RESULT = SOURCE_FIELDS-/BIC/ZCGJE.ENDIF.数量 (采购收货和发票数量) ZCGSLIF SOURCE_FIELDS-DCINDIC =

33、 H. RESULT = - SOURCE_FIELDS-/BIC/ZCGSL. ELSE. RESULT = SOURCE_FIELDS-/BIC/ZCGSL. ENDIF.用本位币计算的GR/IR帐户结算价值 ZCGJEGRIRIF SOURCE_FIELDS-DCINDIC = H.RESULT = - SOURCE_FIELDS-/BIC/ZCGJEGRIR.ELSE.RESULT = SOURCE_FIELDS-/BIC/ZCGJEGRIR.ENDIF.采购收货和发票（ZA_MM_M01）名称ZA_MM_M01文本描述采购收货和发票类型CUBE连接的信息块物料移动凭证 ZAMM_C0

34、4采购收货和发票 ZAMM_C01主要用途主要用于采购金额，数量的分析6.3数据仓库层物料价格和库存金额ZCMM_O09名称ZCMM_O09文本描述物料价格和库存金额类型ODS连接的信息块主要用途主要用于物料价格和库存金额数据更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明日历年/月0CALMONTH DATA: MONITOR_REC TYPE rsmonitor.*$*$ begin of routine - insert your code only below this line *-* . insert your code here DATA ZNY TYPE

35、 /BI0/OICALMONTH. ZNY+0(4) = SOURCE_FIELDS-FISCPER+0(4). IF SOURCE_FIELDS-FISCPER+5(2) 12. ZNY+4(2) = 12. ELSE. ZNY+4(2) = SOURCE_FIELDS-FISCPER+5(2). ENDIF.*- fill table MONITOR with values of structure MONITOR_REC*- to make monitor entries . to cancel the update process* raise exception type CX_RS

36、ROUT_ABORT. . to skip a record* raise exception type CX_RSROUT_SKIP_RECORD. . to clear target fields* raise exception type CX_RSROUT_SKIP_VAL. RESULT = ZNY.期未单价 ZQMJG2* 取期未单价，保留8位小数。DATA I_ZQMJG LIKE RESULT.IF SOURCE_FIELDS-STOCK_QTY 0. RESULT = SOURCE_FIELDS-STOCK_VAL / SOURCE_FIELDS-STOCK_QTY.ELSE

37、. SELECT Single PRICE_MAT INTO I_ZQMJG FROM /BIC/AZEMM_O1000 WHERE CURTYPE = 10 AND FISCPER = SOURCE_FIELDS-FISCPER AND FISCVARNT = SOURCE_FIELDS-FISCVARNT AND VALUATION = SOURCE_FIELDS-VALUATION AND VAL_CLASS = SOURCE_FIELDS-VAL_CLASS AND VAL_TYPE = SOURCE_FIELDS-VAL_TYPE AND STLMT_CTRL = SOURCE_FI

38、ELDS-STLMT_CTRL AND PRICE_CTRL = SOURCE_FIELDS-PRICE_CTRL AND PLANT = SOURCE_FIELDS-PLANT AND MATERIAL = SOURCE_FIELDS-MATERIAL AND COMP_CODE = SOURCE_FIELDS-COMP_CODE AND PRICE_TYPE = P02. IF sy-subrc = 0 . RESULT = I_ZQMJG. ELSE. RESULT = 0. endif.ENDIF.期末价格基础ZQMJGJC SELECT Single PRICE_BASE INTO

39、I_ZQMJGJC FROM /BIC/AZEMM_O1000 WHERE CURTYPE = 10 AND FISCPER = SOURCE_FIELDS-FISCPER AND FISCVARNT = SOURCE_FIELDS-FISCVARNT AND VALUATION = SOURCE_FIELDS-VALUATION AND VAL_CLASS = SOURCE_FIELDS-VAL_CLASS AND VAL_TYPE = SOURCE_FIELDS-VAL_TYPE AND STLMT_CTRL = SOURCE_FIELDS-STLMT_CTRL AND PRICE_CTR

40、L = SOURCE_FIELDS-PRICE_CTRL AND PLANT = SOURCE_FIELDS-PLANT AND MATERIAL = SOURCE_FIELDS-MATERIAL AND COMP_CODE = SOURCE_FIELDS-COMP_CODE AND PRICE_TYPE = P02. IF sy-subrc = 0 . RESULT = I_ZQMJGJC. ELSE. RESULT = 0. endif.开始例程删除货币类型不为公司代码货币的数据 METHOD start_routine.*= Segments = FIELD-SYMBOLS: TYPE

41、_ty_s_SC_1. DATA: MONITOR_REC TYPE rstmonitor.*$*$ begin of routine - insert your code only below this line *-* . insert your code here*删除货币类型不为公司代码货币的数据* DELETE SOURCE_PACKAGE WHERE CURTYPE 10.*- fill table MONITOR with values of structure MONITOR_REC*- to make monitor entries . to cancel the updat

42、e process* raise exception type CX_RSROUT_ABORT.结束例程增加销售订单库存删除价格为零的数据*增加销售订单库存* DATA I_TAB TYPE STANDARD TABLE OF /BIC/AZEMM_O1200. DATA I_LTAB LIKE LINE OF I_TAB. DATA I_RESULT LIKE LINE OF RESULT_PACKAGE. DATA I_LIN TYPE I. LOOP AT RESULT_PACKAGE INTO I_RESULT. refresh I_TAB. SELECT * INTO CORRESP

43、ONDING FIELDS OF TABLE I_TAB FROM /BIC/AZEMM_O1200 WHERE CURTYPE = 10 AND FISCPER = I_RESULT-FISCPER AND VAL_CLASS = I_RESULT-VAL_CLASS AND STLMT_CTRL = I_RESULT-STLMT_CTRL AND PRICE_CTRL = I_RESULT-PRICE_CTRL AND MATERIAL = I_RESULT-/BIC/ZWL AND PLANT = I_RESULT-/BIC/ZGC AND COMP_CODE = I_RESULT-/B

44、IC/ZGSDM. DESCRIBE TABLE I_TAB LINES I_LIN. if I_LIN 0. I_RESULT-/BIC/ZQMJGJC = 1. LOOP AT I_TAB INTO I_LTAB. I_RESULT-/BIC/ZQMKCSL = I_RESULT-/BIC/ZQMKCSL + I_LTAB-STOCK_QTY. I_RESULT-/BIC/ZQMKCJE = I_RESULT-/BIC/ZQMKCJE + I_LTAB-STOCK_VAL. ENDLOOP. IF I_RESULT-/BIC/ZQMKCSL 0. I_RESULT-/BIC/ZQMJG2

45、= I_RESULT-/BIC/ZQMKCJE / I_RESULT-/BIC/ZQMKCSL. ENDIF. MODIFY RESULT_PACKAGE FROM I_RESULT. ENDIF. ENDLOOP.*删除价格为零的数据* DELETE RESULT_PACKAGE WHERE /BIC/ZQMJG2 = 0 AND /BIC/ZQMKCJE = 0 AND /BIC/ZQMKCSL = 0.*- fill table MONITOR with values of structure MONITOR_REC*- to make monitor entries . to canc

46、el the update process物料移动凭证 ZCMM_O03名称ZCMM_O03文本描述物料移动凭证类型ODS连接的信息块主要用途主要用于存储物料移动凭证数据更新规则一信息源描述 开始例程更新规则数据字段处理说明关键字段的处理说明生产物料ZSCWL DATA: MONITOR_REC TYPE rsmonitor.*$*$ begin of routine - insert your code only below this line *-*. insert your code here*- fill table MONITOR with values of structure M

47、ONITOR_REC*- to make monitor entriesIF SOURCE_FIELDS-COORDER ne . select SINGLE material into RESULT from /BIC/AZEPP_O0100 where prodorder = SOURCE_FIELDS-COORDER.else. RESULT = .endif.生产版本ZSCBB DATA: MONITOR_REC TYPE rsmonitor.*$*$ begin of routine - insert your code only below this line *-*. inser

48、t your code hereIF SOURCE_FIELDS-COORDER ne . select SINGLE PRODVERS into RESULT from /BIC/AZEPP_O0100 where prodorder = SOURCE_FIELDS-COORDER.else. RESULT = .endif.数值接收到已评估库存0RECVS_VAL IF ( SOURCE_FIELDS-processkey EQ 000 Other Receipts OR SOURCE_FIELDS-processkey EQ 001 Goods Receipt / Vendor OR S

49、OURCE_FIELDS-processkey EQ 004 Material Transfer / Receipt OR SOURCE_FIELDS-processkey EQ 005 Stock Adjustment InvD OR SOURCE_FIELDS-processkey EQ 006 Stock Adjustment Other OR SOURCE_FIELDS-processkey EQ 010 ) Receipt from Stock Transfer AND SOURCE_FIELDS-bwapplnm EQ MM* only movements which are re

50、levant for stock control AND SOURCE_FIELDS-stockrelev EQ 1 AND SOURCE_FIELDS-cppvlc 0* see OSS note 630254 AND ( SOURCE_FIELDS-stockcat IS INITIAL OR ( SOURCE_FIELDS-stockcat CA EQ AND SOURCE_FIELDS-indspecstk CA AM ) ).* result value of the routine RESULT = SOURCE_FIELDS-cppvlc. ENDIF.从评估的库存发布数值0IS

51、SVS_VAL*ISSVS_VAL 发货价值: 已估价的库存 IF ( SOURCE_FIELDS-processkey EQ 100 Other Issues OR SOURCE_FIELDS-processkey EQ 101 Returns / Vendor OR SOURCE_FIELDS-processkey EQ 104 Material Transfer OR SOURCE_FIELDS-processkey EQ 105 Stock Adjustment InvD OR SOURCE_FIELDS-processkey EQ 106 Stock Adjustment Other

52、 OR SOURCE_FIELDS-processkey EQ 110 ) Issues from Stock Transfers AND SOURCE_FIELDS-bwapplnm EQ MM* only movements which are relevant for stock control AND SOURCE_FIELDS-stockrelev EQ 1 AND SOURCE_FIELDS-cppvlc 0* see OSS note 630254 AND ( SOURCE_FIELDS-stockcat IS INITIAL OR ( SOURCE_FIELDS-stockca

53、t CA EQ AND SOURCE_FIELDS-indspecstk CA AM ) ).* result value of the routine RESULT = SOURCE_FIELDS-cppvlc.ENDIF.总库存接收数量0RECTOTSTCK IF ( SOURCE_FIELDS-processkey EQ 000 Other Receipts OR SOURCE_FIELDS-processkey EQ 001 Goods Receipt / Vendor OR SOURCE_FIELDS-processkey EQ 004 Material Transfer / Rec

54、eipt OR SOURCE_FIELDS-processkey EQ 005 Stock Adjustment InvD OR SOURCE_FIELDS-processkey EQ 006 Stock Adjustment Other OR SOURCE_FIELDS-processkey EQ 010 ) Receipt from Stock Transfer AND SOURCE_FIELDS-bwapplnm EQ MM* only movements which are relevant for stock control AND SOURCE_FIELDS-stockrelev

55、EQ 1 AND SOURCE_FIELDS-cpquabu 0.* result value of the routine RESULT = SOURCE_FIELDS-cpquabu.* if the returncode is zero, the result will be updatedENDIF.发出数量总库存0ISSTOTSTCK IF ( SOURCE_FIELDS-processkey EQ 100 Other Issues OR SOURCE_FIELDS-processkey EQ 101 Returns / Vendor OR SOURCE_FIELDS-process

56、key EQ 104 Material Transfer OR SOURCE_FIELDS-processkey EQ 105 Stock Adjustment InvD OR SOURCE_FIELDS-processkey EQ 106 Stock Adjustment Other OR SOURCE_FIELDS-processkey EQ 110 ) Issue from Stock Transfer AND SOURCE_FIELDS-bwapplnm EQ MM* only movements which are relevant for stock control AND SOURCE_FIELDS-stockrelev EQ 1 AND