SELECT pricePerWeek FROM tblJobCreditPrice variables.error = ArrayNew(1); if (isdefined("form.stage")) { if (form.stage EQ 2) { if (NOT len(form.credits)) foo = arrayAppend(variables.error, "Please enter the number of credits you wish to purchase"); if (arraylen(variables.error)) form.stage = form.stage - 1; } if (form.stage EQ 4) { if (NOT len(trim(form.invoiceName))) foo = arrayAppend(variables.error, "Please enter a name for this invoice"); if (NOT len(trim(form.invoiceJobTitle))) foo = arrayAppend(variables.error, "Please enter a job title for this invoice"); if (NOT len(trim(form.invoiceAddress))) foo = arrayAppend(variables.error, "Please enter an address for this invoice"); if (NOT len(trim(form.invoiceTelephone))) foo = arrayAppend(variables.error, "Please enter a telephone no. for this invoice"); function IsEmail(str) { if (REFindNoCase("^['_a-z0-9-]+(\.['_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+)*\.(([a-z]{2,3})|(aero|coop|info|museum|name))$",str)) return TRUE; else return FALSE; } if (not len(form.invoiceEmail)) { foo = arrayAppend(variables.error, "Please enter an email address"); } else if ( not IsEmail(form.invoiceEmail) ) { foo = arrayAppend(variables.error, "Your email address does not appear to be formatted correctly."); } if (NOT len(trim(form.invoiceNo))) foo = arrayAppend(variables.error, "Please enter an invoice no./ref for this invoice"); if (arraylen(variables.error)) form.stage = 2; } } DECLARE @orderID int SET NOCOUNT ON INSERT INTO tblOrders (orderValue, userID, paymentMethod, clearedAmount, orderType) VALUES (, , , 0, ) SET @orderID = @@IDENTITY SELECT @@IDENTITY AS orderID INSERT INTO tblJobCredits (credits, dateAdded, orderID, userID, jobID, cleared) VALUES (, getdate(), @orderID, , , ) SET NOCOUNT OFF

Thank you for you order.

You have chosen to pay for these credits by cheque. Before your credits can be allocated, you must send your cheque for £#lscurrencyformat(variables.orderValue, "none")# to:

xxxxx
xxxxx
xxxxx SELECT title, firstname, lastname, homeemail, workemail, emailPref FROM tblUsers WHERE userID = The following user has purchased credits on the Credit Today website using the "Cheque" payment method. The credits will not be allocated to the user until the cheque has been "cleared" in the admin's Orders section: #Application.vRoot#secure/orders/orders_list.htm?orderID=#form.orderID# Dear #UserDetails.title# #UserDetails.lastname#, Thank you for your recent purchase of credits on the Credit Today website. Your chosen payment method was cheque and before your credits can be allocated to you, please send your check for £#lscurrencyformat(variables.orderValue, "none")#, made payable to:

Thank you for you order.

You have chosen to pay for these credits by invoice, for the following amount:

£#lscurrencyformat(variables.orderValue, "none")#

 SELECT title, tblUsers.firstname, tblUsers.lastname, tblUsers.homeemail, tblUsers.workemail, tblUsers.emailPref, tblUsers.telephone, tblUsers.fax, tblUsers.address, tblUsers.towncity, tblCounties.countyName, tblCountries.countryName, tblUsers.postcode FROM tblUsers LEFT JOIN tblCounties ON tblUsers.countyID = tblCounties.countyID LEFT JOIN tblCountries ON tblUsers.countryID = tblCountries.countryID WHERE userID = The following user has purchased credits on the Credit Today website using the "Invoice" payment method. The credits will not be allocated to the user until the invoice has been "cleared" in the admin's Orders section: #Application.vRoot#secure/orders/orders_list.htm?orderID=#form.orderID# User Details ============ Name: #UserDetails.title# #UserDetails.firstname# #UserDetails.lastname# Home Email: #UserDetails.homeemail# Work Email: #UserDetails.workemail# Telephone: #UserDetails.telephone# Fax: #UserDetails.fax# Address: #UserDetails.address# Town/City: #UserDetails.towncity# County: #UserDetails.countyName# Country: #UserDetails.countryName# Postcode: #UserDetails.postcode# Dear #UserDetails.title# #UserDetails.lastname#, Thank you for your recent purchase of credits on the Credit Today website. Your chosen payment method was invoice. SELECT sum(tblJobCredits.credits) AS credits FROM tblJobCredits WHERE tblJobCredits.userID =

Recruitment Extranet

#variables.successMessage#
How many credits would you like to purchase?:
(Current credit price is: £#lscurrencyformat(GetRate.pricePerWeek,"none")# per credit)
Payment Method:
SELECT tblUsers.title, tblUsers.firstname, tblUsers.lastname, tblUsers.emailPref, tblUsers.workemail, tblUsers.homeemail FROM tblUsers WHERE tblUsers.userID =
Online Payment by Credit/Debit Card
No. of Credits #form.credits# Credits
Total: £#lscurrencyformat(form.credits*getRate.pricePerWeek, "none")#
Payment By Cheque
No. of Credits #form.credits# Credits
Total: £#lscurrencyformat(form.credits*getRate.pricePerWeek, "none")#
Invoice Details
Name: *
Job Title: *
Address: *
Telephone: *
Email: *
Invoice no./ref: *
Online Payment by Invoice
Name: #form.invoiceName#
Job Title: #form.invoiceJobTitle#
Address: #form.invoiceAddress#
Telephone: #form.invoiceTelephone#
Email: #form.invoiceEmail#
Invoice no./ref: #form.invoiceNo#
 
No. of Credits #form.credits#s
Total: £#lscurrencyformat(form.credits*getRate.pricePerWeek, "none")#