TCL ERP项目ZSAPMM07DR2 移库单 Source Code Correction-Template.docVIP

下载本文档

58
0
约 11页
2017-09-15 发布于山东
举报
版权申诉

TCL ERP项目ZSAPMM07DR2 移库单 Source Code Correction-Template.doc

1、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
7、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

1. 更改的程序: ZM07DRTOP2/ZM07DRA012/ZM07DRENT2/ZM07DRAUS2/ZM07DRSON2/ZSAPM07DR2 程序类型: INCLUDE 2. 更改的详细原因: 解决移库即时打印调用自定义打印格式及自定义输入数据的问题. 解决方案: 用自定义Form替换系统Form,用自定义取数函数取代系统取数函数. Source Code Corrections 更改位置: ZSAPM07DR2 line -- 60 更改类型[insert/modify/delete]: insert 更改人: TCL leigang 源码: form dealdata using p_mblnr p_mjahr. data: ll_ps_psp_pnr like mseg-ps_psp_pnr. SELECT mkpf~cputm 输入时间(列印) mseg~bukrs 公司代码 mseg~matnr 物料编号 mseg~lgort 移出仓库代码 mseg~umlgo 移入仓库代码 mkpf~bktxt 备注 mkpf~xblnr 原始凭单号 mseg~werks 移出工厂 mseg~umwrk 移入工厂 mkpf~tcode2 事务代码 mkpf~mblnr 凭证编号 mkpf~budat 凭证中的记帐日期(日期) mkpf~usnam 制单员代码 mseg~sobkz 移出类型 mseg~umsok 移入类型 mseg~bwart 移动类型 mseg~erfme 单位 mseg~lifnr 供应商 mseg~kdauf 销售订单 mseg~ps_psp_pnr WBS mseg~MAT_PSPNR mseg~insmk 移出库存类型 mseg~mjahr 年度 mseg~sgtxt * mseg~erfmg SUM( mseg~erfmg ) AS erfmg1 数量 FROM mkpf INNER JOIN mseg ON mkpf~mblnr = mseg~mblnr AND mkpf~mjahr = mseg~mjahr INTO CORRESPONDING FIELDS OF TABLE ITAB WHERE mkpf~mblnr = p_mblnr and mkpf~mjahr = p_mjahr and mseg~XAUTO X GROUP BY mkpf~cputm mseg~bukrs mseg~matnr mseg~lgort mseg~umlgo mkpf~bktxt mkpf~xblnr mseg~werks mseg~umwrk mkpf~tcode2 mkpf~mblnr mkpf~budat mkpf~usnam mseg~sobkz mseg~umsok mseg~bwart mseg~erfme mseg~lifnr mseg~kdauf mseg~ps_psp_pnr mseg~MAT_PSPNR mseg~insmk mseg~mjahr mseg~sgtxt. *MSEG~BWART = 301 OR MSEG~BWART = 302 OR OR MSEG~BWART = 262 LOOP AT itab. 生产过程中转世仓的情况 IF itab-tcode2 = MF60 and ( itab-bktxt = or itab-bktxt = space ).