采购订单审批后，价格不允许更改

常见需求

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级审核后不允许价格更改