<%@ Page Language="VB" Explicit="False" %> <%@ Import Namespace="PDshop8" %> Administrator <% if closewin="Y" then%> <% end if %>
<% if ratemethod="5" then %> <%end if %> <% if ratemethod="6" then %> <%end if %> <% if ratemethod="7" then %> <%end if %>
Shipping Rates
 <%=pd.getFormError()%>
by Order Subtotal:
<% pd.OpenDataReader("SELECT * FROM shiprates WHERE ratetype=1 AND carrierid=" & id & " ORDER BY fromamt") do while pd.ReadDataItem.read fromamt=pd.ReadData("fromamt") toamt=pd.ReadData("toamt") nrate=pd.ReadData("rate") nrate2=pd.ReadData("rate2") qtymethod=pd.ReadData("method") if qtymethod=0 then if nrate2>0 then showqtyrate=pd.showcurr(nrate) else showqtyrate=pd.showcurr(nrate) end if else if nrate2>0 then showqtyrate=pd.ReadDataN("orderpct") & "%" & " + " & pd.showcurr(nrate2) else showqtyrate=pd.ReadDataN("orderpct") & "%" end if end if %> <% loop pd.CloseData() %>
From: To: Charge:
<%=pd.showcurr(fromamt)%> <%=pd.showcurr(toamt)%> <%=showqtyrate%> ">
by Weight:
<% pd.OpenDataReader("SELECT * FROM shiprates WHERE ratetype=2 AND carrierid=" & id & " ORDER BY fromamt") do while pd.ReadDataItem.read fromamt=pd.ReadDataN("fromamt") toamt=pd.ReadDataN("toamt") fromnum=pd.ReadDataN("fromnum") tonum=pd.ReadDataN("tonum") nrate=pd.ReadData("rate") nrate2=pd.ReadData("rate2") qtymethod=pd.ReadData("method") if qtymethod=0 then showqtyrate=pd.showcurr(nrate) else showqtyrate=pd.showcurr(nrate2) & " per lb/kg" end if %> <% loop pd.CloseData() %>
From: To: Charge:
<%=(fromnum)%> <%=(tonum)%> <%=showqtyrate%> ">
by # of Items:
<% pd.OpenDataReader("SELECT * FROM shiprates WHERE ratetype=3 AND carrierid=" & id & " ORDER BY fromamt") do while pd.ReadDataItem.read fromamt=pd.ReadDataN("fromamt") toamt=pd.ReadDataN("toamt") fromnum=pd.ReadData("fromnum") tonum=pd.ReadData("tonum") nrate=pd.ReadData("rate") nrate2=pd.ReadData("rate2") qtymethod=pd.ReadData("method") if qtymethod=0 then showqtyrate=pd.showcurr(nrate) else showqtyrate=pd.showcurr(nrate2) & " per item" end if %> <% loop pd.CloseData() %>
From: To: Charge:
<%=(fromnum)%> <%=(tonum)%> <%=showqtyrate%> ">