<% Sub CalculateHandling (subtotal, total, shippingcost, handling) '*************************************************************** ' This routine calculates handling fee for VP-ASP ' Inputs are ' subtotal - price of of products order ' total - price including shipping ' shippingcost cost of shipping ' handling this value needs to be set and returned ' Version 4.0 '***************************************************************** Handling=0 If getconfig("xhandlingPrice")<>"" then Handling=getconfig("xhandlingPrice") end if end sub %>