mro模型需求管理项目类-v4改

1、中国数据模型设计功能书需求管理需求项目ZMROCRE03修改客户确认：版本日期作者状态审核1.02005-8-1编写设计文档2.02005-8-11修改设计文档3.02005-12-1赵珅修改设计文档4.02006-4-2修改设计文档目录1.需求描述52.数据模型（星型结构）63.数据模型（技术特性）..特性（CH）7时间特性7关键指标（KF）8ODS 对象..3.ZMRORE03(需求项目)9ZMRORE01(需求-预留)10ZMROPU01 (采购凭证信息)103.5.INFOCUBE..3.Bas

2、isCube11MultiCube12RemoteCube123.6.AGGREGATE13无 AGGREGATE 应用13数据源系统分析144.4.1.DATASOURCEZMRORE03_T01_D01 （需求信息源：标准预留）145.数据流.DATA FLOW17TRANSFER RULE185.3.UPDATE RULE20ODS Infocube20Infosource ODS35QUERY406.按工程项目查询需求计划(ZMROCRE03_Q01)40AUTHORIZATION427.1. 需求描述附件下列文件详细描述了本文档所涉及的各个部门业务分析需求文件名称状

3、态2. 数据模型（星型结构）时间凭证日期日历天数据请求日/月数据请求包基本日物料事实表物料 物料组物料组大类物料组中类专业类型DimenID数量采购申请数量需求日期工程项目工程项目索引号需求提前期移动类型需求提前期移动类型组织结构公司3. 数据模型（技术特性）3.1. 特性（CH）3.2. 时间特性GerneralBexInfo-Object (CH)Techn. NameData- typeData- lengthDisplay AttributeConvert. RoutinText in Spalt HeaderAuth. Relev.Others日历天0CALDAYDATS8日/月0C

4、ALMONTHNUMC6日0CALYEARNUMC4GeneralBexMaster DataInfo-Object (CH)Techn. NameData TypeDaten- lengthDisplay- AttributeConvert. RoutinText in Spalt headerAuth. Relev.Master Data?Time Dependent?公司代码0COMP_CODECHAR4物料0MATERIALCHAR18MATN1物料组0M_GROU PCHAR9物料组大类ZMRLARGECHAR9物料组中类ZMRMEDIUMCHAR9专业类型ZMRMAJORCHAR9

5、需求提前期ZMRPRDATCHAR6工程项目索引号ZMRPSCHAR24凭证日期0DOC_DATEDATS-日期字段8移动类型0MOVETYPECHAR33.3. 关键指标（KF）Type / UnitAggregationInfo-Object (KF)Aggregation Min, Max, SumException-Agg. Reference characteristicTechn. NameKF-TypeUnitOthersaggregation数量0TYQUAN0UNITSUM累加需求日期ZMRBDTERDECSUM累加ZMRMENGEQUAN0UNITSUM采购申请数量累加Ad

6、ditional PropertiesInfo-Object (KF)Decimal-PlaDisplayBex Description数量需求日期采购申请数量ODS 对象ZMRORE03(需求项目)ODSObjectTechn. NameFieldsTechn. NameDaypeData-lengthKey-fields0COMP_CODECHAR4公司代码ZDMPLNNUMC12需求计划号ZLNNBRNUMC4条目号ZMRBANFNCHAR10采购申请ZMRBNFPONUMC5采购申请项目工程项目索引号ZMRPSCHAR24物料0MATERIALCHAR18物料组0M_GROUPCHAR

7、9采购申请数量ZMRMENGEQUAN9需求项目ZMRORE03计量0UNITUNIT30TYQUAN9数量0CALDAYDATS8提报日期ZMRBDTERDEC需求日期0CH_ONDATS8更改日期0MOVETYPECHAR3移动类型工厂0PLANTCHAR40CALDAYDATS8日历天预留ZMRRSNUMNUMC10预留行项目ZMRRSNUMC43.4.2. ZMRORE01(需求-预留)参考需求预留+采购申请设计文档3.4.3. ZMROPU01 (采购凭证信息)参考采购设计文档3.5. InfoCube3.5.1. BasisCubeBasisCube: ZMROCRE03Chara

8、cteristicsDimenCharacteristicsNavigation AttributRemark物料物料物料组工业标准描述旧物料号公司公司代码工程项目索引号时间需求提前期需求提前期移动类型移动类型No.InfoCubeTechn. NameInfoAreaBasis-CubeMulti-CubeRemote-Cube1需求-项目ZMROCRE03ZMRO_RETime CharacteristicsCharacteristicsTechn. NameRemark0DOC_DATE凭证日期0CALDAY日历天0CALMONTH日/月0CALYEAR日Key FirgureNo.Ke

9、y FigureTechn. NameUnit10UNIT0TY数量20UNITZMRBDTER需求日期30UNITZMRMENGE采购申请数量3.5.2. MultiCube无 MultiCube 应用3.5.3. RemoteCube无 RemoteCube 应用RemoteCubeTechn. NameCharacteristicsKey FigureRelated Source SystemRemarkMultiCubeTechn. NameCharacteristicsKey FigureRelated Basis-CubeRemark3.6. Aggregate无 Aggregat

10、e 应用AggregatTechn. NameCubeCharacteristics/ AttributeAggregation LevelRemark4. 数据源系统分析4.1. DataSourceZMRORE03_T01_D01（需求信息源：标准预留）Extractor Structure Update ModeDelta Field Field Type：ZOXD000400：Delta Update：ERDAT：Time stDel Infosetype：New sus for changed records：MRO_RESB_PJJoin Definition：ZMEHQ001RE

11、SBTable NameEBANRSNUMRSNUMRSRSField NameBANFNBANFNBNFPOBNFPOCoding Section：Record ProsingField GroupRelative Field字段描述CodeZDMPLN需求计划号ZLNNBR条目号RSNUM预留ZMRPS ZMRPS= ZMEHQ001-ZDMPLN .ZLNNBR.BANFN采购申请号check not ZMEHQ001-RSNUM is initial or not ZMEHQ001-BANFN is initial.if RESB-SHKZG = S.RESB-BDMNG = ( -1

12、 ) * RESB-BDMNG.endif.IF EBAN-MATKL is initial.EBAN-MATKL = RESB-MATKL . ENDIF.XLOEK项目已删除ZMEHQ001BDMNG需求数量SHKZG借/贷标志LOEKZ采购凭证已删除MENGE采购申请数量MATKL物料组ZMRPS附加字段项目索引号Data Fields：TableField Name字段描述ZMEHQ001BUKRS需求者名称ZDMPLN需求计划号ZLNNBR条目号MATNR物料LFDAT交货日期AEDAT更改日期ZMVTTY移动类型RS预留项目RSNUM预留BANPO采购申请项目BANFN采购申请号E

13、BANFRGKZ批准标识FRGZU批准状态MENGE采购申请数量ERDAT更改日期MATKL物料组LOEKZ采购申请删除标识RESBBDMNG需求数量XLOEK预留删除标识XWAOK允许预订移动附加字段ZMRPS项目索引号数据流Data Flow5.2. Transfer RuleMethod F= Trans.-Field C= Constante R = RoutineField Name/ ConstantInfoSourceInfoObjectTech. NameRoutin Description0COMP_CODEC2610公司代码IF TRAN_STRUCTURE-BANFN =

14、 . RESULT = .ELSE.RESULT = TRAN_STRUCTURE-MENGE. ENDIF.采购申请数量ZMRMENGER计量0UNITFMEINS002if TRAN_STRUCTURE-BANFN+0(1) 0. if TRAN_STRUCTURE-BANFN .concatenate 00 TRAN_STRUCTURE-banfn o RESULT.endif. else.RESULT = TRAN_STRUCTURE-banfn.endif.采购申请ZMRBANFNRZMRORE03_T01(以仪征为例)0M_GROUPFZMATKL物料组0CH_ONF0CALDAY

15、更改日期0MOVETYPEFZMVTTY移动类型0MATERIALFMATNR物料工厂0PLANTFZIPLNT需求日期ZMRBDTERFLFDATIF TRAN_STRUCTURE-RSNUM = . RESULT = .ELSE.RESULT = TRAN_STRUCTURE-MENGE. ENDIF.0TYR数量基本0BASE_UOMFMEINS日历天0CALDAYFAEDATInfoSourceInfoObjectTech. NameMethod F= Trans.-Field C= Constante R = RoutineField Name/ ConstantRoutin Des

16、cription工程项目索引号ZMRPSFZPRJNO需求计划号ZDMPLNFZDMPLN条目号ZLNNBRFZLNNBR预留ZMRRSNUMFRSNUM采购申请批准标识ZMRFRGKZRIF TRAN_STRUCTURE-FRGKZ EQ P.RESULT = TRAN_STRUCTURE-FRGKZ. ELSE.RESULT = .ENDIF.预留删除标识ZMRXLOEKFXLOEK采购申请删除标识ZMRLOEKZFLOEKZ允许移动标识ZMRXWAOKFXWAOKUpdate RuleODS InfocubeStart Routine需求-项目（8ZMRORE03）orDATA_PACK

17、AGE-M_GROUP+0(6) = 080112data: CODE type i.orDATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(6) = 080114.loop at DATA_PACKAGE.* reset CODE = -1.CODE = -1.if DATA_PACKAGE-M CODE = 28.else.case DATA_PACKAGE-Mwhen 01 or 04 or 20.CODE = 0._GROUP = .when 0803.if DATA_PACKAGE-M CODE = 28.else.CODE =

18、 0.endif._GROUP+0(6) = 080306._GROUP+0(2).when 02.if DATA_PACKAGE-M DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif._GROUP+0(4) = 0205 or_GROUP+0(4) = 0227.when 0813.CODE = 0.when others.CODE = 28.endcase.when 06.if DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif.when 10.case DATA_PACKAGE-M_GROUP+0(4) = 0

19、601._GROUP+0(4).when 1001 or 1005 or 1007 or 1009.CODE = 0.when 1003.if DATA_PACKAGE-M CODE = 28.else.CODE = 0._GROUP+0(6) = 100314.when 08.case DATA_PACKAGE-Mwhen 0801.if DATA_PACKAGE-M_GROUP+0(4)._GROUP+0(6) = 080110endif.when 35.if DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif._GROUP+0(6) = 350102

20、.when others.CODE = 28.endcase.when 30.case DATA_PACKAGE-M_GROUP+0(4).when 40.if DATA_PACKAGE-M DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif.when 3039 or 3045 or 3053.CODE = 0._GROUP+0(4) = 4001 or_GROUP+0(4) = 4007.when 3037.if DATA_PACKAGE-M DATA_PACKAGE-M DATA_PACKAGE-M CODE = 28.else.CODE = 0.en

21、dif._GROUP+0(6) = 303702 or_GROUP+0(6) = 303704 or_GROUP+0(6) = 303712.when others.CODE = 28.endcase. endif.when others.CODE = 28.if CODE = 28.DELETE DATA_PACKAGE.endif. endloop.endcase.Start Routine采购凭证信息（8ZMROPU01）ordata: CODE type i.DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(6) = 08011

22、4.loop at DATA_PACKAGE.* reset CODE = -1.CODE = -1.if DATA_PACKAGE-M CODE = 28.else.case DATA_PACKAGE-Mwhen 01 or 04 or 20.CODE = 0._GROUP = .when 0803.if DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(6) = 080306._GROUP+0(2).when 02.if DATA_PACKAGE-M DATA_PACKAGE-M CODE = 0.else.CODE = 28.en

23、dif.when 0813.CODE = 0._GROUP+0(4) = 0205 or_GROUP+0(4) = 0227.when others.CODE = 28.endcase.when 10.case DATA_PACKAGE-Mwhen 06.if DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif._GROUP+0(4)._GROUP+0(4) = 0601.when 1001 or 1005 or 1007 or 1009.CODE = 0.when 1003.if DATA_PACKAGE-M CODE = 28.else.CODE =

24、0.endif._GROUP+0(6) = 100314.when 08.case DATA_PACKAGE-Mwhen 0801.if DATA_PACKAGE-M_GROUP+0(4)._GROUP+0(6) = 080110orwhen others.CODE = 28.DATA_PACKAGE-M_GROUP+0(6) = 080112endcase.when 40.if DATA_PACKAGE-M DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif.when 30.case DATA_PACKAGE-M_GROUP+0(4) = 4001 or

25、_GROUP+0(4) = 4007._GROUP+0(4).when 3039 or 3045 or 3053.CODE = 0.when 3037.if DATA_PACKAGE-M DATA_PACKAGE-M DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(6) = 303702 or_GROUP+0(6) = 303704 or_GROUP+0(6) = 303712.when others.CODE = 28.endcase. endif.if CODE = 28.DELETE DATA_PACKAGE.endif.whe

26、n others.CODE = 28.endcase.IF (P_CODE EQ 2230 ANDDATA_PACKAGE-DOCTYPE EQ NB ).when 35.if DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif.P_CODE = 2241._GROUP+0(6) = 350102.ELSE.delete DATA_PACKAGE index sy-tabix.ENDIF .endloop.Start Routine需求预留（8ZMRORE01）DATA_PACKAGE-M_GROUP+0(6) = 080112ordata: CODE t

27、ype i.DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(6) = 080114.loop at DATA_PACKAGE.* reset CODE = -1.CODE = -1.if DATA_PACKAGE-M CODE = 28.else.case DATA_PACKAGE-Mwhen 01 or 04 or 20.CODE = 0._GROUP = .when 0803.if DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(6) = 080306._GROUP+0(

28、2).when 02.if DATA_PACKAGE-M DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif.when 0813.CODE = 0._GROUP+0(4) = 0205 or_GROUP+0(4) = 0227.when others.CODE = 28.endcase.when 10.case DATA_PACKAGE-Mwhen 06.if DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif._GROUP+0(4)._GROUP+0(4) = 0601.when 1001 or 1005 or 10

29、07 or 1009.CODE = 0.when 1003.if DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(6) = 100314.when 08.case DATA_PACKAGE-Mwhen 0801.if DATA_PACKAGE-M_GROUP+0(4)._GROUP+0(6) = 080110orwhen others.CODE = 28.endcase.when 40.if DATA_PACKAGE-M DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif._GROUP+0(4)

30、= 4001 or_GROUP+0(4) = 4007.when 30.case DATA_PACKAGE-M_GROUP+0(4).when 3039 or 3045 or 3053.CODE = 0.when 3037.if DATA_PACKAGE-M DATA_PACKAGE-M DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif.when others.CODE = 28.endcase. endif._GROUP+0(6) = 303702 or_GROUP+0(6) = 303704 or_GROUP+0(6) = 303712.if COD

31、E = 28.DELETE DATA_PACKAGE.endif.when others.CODE = 28.endcase.IF not (P_CODE eq 1460 ORP_CODE eq 1180 or P_CODE eq 2480 ORDATA_PACKAGE-MOVETYPE eq 281 OR DATA_PACKAGE-MOVETYPE eq 282 or DATA_PACKAGE-MOVETYPE eq 221 ORwhen 35.if DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif._GROUP+0(6) = 350102.DATA_

32、PACKAGE-MOVETYPE eq 222 ) .delete DATA_PACKAGE index sy-tabix.ENDIF .endloop.Key FigureCubeUpdate RuleKey FigureMethod S= Source Field C = Constante M = Master AttributeR = RoutineI = Initial ValueField Name/ ConstantRoutin DescriptionZMROCRE038ZMRORE030TY数量S0TY数量ZMRBDTER需求日期SZMRBDTER需求日期ZMRMENGE采购申

33、请数量SZMRMENGE采购申请数量ZMROCRE038ZMROPU010TY数量S0PO_QTY订单数量ZMRBDTER需求日期RRESULT = COMM STRUCTURE- SCL_DELDAT.ZMROCRE038ZMRORE04ZMRMENGE采购申请数量SZMRMENGE采购申请数量ZMROCRE03ZMRORE010TY数量S0TY数量ZMRBDTER需求日期SZMRBDTER需求日期Characteristics and Time CharacteristicsCubeUpdate RuleInfoObjectMethodC = ConstantM = Master Attr

34、ibut R = RoutineI = Initial Value S = Source FieldField Name/ ConstantRoutine DescriptionZMROCRE038ZMRORE03ZMRMAJOR专业类型Rcase COMM_STRUCTURE-M_GROUP+0(2).when 08 or 10 or 11 or 12 or 15.RESULT = 1.when 01 or 02 or 03 or 05 or 06 or 07 or 42.RESULT = 2.when 04 .RESULT = 3.when 20 or 21 or 22 or 23 or

35、24 or 25 or 26 or27 or 28 or 29 or 30 or 31 or 32 or 33 or34 or 35 or 36 or 37 or 38 or 39 or 46.RESULT = 4.when 40 or 41 or 43 or 44 or 45 or 47 or 48 or49 or 50 or 51 or 52 or 53 or 54 or 55.RESULT = 5.when 09 or 13 or 14 or 16 or 17 or 18 or 19 or56.RESULT = 6.endcase.ZMROCRE038ZMRORE03ZMRLARGE物料

36、组大类Rif COMM_STRUCTURE-M_GROUP .RESULT = COMM_STRUCTURE- M_GROUP(2).endif.ZMROCRE038ZMRORE03ZMRMEDIUM物料组中类Rif COMM_STRUCTURE-M_GROUP . RESULT = COMM_STRUCTURE-M_GROUP(4).endif.ZMROCRE038ZMRORE03ZMRMEDIUM物料组Rif COMM_STRUCTURE-M_GROUP .RESULT = COMM_STRUCTURE-M_GROUP.endif.ZMROCRE038ZMRORE03ZMRPRDATRDA

37、TA: T_DATE LIKE COMM_STRUCTURE-CubeUpdate RuleInfoObjectMethodC = ConstantM = Master Attribut R = RoutineI = Initial Value S = Source FieldField Name/ ConstantRoutine Description需求提前期/BIC/ZMRBDTER. CLEAR: T_DATE.* result value of the routineT_DATE = COMM_STRUCTURE-CALDAY.if COMM_STRUCTURE-/BIC/ZMRBD

38、TER = T_DATE.RESULT = COMM_STRUCTURE-/BIC/ZMRBDTER - T_DATE.else.RESULT = 0.endif.ZMROCRE038ZMRORE030MATERIAL物料S0MATERIAL物料ZMROCRE038ZMRORE030COMP_CODE公司代码R参见BT上的具体例程ZMROCRE038ZMRORE030DOC_DATE凭证日期RRESULT = ABS (COMM_STRUCTURE-/BIC/ZMRBDTER).ZMROCRE038ZMRORE03ZMRPS工程项目索引号SZMRPS工程项目索引号ZMROCRE038ZMROP

39、U01ZMRMAJOR专业类型Rcase COMM_STRUCTURE-M_GROUP+0(2).when 08 or 10 or 11 or 12 or 15.RESULT = 1.when 01 or 02 or 03 or 05 or 06 or 07 or42.RESULT = 2.when 04 .RESULT = 3.when 20 or 21 or 22 or 23 or 24 or 25 or26 or27 or 28 or 29 or 30 or 31 or 32 or 33CubeUpdate RuleInfoObjectMethodC = ConstantM = Mast

40、er Attribut R = RoutineI = Initial Value S = Source FieldField Name/ ConstantRoutine Descriptionor34 or 35 or 36 or 37 or 38 or 39 or 46.RESULT = 4.when 40 or 41 or 43 or 44 or 45 or 47 or48 or49 or 50 or 51 or 52 or 53 or 54 or 55.RESULT = 5.when 09 or 13 or 14 or 16 or 17 or 18 or19 or56.RESULT =

41、6.endcase.ZMROCRE038ZMROPU01ZMRLARGE物料组大类Rif COMM_STRUCTURE-M_GROUP .RESULT = COMM_STRUCTURE- M_GROUP(2).endif.ZMROCRE038ZMROPU01ZMRMEDIUM物料组中类Rif COMM_STRUCTURE-M_GROUP .RESULT = COMM_STRUCTURE- M_GROUP(4).endif.if the returncode is not equal zero, the result will not be updatedRETURNCODE = 0.if ab

42、ort is not equal zero, the update pros will be canceledABORT = 0.ZMROCRE038ZMROPU010COMP_CODE公司代码 2C2241ZMROCRE038ZMROPU010MATERIAL物料S0MATERIAL物料ZMROCRE038ZMROPU01ZMRPS工程项目索引号SZMRPS工程项目索引号CubeUpdate RuleInfoObjectMethodC = ConstantM = Master Attribut R = RoutineI = Initial Value S = Source FieldFiel

43、d Name/ ConstantRoutine DescriptionZMROCRE038ZMROPU01ZMRPRDAT需求提前期RDATA: T_DATE LIKE COMM_STRUCTURE- SCL_DELDAT.CLEAR: T_DATE.* result value of the routineT_DATE = COMM_STRUCTURE-CALDAY.if COMM_STRUCTURE-SCL_DELDAT = T_DATE.RESULT = COMM_STRUCTURE-SCL_DELDAT - T_DATE.else.RESULT = 0.endif.ZMROCRE038

44、ZMROPU010DOC_DATE凭证日期RRESULT = COMM_STRUCTURE-SCL_DELDAT.ZMROCRE038ZMRORE04ZMRMAJOR专业类型Rcase COMM_STRUCTURE-M_GROUP+0(2).when 08 or 10 or 11 or 12 or 15.RESULT = 1.when 01 or 02 or 03 or 05 or 06 or 07 or42.RESULT = 2.when 04 .RESULT = 3.when 20 or 21 or 22 or 23 or 24 or 25 or26 or27 or 28 or 29 or

45、 30 or 31 or 32 or 33or34 or 35 or 36 or 37 or 38 or 39 or 46.RESULT = 4.when 40 or 41 or 43 or 44 or 45 or 47 or48 or49 or 50 or 51 or 52 or 53 or 54 or 55.RESULT = 5.CubeUpdate RuleInfoObjectMethodC = ConstantM = Master Attribut R = RoutineI = Initial Value S = Source FieldField Name/ ConstantRout

46、ine Descriptionwhen 09 or 13 or 14 or 16 or 17 or 18 or19 or56.RESULT = 6.endcase.ZMROCRE038ZMRORE04ZMRLARGE物料组大类Rif COMM_STRUCTURE-M_GROUP .RESULT = COMM_STRUCTURE- M_GROUP(2).endif.ZMROCRE038ZMRORE04ZMRMEDIUM物料组中类Rif COMM_STRUCTURE-M_GROUP .RESULT = COMM_STRUCTURE- M_GROUP(4).endif.ZMROCRE038ZMROR

47、E040COMP_CODE公司代码 2S0COMP_CODE公司代码 2ZMROCRE038ZMRORE040MATERIAL物料S0MATERIAL物料ZMROCRE038ZMRORE040M_GROUP物料组S0M_GROUP物料组ZMROCRE038ZMRORE04ZMRPS工程项目索引号SZMRPS工程项目索引号ZMROCRE038ZMRORE01ZMRMAJOR专业类型Rcase COMM_STRUCTURE-M_GROUP+0(2).when 08 or 10 or 11 or 12 or 15.RESULT = 1.when 01 or 02 or 03 or 05 or 06

48、or 07 or42.RESULT = 2.when 04 .RESULT = 3.when 20 or 21 or 22 or 23 or 24 or 25 or26 orCubeUpdate RuleInfoObjectMethodC = ConstantM = Master Attribut R = RoutineI = Initial Value S = Source FieldField Name/ ConstantRoutine Description27 or 28 or 29 or 30 or 31 or 32 or 33or34 or 35 or 36 or 37 or 38

49、 or 39 or 46.RESULT = 4.when 40 or 41 or 43 or 44 or 45 or 47 or48 or49 or 50 or 51 or 52 or 53 or 54 or 55.RESULT = 5.when 09 or 13 or 14 or 16 or 17 or 18 or19 or56.RESULT = 6.endcase.ZMROCRE038ZMRORE01ZMRLARGE 物料组大类Rif COMM_STRUCTURE-M_GROUP .RESULT = COMM_STRUCTURE- M_GROUP(2).endif.ZMROCRE038ZM

50、RORE01ZMRMEDIUM物料组中类Rif COMM_STRUCTURE-M_GROUP .RESULT = COMM_STRUCTURE- M_GROUP(4).endif.ZMROCRE038ZMRORE010COMP_CODE公司代码 2RZMROCRE038ZMRORE010MATERIAL物料S0MATERIAL物料ZMROCRE038ZMRORE010M_GROUP物料组S0M_GROUP物料组ZMROCRE038ZMRORE01ZMRPS工程项目索引号Rselect single /BIC/ZMRPSfrom/BIC/PZMRPSo t_ZMRPSwhere COMP_COD

51、Eeqp_codeCubeUpdate RuleInfoObjectMethodC = ConstantM = Master Attribut R = RoutineI = Initial Value S = Source FieldField Name/ ConstantRoutine Descriptionand /BIC/ZMRPSeq COMM_STRUCTURE-/BIC/ZMRPSand OBJVERSeq A. if sy-subrc eq 0.RESULT = t_ZMRPS.else. RESULT = .endif.ZMROCRE038ZMRORE01ZMRPRDAT需求提

52、前期RDATA: T_DATE LIKE COMM_STRUCTURE-/BIC/ZMRBDTER. CLEAR: T_DATE.* result value of the routineT_DATE = COMM_STRUCTURE-CALDAY.if COMM_STRUCTURE-/BIC/ZMRBDTER = T_DATE.RESULT = COMM_STRUCTURE-/BIC/ZMRBDTER - T_DATE.else.RESULT = 0.endif.ZMROCRE038ZMRORE010DOC_DATE凭证日期RRESULT = ABS (COMM_STRUCTURE-/BIC

53、/ZMRBDTER).5.3.2. Infosource ODSStart Routine项目类需求数据源（ZMRORE03_T01）ordata: CODE type i.DATA_PACKAGE-M_GROUP+0(6) = 080112orloop at DATA_PACKAGE.* reset CODE = -1.CODE = -1.DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(6) = 080114.if DATA_PACKAGE-M CODE = 28.else.case DATA_PACKAGE-Mwhen 01 or

54、 04 or 20.CODE = 0._GROUP = .when 0803.if DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(2)._GROUP+0(6) = 080306.when 02.if DATA_PACKAGE-M DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif._GROUP+0(4) = 0205 or_GROUP+0(4) = 0227.when 0813.CODE = 0.when others.CODE = 28.endcase.when 06.if DATA_PACK

55、AGE-M CODE = 0.else.CODE = 28.endif._GROUP+0(4) = 0601.when 10.case DATA_PACKAGE-M_GROUP+0(4).when 1001 or 1005 or 1007 or 1009.CODE = 0.when 1003.if DATA_PACKAGE-M CODE = 28.else.CODE = 0.when 08.case DATA_PACKAGE-Mwhen 0801.if DATA_PACKAGE-M_GROUP+0(6) = 100314._GROUP+0(4)._GROUP+0(6) = 080110endi

56、f.when 35.if DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif._GROUP+0(6) = 350102.when others.CODE = 28.endcase.when 30.case DATA_PACKAGE-M_GROUP+0(4).when 40.if DATA_PACKAGE-M DATA_PACKAGE-M CODE = 0.else.CODE = 28.endif.when 3039 or 3045 or 3053.CODE = 0._GROUP+0(4) = 4001 or_GROUP+0(4) = 4007.when 3

57、037.if DATA_PACKAGE-M DATA_PACKAGE-M DATA_PACKAGE-M CODE = 28.else.CODE = 0.endif._GROUP+0(6) = 303702 or_GROUP+0(6) = 303704 or_GROUP+0(6) = 303712.when others.CODE = 28.endcase. endif.when others.CODE = 28.endcase.if CODE = 28.DELETE DATA_PACKAGE.endif. endloop.Key FigureODSUpdate RuleKey FigureMe

58、thod S= Source Field C = Constante M = Master AttributeR = RoutineI = Initial ValueField Name/ ConstantRoutin DescriptionZMRORE03ZMRORE03_T01ZMRMENGE采购申请数量RZMRMENGE采购申请数量参考 BT 上的实际例程ZMRORE03ZMRORE03_T010TY数量R0TY数量参考BT上的实际例程ZMRORE03ZMRORE03_T01ZMRBDTER需求日期SZMRBDTER需求日期Characteristics and Time Charact

59、eristicsODSUpdate RuleInfoObjectMethodC = ConstantM = Master Attribut R = RoutineI = Initial Value S = Source FieldField Name/ ConstantRoutine DescriptionZMRORE03ZMRORE03_T010COMP_CODE公司代码R参考BT上的实际例程ZMRORE03ZMRORE03_T01ZLNNB条目号SZLNNB条目号ZMRORE03ZMRORE03_T01ZDMPLN需求计划号SZDMPLN需求计划号ZMRORE03ZMRORE03_T010MATERIAL物料S0MATERIAL物料ZMRORE03ZMRORE03_T010UNIT计量S0UNIT计量ZMRORE03ZM