采购订单建立增加客户数据增强示例

命令：smod

选择增强号MM06E005，点击测试。

出现如下：

MM06E005

1.功能退出：分别是代码区，包括pbo,pbi等。

2.Screen exit：创建增强屏幕

3.包含表：增强表字段结构

 

操作:

第一步：要SMOD上的增强包含结构CI_EKKODB或CI_EKPODB，在包含表CI_EKKODB上双击，然后新增增

               强字段。新增字段必须以ZZ开头,如ZZOPENDATE。如果要增强行项目，双击CI_EKPODB。

第二步：增强屏幕显示，在Screen exit中，双击要增强的SAPMM06，如下：

PROCESS BEFORE OUTPUT.
  MODULE STATUS_0101.

PROCESS AFTER INPUT.
* MODULE USER_COMMAND_0101.

进入以后即可绘制屏幕显示，查找要显示的CI_EKKODB中的字段显示到屏幕上。查找字段（f6），输入表或字段名（ekko_ci），找到显示的字段。

双击STATUS_0101编程：

  MODULE STATUS_0101中编程：（更新字段编辑状态）

IF displaymode = 'A'.
    LOOP AT SCREEN.
      IF screen-name = 'EKKO_CI-ZZOPENDATE'.
         screen-input = '0'.
        MODIFY SCREEN.
      ENDIF.

ENDLOOP.
  ENDIF.

第三步：编程

在功能退出去，双击EXIT_SAPMM06E_006，进入 INCLUDE ZXM06U36 ，即Pbo中增加如下代码（显示和更新编辑状态）

ekko_ci = i_ci_ekko.
displaymode = i_trtyp.

双击 EXIT_SAPMM06E_007，进入 INCLUDE ZXM06U38 ，即 Pbi中（保存数据）

MOVE-CORRESPONDING i_ekko TO gl_ekko_ci.

双击    EXIT_SAPMM06E_008，进入 INCLUDE ZXM06U37 ，即 Import Data from Customer Subscreen for Purchasing Document Header中（修改后提示保存）

IF gl_ekko_ci-zzopendate NE ekko_ci-zzopendate.
   e_ci_ekko-zzopendate = ekko_ci-zzopendate.
  IF displaymode NE 'A'.
     e_ci_update = 'X'.
  ENDIF.
ENDIF.

也可以是所有字段：

if gl_ekko_ci ne ekko_ci.
   e_ci_ekko = ekko_ci.
  if displaymode ne 'A'.
     e_ci_update = 'X'.
  endif.
endif.

然后逐个激活即可。

SAPMM06E     0101 CUSTSCR1 SAPLXM06    0101 "Header
SAPMM06E     0111 CUSTSCR1 SAPLXM06    0111 "Item

EXIT_SAPMM06E_006 Header (PBO)

EXIT_SAPMM06E_007 Header (PAI)

EXIT_SAPMM06E_008 Import Data from Customer Subscreen for Purchasing Document Header

EXIT_SAPMM06E_016 Item (PBO)

EXIT_SAPMM06E_017 Item (PAI)

EXIT_SAPMM06E_018 Import Data from Customer Subscreen for Purchasing Document Item