<%
'*****************************************************************
' Subroutines to support delivery address per product
' Version 5.00 Jan 20, demo
'******************************************************************
const dFirstName=1
const dLastName=2
const dAddress=3
const dCity=4
const dState=5
const dPostCode=6
const dcountry=7
const dCompany=8
const dPhone=9
const dEmail=10
const dDeliveryType=11
const Dshippingtype=12
const dshippingcost=13
const dComment=14
const dSignature=15
Const dDeliveryTime=16
const DeliveryAttributes=17
const DeliveryDelimiter=";"

Sub CreateDeliveryAddress (deliveryarray)
end sub

sub SetupDeliveryFields (Deliveryarray)
end sub
'add namesto cart
Sub GetDeliveryName (name, DeliveryArray)
end sub
Sub AddDeliveryField (caption,name,value)
end sub

Sub VerifyDeliveryAddress(rc)
end sub

Sub ConvertDeliveryToString(DeliveryArray, ostring)
end sub

Sub ConvertDeliveryToArray(DeliveryArray,istring)
end sub
%>