<%
Option Explicit
Dim OrderTotal
Dim SandH
Dim TotalDue
OrderTotal = Session("OrderTotal") * Application("CurrentDiscount")
SandH = OrderTotal * Application("ShipHandPercent") 
If SandH < Application("MinShipHand") Then
   SandH = Application("MinShipHand")
End If
TotalDue = SandH + OrderTotal
%>
