Copy Control Requirement No-Repricing during Billing Creation

   tvcpf-knprs = 'B'.
*end change By Durga 
    SELECT SINGLE * FROM z00_otype WHERE vkorg = vbak-vkorg AND auart = vbak-auart AND
      bsark = vbkd-bsark .
    IF sy-subrc = 0 AND z00_otype -reprice IS INITIAL .
*end change By Durga 
      tvcpf-knprs = 'D'." No Re-price
      lrefcp-pmode = 'D'." No _reprice."If this is not changed it wont work for D.
      MODIFY lrefcp TRANSPORTING pmode WHERE kposn = vbap-posnr.
    ELSE.
      sy-subrc = l_subrc.
    ENDIF.