VA01复制单据，更新定价日期和价格

Posted 2020-08-21 ^ω^SAp傻X^o^

用户经常复制单据，而复制单据的时候会带过来很多日期的历史数据。定价日期就是其中之一，而价格经常变动，或者删除的话，会出现价格错误等等情况。

1.更新定价日期，保证不会使用历史价格。

2.更新价格，保证价格是跟着定价日期出来的。

 

1.更新定价日期

Include LV45CFDB

FORM   VBKD_SELECT

做隐式增强，在FORM结束的位置，更新一下VBKD.

LOOP AT fxvbkd.
  fxvbkd-PRSDT = SY-DATUM.
  MODIFY fxvbkd.
ENDLOOP.

 

2.更新价格

Include  MV45AFZB(销售订单的出口)

FORM  USEREXIT_NEW_PRICING_VBKD

IF VBAK-VGBEL IS NOT INITIAL AND SY-UCOMM = ‘UEBR‘.
  new_pricing = ‘B‘.
ENDIF.