function MSCSExecute(config, orderform, context, flags)
    set items = orderform.Value("Items")
    for each item in items 
        On Error Resume Next
        item.Value("_cy_oadjust_adjustedprice") = (item.Value("quantity") * item.Value("_product_cy_list_price")) 
    next	
    MSCSExecute = 1
end function