Purchasing Control Enhancements:ZXM06U42

  Case1:

Info Record

Vendor   Material          PurchaseOrg   Plant       Price

1000     LMM_RAW_10     CN12         YSAB       11

1000     LMM_RAW_10     CN12                          10

PO

Material         Plant     Po Price

LMM_RAW_10   YSAB      11

LMM_RAW_10   YSAC      10

Case2:

Info Record

Vendor   Material          PurchaseOrg   Plant       Price

1000     LMM_RAW_11     CN12                    8

PO

Material         Plant     Po Price

LMM_RAW_01   YSAB      8

LMM_RAW_01   YSAC      8

Case3:

Info Record

Vendor   Material          PurchaseOrg   Plant       Price

1000     LMM_RAW_12     CN12        YSAB         8.8

1000     LMM_RAW_12     CN12        YSAC         8.9

1000     LMM_RAW_12     CN12                           8

PO

Material         Plant     Po Price

LMM_RAW_01   YSAB      8.8

LMM_RAW_01   YSAC      8.9

 

Info Record

Vendor   Material          PurchaseOrg   Plant       Price

1000     LMM_RAW_13     CN12        YSAB         2

1000     LMM_RAW_13     CN02        YSAJ         12

PO

Material         Plant     Po Price

LMM_RAW_01   YSAB      2

LMM_RAW_01   YSAC      No Price

LMM_RAW_01   YSAJ      12

 

Control What?:

1.     It is must create Info Record before create PO

2.     The Current must be same between Info Record and Vendor.

 

How to Control:

Enhancements: ZXM06U42

 

SELECT netpr peint FROM EINE a EINA b

INTO (ITA-NETPR,ITA-PEINH)

WHERE a.infnr= b.infnr

AND b.matnr = i_ekpo-matnr

AND b.lifnr = i_ekpo-lifnr

AND (werks is null or werks =i_ekpo-werks)

AND ekorg=i_ekko-ekorg

 

     DESCRIBE TABLE ITA LINES LCOUNT.

      IF LCOUNT > 0.

        LOOP AT ITA WHERE NETPR = I_EKPO-NETPR AND PEINH = I_EKPO-PEINH.

          LLINES = LLINES + 1.

        ENDLOOP.

 

        IF LLINES = 0.

          MESSAGE E004(ZMM) WITH I_EKPO-NETPR I_EKPO-PEINH

           ' ' 'PO Rice and Info Recrd is different!'.

        ENDIF.

      ELSE.

        MESSAGE E004(ZMM) WITH I_EKPO-NETPR I_EKPO-PEINH

         ' ' 'No Info Record, please check!'.

      ENDIF.

 

 Table Reference

 

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值