采购订单打印PPT课件

1、采购订单打印采购订单的打印采购订单的打印采购订单打印采购订单的打印方式采购订单的打印方式一、基于一、基于BADI的打印的打印二、基于函数的打印二、基于函数的打印三、基于源代码的打印三、基于源代码的打印采购订单打印基于基于BADI的打印的打印 ME_PURCHDOC_POSTED:这个增强是在点击PO的保存按钮时触发的。当执行这个增强的时候，刚创建或者改动过的PO数据是没有到达数据库的。但是我们可以通过它获取参数,这样，我们就可以在里面添加外挂程序(Smartform)来实现对PO单据的打印。采购订单打印步骤： 第一步，通过TCODE：SE19对该BADI接口实现 第一次实现接口要选择创建Cre

2、ate Implementation采购订单打印输入描述之后，保存激活 第二步，通过TCODE：SE18输入该BADI名称之后，选择Interface， 然后查看对应的接口添加代码采购订单打印具体代码：具体代码： DATA:DATA: LW_PRINTLW_PRINT TYPETYPE SSFCOMPOP,SSFCOMPOP, ST_TRLOP ST_TRLOP TYPETYPE SSFCTRLOP,SSFCTRLOP, IT_EKPO IT_EKPO TYPETYPE STANDARDSTANDARD TABLETABLE OFOF EKPO,EKPO, HE_EKKO HE_EKKO TY

3、PETYPE EKKO.EKKO. CLEAR CLEAR it_ekpo.it_ekpo. HE_EKKO HE_EKKO = = IM_EKKO.IM_EKKO. APPEND APPEND LINESLINES OFOF IM_EKPOIM_EKPO toto IT_EKPO.IT_EKPO. LW_PRINT-TDDEST LW_PRINT-TDDEST = = LP01.LP01. ST_TRLOP-PREVIEW ST_TRLOP-PREVIEW = = X.X. ST_TRLOP-NO_DIALOG ST_TRLOP-NO_DIALOG = = X.X. CALL CALL FU

4、NCTIONFUNCTION /1BCDWB/SF00000250/1BCDWB/SF00000250 EXPORTING EXPORTING CONTROL_PARAMETERS CONTROL_PARAMETERS = = ST_TRLOPST_TRLOP OUTPUT_OPTIONS OUTPUT_OPTIONS = = LW_PRINTLW_PRINT USER_SETTINGS USER_SETTINGS = = XE_EKKO XE_EKKO = = HE_EKKOHE_EKKO TABLES TABLES XT_EKPOXT_EKPO = = IT_EKPOIT_EKPO XT_

5、EKET XT_EKET = = IM_EKETIM_EKET EXCEPTIONS EXCEPTIONS FORMATTING_ERRORFORMATTING_ERROR = = 1 1 INTERNAL_ERRORINTERNAL_ERROR = = 2 2 SEND_ERROR SEND_ERROR = = 3 3 USER_CANCELED USER_CANCELED = = 4 4 OTHERSOTHERS = = 5.5.表头表头明细明细在选中的地方加入以下代码，然后保存激活采购订单打印登录： 通过TCODE:ME21N事物码创建采购订单，输入完抬头和明细等相关信息之后，然后点击保

6、存按钮，这时就会触发增强，调用通过Smartform设计的打印程序。采购订单打印打印结果： 该画面纯粹是通过Smartform表格来设计的，该表格详细的描述了该采 购单的相关信息，包括：订单号、物料号、数量、价格以及交货时间等。 当点击返回按钮时，就会显示订单号被创建。采购订单打印返回结果： 采购订单打印更新： 当通过TCODE：ME22N事物码更新采购订单中的抬头或者是明细信息时， 同样会触发增强，之后点击保存按钮，调用打印程序。采购订单打印打印结果：采购订单打印基于函数的打印基于函数的打印 首先，SAP PO的CMOD增强接口:MM06E005 保存增强使用：EXIT_SAPMM06E_0

7、13采购订单打印 具体代码：具体代码： DATA:DATA: LW_PRINTLW_PRINT TYPETYPE SSFCOMPOP,SSFCOMPOP, ST_TRLOPST_TRLOP TYPETYPE SSFCTRLOP,SSFCTRLOP, IT_EKPOIT_EKPO likelike BEKPOBEKPO OCCURSOCCURS 0,0, HE_EKKOHE_EKKO TYPETYPE EKKO.EKKO. CLEAR CLEAR it_ekpo.it_ekpo. HE_EKKOHE_EKKO = = I_EKKO.I_EKKO. APPEND APPEND LINESLINES

8、 OFOF XEKPOXEKPO toto IT_EKPO.IT_EKPO. LW_PRINT-TDDEST LW_PRINT-TDDEST = = LP01.LP01. ST_TRLOP-PREVIEW ST_TRLOP-PREVIEW = = X.X. ST_TRLOP-NO_DIALOG ST_TRLOP-NO_DIALOG = = X.X. CALLCALL FUNCTIONFUNCTION /1BCDWB/SF00000250/1BCDWB/SF00000250 EXPORTING EXPORTING CONTROL_PARAMETERS CONTROL_PARAMETERS = =

9、 ST_TRLOPST_TRLOP OUTPUT_OPTIONS OUTPUT_OPTIONS = = LW_PRINTLW_PRINT USER_SETTINGS USER_SETTINGS = = XE_EKKO XE_EKKO = = HE_EKKOHE_EKKO TABLES TABLES XT_EKPO XT_EKPO = = IT_EKPOIT_EKPO XT_EKET XT_EKET = = XEKETXEKET EXCEPTIONS EXCEPTIONS FORMATTING_ERROR FORMATTING_ERROR = = 1 1 INTERNAL_ERROR INTER

10、NAL_ERROR = = 2 2 SEND_ERROR SEND_ERROR = = 3 3 USER_CANCELED USER_CANCELED = = 4 4 OTHERS OTHERS = = 5. 5. 进入函数里，双击Include，在里面添加自己的打印代码采购订单打印登录和更新时，打印的结果：采购订单打印基于源代码的打印基于源代码的打印当在前台创建采购订单时，在保存前，系统会确定PO订单的使用到的message shcema。该打印是通过配置PO Message来实现的。点击message查看订单打印的配置：采购订单打印 首先配置让PO输出一个所谓的Message，在此此Mes

11、sage是指Print output。采购订单打印然后查看后台(spro)：采购订单打印选择相应的outputtype，然后双击子程序处理12采购订单打印双击进入程序：SAMFM06P,找到子程序为ENTRY_NEU.采购订单打印 具体代码：具体代码： DATA:DATA: LW_PRINTLW_PRINT TYPETYPE SSFCOMPOP,SSFCOMPOP, ST_TRLOPST_TRLOP TYPETYPE SSFCTRLOP,SSFCTRLOP, IT_EKPOIT_EKPO TYPETYPE STANDARDSTANDARD TABLETABLE OFOF EKPO,EKPO,

12、HE_EKKOHE_EKKO TYPETYPE EKKO.EKKO. HE_EKKO HE_EKKO = = l_doc-XEKKO.l_doc-XEKKO. IT_EKPO IT_EKPO = = l_doc-XEKPO.l_doc-XEKPO. LW_PRINT-TDDEST LW_PRINT-TDDEST = = LP01.LP01. ST_TRLOP-PREVIEW ST_TRLOP-PREVIEW = = X.X. ST_TRLOP-NO_DIALOG ST_TRLOP-NO_DIALOG = = X.X. CALLCALL FUNCTIONFUNCTION /1BCDWB/SF00

13、000250/1BCDWB/SF00000250 EXPORTING EXPORTING CONTROL_PARAMETERSCONTROL_PARAMETERS = = ST_TRLOPST_TRLOP OUTPUT_OPTIONS OUTPUT_OPTIONS = = LW_PRINTLW_PRINT USER_SETTINGS USER_SETTINGS = = XE_EKKO XE_EKKO = = HE_EKKOHE_EKKO TABLES TABLES XT_EKPO XT_EKPO = = IT_EKPOIT_EKPO XT_EKET XT_EKET = = l_doc-XEKETl_doc-XEKET EXCEPTIONS EXCEPTIONS FORMATTING_ERROR FORMATTING_ERROR = = 1 1 INTERNAL_ERRO