1、河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 1 页，共 13 页 第一部分：需求信息程序类型 接口程序使用单位程序编号 ZMM04R0002程序名称 生成采购订单并同步采购订单信息到 ECP事务代码业务流程业务子流程系统版本 ECC6 模块 MM业务负责人 冯炳黎功能设计者 程序开发者 / 程序员第二部分： 设计维护记录请求提出者 时间 修改原因 审批人冯炳黎 20120320 创建功能设计冯炳黎 20120321 增加创建采购订单后校验价格是否正确。河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 2 页，共 13 页 第三部分：用户签字关键用户签名姓名：日期：/顾
2、问签名姓名：日期：/顾问组长签名姓名：日期：/业务组长(河北电力)签名姓名：日期：/河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 3 页，共 13 页 第四部分：业务需求需求用途（描述编写程序的用途或目的）生成采购订单并同步采购订单信息给 ECP总体要求（报表/程序执行的功能描述）手工创建采购订单。对于超市化采购的采购申请，在 ERP 中所有行项目（除删除行项目）审批通过，并收到ECP 接收“ERP 采购申请审批信息”所有“成功”的返回值后，根据需要生成采购订单，并通过接口将采购订单信息上传至电子商务平台。程序使用者系统自动执行使用频度（日、月、季度或年）后台处理/在线处理打印机
3、类型（激光 / 喷墨 / 针式）纸张大小/方向使用语言开发优先度注释河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 4 页，共 13 页 第五部分：功能设计5.1 权限要求（对于某些个别字段须要进行权限控制，如公司代码等）5.2 功能界面 选择屏幕：屏幕字段中文描述选择类型 屏幕字段名称 参考字段名称 缺省值 必要输入检查条件单一区间复选框选择是 否圆点工厂 EBAN-WERKS 采购申请号 请购单号 凭证类型 EBAN-BSART 创建状态 未创建、已创建 未创建 上传状态 未上传、已上传 未上传 5.3 所需数据表及字段描述1 新建表：超市化采购-采购订单上传历史记录 ZMM2
4、6T_CSCG_DDLS字段名 是否主键 字段描述 字段类型 字段长度EBELN KEY 采购订单 CHAR 15EBELP KEY 项目 NUMC 5BANFN 采购申请 CHAR 10BNFPO 请求项目 NUMC 5ZQGDH 请购单号（ECP） CHAR 25ZGGDHXM 请购单行项目（ECP） CHAR 5ZHSJG 含税价格 EKPO-BRTWR CURR 15/2ZSMTEST 税码描述，值取字段 MWSKZ 的描 CHAR 50河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 5 页，共 13 页 述 TEXT1（默认值取 J1-17%进项税，中国）BEDAT 凭证
5、日期 DATS 8ZFKTJ 付款条件描述 ，值取字段 ZTERM的描述TEXT1（默认值取0001）CHAR 50CZIX 操作类型，1 - 创建 PO CHAR 1ZSCDAT 上传日期 CHAR ZSCTIM 上传时间 CHAR ZSCZT上传状态(O：成功，N：失败） CHAR 展示字段：字段名 字段描述 表 备注ZQGDH 请购单号（ECP）EBANZGGDHXM 请购单行项目（ECP）EBANEBELN 采购订单号 EBANEBELP 行项目号 EBANZSCZT 上传状态 ZMM26T_CSCG_DDLSBSART 凭证类型 EBANBANFN 采购申请 EBANBNFPO 请求
6、项目 EBANMATNR 物料 EBANWERKS 工厂 EBANLGORT 库存地点 EBANMENGE 数量 EBANPREIS 评价价格 EBANKNTTP 项目类别 EBANTXZ01 物料描述 EBANPUR_MODE 采购方式 EBANLFDAT 交货日期 EBAN河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 6 页，共 13 页 BADAT 创建日期 请购单表AFNAM 实际申请人 请购单表LIFNR 国网供应商 请购单表LIFNR-SX 供应商 取采购申请中的期望供应商EBAN-lifnrName1 系统供应商名称取 Lfa1-name1SAKTO 总帐科目 请购
7、单表KOSTL 成本中心 请购单表ANLN1 资产 请购单表PS_PSP_PNRWBS元素 请购单表CSID 标识 请购单表CSDW 超市物料单位请购单表CSSL 超市物料数量请购单表ERNAM 创建者 请购单表BANPR 审批状态 EBANEKGRP 采购组 EBAN 采购申请取AUFNR 订单号 请购单表EKORG 采购组织 EBANBUKRS 公司代码 EBANZSHRID 收货人ID 请购单表Zterm 付款条件5.4 相关的取数及处理逻辑（可用表格或文字叙述）实现功能：1 取数逻辑：查询内容: EBAN 相关信息，详见展示字段查询条件 A： 选择屏幕条件 and EBAN-LOEKZ
8、 = “ and and EBAN-ZQGDH ” and EBAN-CSID 05只要这个申请中有一行申请不为 05 则过滤掉该申请查询：“未创建“逻辑如下： 在查询条件 A 增加 EBAN-EBELN = “ and EBAN-EBELp = “ and EKPO-loekz = “查询：“已创建“逻辑如下： 在查询条件 A 增加 EBAN-EBELN “ and EKPO-loekz = “河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 7 页，共 13 页 查询：“未上传“逻辑如下： 在查询条件 A 增加 ZMM26T_CSCG_DDLS-ZSCZT = N 或者 ZMM2
9、6T_CSCG_DDLS 中不存在。查询：“已上传“逻辑如下： 在查询条件 A 增加 ZMM26T_CSCG_DDLS-ZSCZT = O2 订单创建功能：当查询未创建，未上传时： 允许创建订单，允许上传订单当查询已创建，未上传时： 不允许创建订单，允许上传订单当查询已创建，已上传时： 不允许创建订单，不允许上传订单当查询未创建，已上传时： （不会有数据）不允许创建订单，不允许上传订单创建采购订单默认值：付款条件为：0001 立即支付；税码为：J1。采购申请类型为 ZM15，则采购订单类型为：ZM15.采购申请类型为 ZM13，则采购订单类型为：ZM14.采购申请类型为 ZM05，则采购订单类
10、型为：ZM05. 采购申请类型为 ZM01 或 ZM11，暂时不做自动创建订单功能.创建过程要求：（1） 采购订单创建成功后，检查采购订单每个行项目的含税价格 NETPR 是否等于 eban- PREIS*100，如果有行某个项目不相等，则调用 BDC 录屏程修改含税金额的值等于 eban- PREIS*117，并给与提示“采购订单价格不一致，请检查”。如果修改失败，则提示“采购订单价格出错，请手工修改订单价格”。（2） 根据屏幕信息创建采购订单，调用 BAPI BAPI_PO_CREATE1 。根据查询条件查出采购申请后，选中 采购申请（选中任一行项目，那么默认选中整个采购申请，并且给出提示
11、：采购申请需整单创建采购订单）， 调用 bapi 自动创建采购订单； （3） 如果采购申请中任意一条行项目审批拒绝（审批状态 BANPR 值为 08），则需等待用户在 ECP 中对审批拒绝的行项目进行修改或删除，直至所有行项目（删除行项目除外）通过审批（审批状态 BANPR 值为05），并收到 ECP 接收审批结果成功的返回值后，才能创建订单。3 上传订单功能： 调用传输超市化采购订单传输电子商务平台功能。1) ZM05 采购订单必须在审批以后才能上传，在上传是检查审批通过 EKKO-FRGKE=M，否则不能上传，并提示“采购订单审批以后才能上传”。2) 上传之前保存到上传 ECP 采购订单历
12、史表中：ZMM26T_CSCG_DDLS ，上传状态为 N3) 上传后接收到 ECP 回传标识，如果成功 0 则，更新 ZMM26T_CSCG_DDLS 上传状态，如果失败，提示错误消息，查找原因.接口传输主要信息包括：请购单号、请购单行项目、采购申请、请求项目、含税价格、税码描述、付款条件描述等。接口描述：ERP 调用电子商务平台注册在企业服务总线上的服务，同来同步采购订单信息； 电子商务平台根据消息的接收情况，返回相应标识给 ERP数据提供方传递数据字段内容：接口名称 ERP 同步采购订单信息至 ECP数据流向 双向，主数据流向为：ERP 电子商务平台发生频度 按需技术路线 ESB服务提供
13、方 电子商务平台字段名 字段描述 类型 长度 数据项说明ZQGDH 请购单号（ECP） CHAR 25ZGGDHXM 请购单行项目（ECP） CHAR 5BANFN 采购申请 CHAR 10BNFPO 请求项目 NUMC 5ZCGDD 采购订单 CHAR 15值取“网省编号- EBELN”，例：26-4500012345河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 8 页，共 13 页 EBELP 项目 NUMC 5 采购订单行项目信息ZHSJG 含税价格 CURR 15/2 值取 ekpo-BRTWRZSMTEST 税码描述 CHAR 50值取字段 MWSKZ 的描述/*TEX
14、T1（默认值取 J1-17%进项税，中国）*/根据税码从 T007S 取T007S-TEXT1 条件是 T007S-KALSM = TAXCN and 税码BEDAT 凭证日期 DATS 8ZFKTJ 付款条件描述 CHAR 50/*值取字段 ZTERM 的描述TEXT1（默认值取 0001）*/根据付款条件：根据TVZBT 取 zterm 的描述字段 VTEXT语言 SPRAS = ZHCZIX 操作类型 CHAR 1 1 - 创建 PO 默认接收请购单传输 XML 格式如下：请购单号请购单行项目采购申请请求项目采购订单项目含税价格税码描述凭证日期付款条件描述操作类型返回值参数格式如下返回结
15、果标识(0 成功或者 1 失败) 字符长度 1 失败原因或者成功信息 字符长度 200 4 错误消息展示功能： 如果在创建采购订单和上传过程中，如果出现错误则展示错误消息如下信息：采购申请号行项目号消息类型消息 ID编号消息内容河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 9 页，共 13 页 5 接口中在数据传输过程中相关信息记录接口日志：ZTMMJY_MS_02 表。5.5 报表 / 表单的输出格式及备注 第六部分：附录（可链接到导出 excel）参考代码 自动根据工厂信息生成外部合同号程序位置：ZMMJYHT016*&-*& Form FRM_SCWBHTH*&-* tex
16、t*-* p1 text* I_NUM-NUM+NN(4). “比较 EKKO 和 ZTMMJY_ADD_PRR 中查询出来的外部合同号前 14 位CLEAR: AA1,A2,A3,A4,III.* AA1 = L_BANFN .* A2 = L_LIFNR.* A3 = L_ZZBJHBH1.* A4 = L_MATKL.CLEAR III.* REFRESH II_TAB. CLEAR II_TAB.* II_TAB = g_t_add2.* LOOP AT II_TAB WHERE BANFN = AA1 AND LIFNR = A2 AND ZZBJHBH1 = A3 AND MATK
17、L = A4 AND ZZNUM = NUM1-NUM1.* III = III + 1.* g_t_add2-ZZNUM = NUM1-NUM1. “如果 ZTMMJY_ADD_PRR 中的流水号大于 EKKO 就直接用它来更新本条数据* MODIFY ZTMMJY_ADD_PRR FROM g_t_add2.* EXIT.* ENDLOOP.* IF III = 0.CLEAR NUM4.REFRESH NUM4.SELECT ZZNUM FROM ZTMMJY_ADD_PRR INTO NUM4-NUM4 WHERE ZZNUM LIKE NUM.IF NUM4-NUM4 IS NOT
18、INITIAL.APPEND NUM4.ENDIF.ENDSELECT.河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 11 页，共 13 页 SORT NUM4 BY NUM4 DESCENDING.IF NUM4 IS NOT INITIAL.LOOP AT NUM4.CLEAR NUM2.NUM2 = NUM4-NUM4+NN(4) + 1.CONCATENATE: NUM4+0(NN) NUM2 INTO L_WBHTHM.“-ZZNUM.“拼接加 1 后的流水号到大内表 g_t_add2 下的 ZZNUM 中* MODIFY ZTMMJY_ADD_PRR FROM g_t
19、_add2.EXIT.ENDLOOP.ENDIF.* ENDIF.* g_t_add2-ZZNUM = NUM1-NUM1. “如果 ZTMMJY_ADD_PRR 中的流水号大于 EKKO 就直接用它来更新本条数据* MODIFY ZTMMJY_ADD_PRR FROM g_t_add2.ELSEIF NUM1-NUM1+NN(4) = L_WBHTHM+NN(4). “如果 ZTMMJY_ADD_PRR 中符合条件的流水号大于或者等于 EKKO 表中的 ZZNUM 就取 ZTMMJY_ADD_PRR 的 ZZNUM+1CLEAR NNN.NNN = G_NUM-NUM+NN(4) + 1.C
20、ONCATENATE: G_NUM-NUM+0(NN) NNN INTO L_WBHTHM.* MODIFY ZTMMJY_ADD_PRR FROM g_t_add2.ELSEIF G_NUM-NUM+NN(4) NUM4-NUM4.CLEAR NUM2.NUM2 = I_NUM-NUM+NN(4) + 1.CONCATENATE: HB - L_ZZBJHBH1 - L_WERKS - NUM2 INTO L_WBHTHM.“g_t_add2-ZZNUM.* MODIFY ZTMMJY_ADD_PRR FROM g_t_add2.ELSEIF I_NUM-NUM = NUM4-NUM4.CL
21、EAR NUM2.NUM2 = NUM4-NUM4+NN(4) + 1.CONCATENATE: HB - L_ZZBJHBH1 - L_WERKS - NUM2 INTO L_WBHTHM.“g_t_add2-ZZNUM.* MODIFY ZTMMJY_ADD_PRR FROM g_t_add2.ENDIF.EXIT.ENDLOOP.EXIT.ENDLOOP.ENDIF.ELSE.CLEAR I_NUM.REFRESH I_NUM.SELECT ZZNUM FROM EKKO INTO I_NUM-NUM WHERE ZZNUM LIKE NUM.IF I_NUM-NUM IS NOT IN
22、ITIAL.APPEND I_NUM.ENDIF.ENDSELECT.SORT I_NUM BY NUM.IF I_NUM IS NOT INITIAL.LOOP AT I_NUM.河北电力公司趸售县管理系统（ERP）客户化程序功能设计书第 13 页，共 13 页 CLEAR NUM2.NUM2 = I_NUM-NUM+NN(4) + 1.CONCATENATE: HB - L_ZZBJHBH1 - L_WERKS - NUM2 INTO L_WBHTHM.“g_t_add2-ZZNUM.* MODIFY ZTMMJY_ADD_PRR FROM g_t_add2.ENDLOOP.ELSE.CONCATENATE:HB - L_ZZBJHBH1 - L_WERKS - 0001 INTO L_WBHTHM.“g_t_add2-ZZNUM.* MODIFY ZTMMJY_ADD_PRR FROM g_t_add2.ENDIF.ENDIF.ENDIF.* MODIFY g_t_add2.* CLEAR g_t_add2.ENDFORM. “ FRM_SCWBHTH
