LV61AA55 this in include we can enhancement pricing routines va01

when you get requirments to enhacement to pricing routine you go to the programs and develop the this t-code you can also develop the vofm routines to get the requiments for vofm you have to need to access key the break the standared progrms.................

BREAK rohinik.

  data : lv_flag1 type c.
DATA: lv_kwert like xkomv-kwert,       
lv_value like xkomv-kwert.   
LOOP AT XKOMV WHERE kschl = 'PR00'.      
IF SY-subrc = 0.       
lv_kwert = Xkomv-KWERT / 10.     
ENDIF.   
ENDLOOP.   
LOOP AT XKOMV WHERE kschl = 'ZNOY'.     
IF SY-subrc = 0.       
lv_value = ( XKOMV-kbetr / 100 ) * lv_kwert.       
Xkomv-kwert = lv_value.     
MODIFY XKOMV transporting kwert.
ENDIF.
  ENDLOOP.