採購訂單審批後，價格不允許更改

weixin_30639719發表於2020-04-05

常見需求

INCLUDE:LV69AF01

位置：最後

ENHANCEMENT 1  ZMMU003.    "active version

 DATA : LV_FRGKE TYPE ekko-FRGKE .
 IMPORT LV_FRGKE FROM  MEMORY ID 'MM2'."來源se38->LMEPOF2T
if ( sy-tcode = 'ME22N' or sy-tcode = 'ME23N'
  or sy-tcode = 'ME22' or sy-tcode = 'ME29N' )
  and ( LV_FRGKE = '2' OR LV_FRGKE = '3').

data : lv_tabix TYPE sy-tabix .
 loop at tctrl_konditionen-cols into acol.
   lv_tabix = sy-tabix .
if acol-screen-name eq 'KOMV-KBETR'
  or   acol-screen-name eq 'RV61A-KOEIN'
  or   acol-screen-name eq 'KOMV-KPEIN'
  or   acol-screen-name eq 'KOMV-KMEIN'
  or   acol-screen-name eq 'KOMV-KUMZA'
  or   acol-screen-name eq 'KOMV-KUMNE' .


   acol-screen-input =  0 .
    modify tctrl_konditionen-cols from acol index lv_tabix.

endif .
endloop .
ENDIF .
ENDENHANCEMENT.

3級審批，2，3級稽核後不允許價格更改

轉載於:https://www.cnblogs.com/sapSB/p/6628809.html

相關文章