A duplicate order was found. Please do not attempt to re-submit your order, as you may be charged more than once for your purchase. If this is a problem, please contact your system administrator as soon as possible. <## this derives the base URL up through the script name ##> <## in the case that the server supports https, set a URL ##> <## the following routine is used to simply load memory variable ##> <## The following subroutine is used to sum up the products that have been placed in the basket so far. ##> <## following are the subroutines to let the user know that we have received their order and where we record it to the data file ##> <## This is to verify that the user entered enough information to process their order. The first step is validating the e-mail address. Remember that the first character, and the last, may not be the "@" character, however, the address must contain the character somewhere. ##> <## This routine is used to validate the customer's credit card number. SOME BACKGROUND: all credit card numbers follow a strict checksum, and can be verified mathematically. ##> <## remove all non numeric characters ##> <## odd ##> <## even ##> <## Odd number of digits ##> <## even ##> <## if information provided to process an order was invalid, an error flag is set and a list of invalid information is created. ##> Name"> Shipping Address"> City"> State"> Zip Code"> Country"> Email address (must be valid)"> Credit Card"> Credit Card Number (must be valid)"> Expiration Date"> Credit Card Name"> Shipping Method"> "> <## the same conditional is used as before because if the information given was invalid, arg4 is changed and the order form is brought up again. ##> <## find if upsold product info is complete ##> <## accept EQ "sold" ##> <## If all information was filled out completely ##> <## Now we calculate the grand total ##> <## This means: get shipping rates ##> <## get shipping charge ##> <## (calculations are done "along the way.") ##> <## first arrange a table of product quantities ##> <## arrange a list of product weights and prices that corresponds to the list of ordered items ##> <## calc taxable total ##> <## calc shipping ##> <## now, find sales tax for customer's state ##> <## now update the order file as necessary ##> <## product was upsold ##> <## arrange upsell information for order in arrays ##> <## get the title of the upsold item ##> <## create array of product titles from catalog file ##> &[callvalue] &[callvalue] Dear New Customer,

First of all, we would like to thank you very kindly for your investment in our software and we welcome you to the family of Utopia Originator users. For your safety, and the safety of your personal credit, we require credit card users to review the license agreement and authorize their credit card use by actual signature. If you are satisfied with your purchase, please print this invoice to your local printer, sign it, and fax it to us at 407-540-9444. Your pending order will be processed and shipped as soon as we receive it. If we do not receive your fax, we will fax an invoice for you to sign at the number you've given us on this order.

<## allthere EQ "1" ##> <## arg5 EQ "done" ##> <## get upsell percentage ##> <## caluculate max price of upsell product, arrange valid products in a list, and calculate list length ##> <## arrange list of ordered products ##> <## check if product is already in basket ##> <## keep products in basket from being upsold ##> <## check product prerequisites ##> <## verify upsell cantidate's prerequisites ##> <## now join the two lists where they agree ##> <## get a random number that will correspond to the product in the list that is to be upsold ##> <## get the price of the random product that will be upsold ##> <## uslistlength GT 0 ##> <## pctg GT 0 ##> <## errmsg EQ "" ##> <## This is how the thank you screen is called in the case that the customer was not eligible to receive an upsold product ##> <## This causes the "notdone" loop to re-iterate and bring up the thankyou screen ##> <## Here is where, if eligable, the customer may add the upsell item to their order ##> &[callvalue] &[callvalue]

Special Offer

---

If you act now you can receive the following product at special discounted price of only - a savings of off the regular price!

I'll Take It!

	"> "> "> "> ">

---

&[callvalue] &[callvalue]