CALL FUNCTION 'CK_F_MATERIAL_CALC'
    EXPORTING
      klvar       = lv_klvar "iv_klvar
      matnr       = iv_matnr
      werks       = iv_werks
      tvers       = lv_tvers "iv_tvers
      kadat       = sy-datum
      bwdat       = sy-datum
      s_dunkel    = 'X'
      s_update    = 'S'
      s_no_commit = ''
      s_sngl_lock = ''.