午夜视频在线观看区二区-午夜视频在线观看视频-午夜视频在线观看视频在线观看-午夜视频在线观看完整高清在线-午夜视频在线观看网站-午夜视频在线观看亚洲天堂

業(yè)務(wù)需求：

在SAP項(xiàng)目實(shí)施中采購管理模塊最常遇到業(yè)務(wù)需求之一：采購訂單收貨后不能在修改價格，如果要修改價格必須沖銷收貨或拆行（已收貨的不能修改價格，未收貨的數(shù)量通過插上一行項(xiàng)目來修改價格）。

需求的業(yè)務(wù)背景：

這業(yè)務(wù)需求一般是財(cái)務(wù)部門要求，為何財(cái)務(wù)部門要求這樣的業(yè)務(wù)控制，主要有2個方面原因，第一個原因是如果收貨后再對訂單價格進(jìn)行修改的話，會影響到一些與采購相關(guān)的財(cái)務(wù)對帳報(bào)表，因?yàn)檫@些報(bào)表是取采購訂單當(dāng)前實(shí)時價格進(jìn)行對賬的，第二個原因和公司財(cái)務(wù)的一些結(jié)算規(guī)則和要求相關(guān)，要理解這需要先了解下SAP定價策略和發(fā)票校驗(yàn)之間的關(guān)系，SAP的標(biāo)準(zhǔn)功能中采購定價可以按憑證日期定價也可以按收貨日期定價，具體設(shè)置在采購信息記錄中設(shè)置（如下圖）。

如果按憑證日期定價，那么在用MIR7/MIRO做發(fā)票預(yù)制/正式發(fā)票時候，自動帶出默認(rèn)金額是按采購訂單上的最新價格計(jì)算的，如果是收貨日期定價，自動帶出默認(rèn)金額是按收貨時計(jì)算的金額（具體見如下說明）。

1.按采購訂單憑證日期定價

對這采購訂單分2批次進(jìn)行收貨，第一次收貨，數(shù)量250，采購凈價18，然后將采購訂單凈價修改36，第二次收貨，數(shù)量250，凈價36 ，然后做發(fā)票校驗(yàn)。

?

備注：默認(rèn)帶出金額不是收貨金額，而是采購訂單上的當(dāng)前凈價計(jì)算的金額

2.按采購訂單收貨日期定價

對這采購訂單分2批次進(jìn)行收貨，第一次收貨，數(shù)量250，采購凈價15，然后將采購訂單凈價修改30，第二次收貨，數(shù)量250，凈價30 ，然后做發(fā)票校驗(yàn)。

備注：默認(rèn)帶出金額是收貨金額，不是采購訂單上的當(dāng)前凈價計(jì)算的金額。

不同公司財(cái)務(wù)結(jié)算要求不同，在很多項(xiàng)目中財(cái)務(wù)會要求發(fā)票金額必須按收貨金額結(jié)算，但采購部門定價的業(yè)務(wù)要求是按憑證日期定價，不能按收貨日期定價。

基于以上兩點(diǎn)業(yè)務(wù)要求的情況下，就無法通過配置實(shí)現(xiàn)既滿足財(cái)務(wù)又滿足采購的業(yè)務(wù)要求，這時候就需要通過增強(qiáng)來滿足這業(yè)務(wù)需求。

解決上面業(yè)務(wù)需求的增強(qiáng)實(shí)施方案：

針對上面業(yè)務(wù)需求，下面詳細(xì)介紹通過實(shí)施二代增強(qiáng)方的式來滿足這樣業(yè)務(wù)需求的實(shí)施步驟。

增強(qiáng)名：MM06E005

出口：EXIT_SAPMM06E_012

具體操作步驟如下

1.創(chuàng)建增強(qiáng)項(xiàng)目（CMOD）

備注：正式系統(tǒng)需要傳輸?shù)脑捯x擇包，如果自己練習(xí)系統(tǒng)可以點(diǎn)本地對象->保存即可

2.分配增強(qiáng)和組件

備注：【實(shí)施】欄位上打上勾的表示已做過增強(qiáng)實(shí)施的點(diǎn)。

3.寫增強(qiáng)代碼

在如下按業(yè)務(wù)要求寫上增強(qiáng)代碼

具體代碼如下：

IF SY-TCODE <> 'ME22N' AND SY-TCODE  <> 'ME22' AND  SY-TCODE <> 'ME23N' AND SY-TCODE  <> 'ME23'.
  EXIT.
ENDIF.
DATA T_NETPR TYPE EKPO-NETPR.
DATA TT_SUM   TYPE EKBE-BPMNG.
DATA T_SUM    TYPE EKBE-BPMNG.
DATA T_SHKZG  TYPE EKBE-SHKZG.
LOOP AT TEKPO.
  SELECT SINGLE NETPR INTO T_NETPR FROM EKPO WHERE EBELN = TEKPO-EBELN
                                             AND EBELP = TEKPO-EBELP.
  IF TEKPO-NETPR <> T_NETPR.
    SELECT BPMNG SHKZG INTO (T_SUM,T_SHKZG) FROM EKBE WHERE EBELN = TEKPO-EBELN
                                      AND   EBELP = TEKPO-EBELP
                                      AND   BEWTP = 'E'.
      IF T_SHKZG = 'S'.
        TT_SUM = TT_SUM + T_SUM.
      ELSE.
        TT_SUM = TT_SUM - T_SUM.
      ENDIF.
    ENDSELECT.
    IF TT_SUM <> 0.
      MESSAGE E899(MM) WITH TEKPO-EBELN TEKPO-EBELP '由于已收貨，不允許修改價格'.
    ENDIF.
  ENDIF.
  CLEAR T_NETPR.
  CLEAR TT_SUM.
  CLEAR T_SUM.
ENDLOOP.
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.

4.激活增強(qiáng)項(xiàng)目

5.增強(qiáng)后效果

上圖采購訂單已收貨，上面增強(qiáng)激活后如果這時去修改采購訂單價格，系統(tǒng)報(bào)錯，不允許修改采購訂單價格，提示不能更改價格。

閱讀原文：https://blog.51cto.com/u_16014698/6210857