// ************************************************************************
// ** Script Name:  onlinePaymentScript.asp                              **
// ** Version:      1.0  - 01/11/2005                                    **
// ** Author:       Matt Greenshields                                    **
// ** Function:     Javascript for the online payment form               **
// **               Kept separate from the web page for editing safety   **
// **               This file uses an ASP include to include the array   **
// **               of event information event.txt, which must be in an  **
// **               exactly correct format with each line containing     **
// **               six items of information                             **
// **                                                                    **
// **               1. The event descripion in double quotes             **
// **               2. The full price                                    **
// **               3. The concessionary price                           **
// **               4. The deposit required or zero if full payment only **
// **               5. The cost of the minibus or zero if there is none  **
// **               6. true or false to enable or disable online booking **
// **                                                                    **
// **               All but the last line must end in a comma, like the  **
// **               following example line                               **
// **                                                                    **
// ** "Introductory Day Retreat at LBC, November 12th",25,18,0,0,true,   **
// **                                                                    **
// ** Revision History:                                                  **
// **  Version  Author      			Date and notes                 **
// **    1.0    Matt Greenshields  01/11/2005 - First release            **
// ************************************************************************

var allRetreats = new Array("Introductory Weekend Retreat at Vajrasana                       Sep 26-28",115,80,50,12,true,
"Buddhist Meditation Foundation Course at St Martins Lane        Sep 27-Oct 18",68,48,0,-1,true,
"Buddhism Course at LBC                                          Oct 9-Nov 6",57,40,0,-1,true,
"What Matters? Retreat at Vajrasana                              Oct 10-12",105,75,50,-1,true,
"Compassionate Communication course at LBC                       Oct 11",21,16,0,-1,true,
"Introductory Day Retreat at the LBC                             Oct 18",28,21,0,-1,true,
"MBRP Course for Addiction at the LBC                            Oct 20-Nov 24", 95,75,0,-1,true,
"Buddhist Meditation Foundation Course at St Martins Lane        Oct 25-Nov 15",68,48,0,-1,true,
"Introductory Weekend Retreat at Vajrasana                       Nov 14-16",115,80,50,12,true,
"Buddhist Meditation Foundation Course at the LBC                Nov 18-Dec 16",57,40,0,-1,true,
"Cultivating Loving Kindness Course at the LBC                   Nov 20-Dec 18",57,40,0,-1,true,
"Into Silence - Women Mitras' retreat at Vajrasana               Nov 21-23",105,75,50,-1,true,
"Buddhist Meditation Foundation Course at St Martins Lane        Nov 22-Dec 13",68,48,0,-1,true,
"Introductory Day Retreat at the LBC                             Nov 29",28,21,0,-1,true,
"Awakening at LBC                                                Nov 30",21,16,0,-1,true,
"Introductory Weekend Retreat at Vajrasana                       Dec 5-7",115,80,50,12,true,
"Winter Open Retreat - Sibford (10 days) PRICE UNTIL DEC 1       Dec 22-Jan 1",350,250,50,-1,true,
"Winter Open Retreat - Sibford(First 5 days) PRICE UNTIL DEC 1   Dec 22- 27",200,150,50,-1,true,
"Winter Open Retreat - Sibford(Second 5 days) PRICE UNTIL DEC 1  Dec 27- Jan 1",200,150,50,-1,true,
"Mandala Retreat at Vajrasana                                    Dec 28-Jan 1",155,115,50,12,true )
var retreats = new Array()

function changeLBCEvent()
{
lbcEvent=document.forms[0].LBCEvent
payment=document.forms[0].Payment

if (lbcEvent.selectedIndex < lbcEvent.length)
	{
	payment.value="Balance"
	}
else
	{
	payment.value="Donation"
	}
displayTotalCost()
}

function changeRate()
{
rate=document.forms[0].Rate
displayTotalCost()
}

function setup()
{
j=0
for (i=0; i<allRetreats.length/6; i++)
{
if (allRetreats[6*i+3]>0)
	{
	for (k=0; k<6; k++)
		{
		retreats[6*j+k]=allRetreats[6*i+k]
		}
	j++
	}
}

lbcEvent=document.forms[0].LBCEvent
lbcEvent.length=(retreats.length/6)
for (i=0; i<lbcEvent.length; i++)
{
lbcEvent[i].text=retreats[6*i]
}

eventIndex=document.forms[0].EventIndex
lbcEvent.selectedIndex=eventIndex.value

changeLBCEvent()
}

function displayTotalCost()
{
rate=document.forms[0].Rate
amount=document.forms[0].Amount
lbcEvent=document.forms[0].LBCEvent

if (rate[0].checked)
	{amount.value=retreats[6*lbcEvent.selectedIndex+1]-retreats[6*lbcEvent.selectedIndex+3]}
else
	{amount.value=retreats[6*lbcEvent.selectedIndex+2]-retreats[6*lbcEvent.selectedIndex+3]}
document.getElementById('totalCostText').innerHTML="balance of £"+amount.value
}

function validate()
{
lbcEvent=document.forms[0].LBCEvent
eventIndex=document.forms[0].EventIndex
desc=document.forms[0].Description

field=document.forms[0].Amount
if (field.value==null||field.value=="")
	{alert("Please enter an amount");return false}
amount = parseFloat(field.value)
if (!amount||amount<=0)
	{alert("Please enter a valid number for the amount");return false}
field=document.forms[0].FirstName
if (field.value==null||field.value=="")
	{alert("Please enter your first name");return false}
field=document.forms[0].Surname
if (field.value==null||field.value=="")
	{alert("Please enter your surname");return false}
field=document.forms[0].DeliveryAddress
if (field.value==null||field.value=="")
	{alert("Please enter your address");return false}
field=document.forms[0].DeliveryPostCode
if (field.value==null||field.value=="")
	{alert("Please enter your postcode");return false}
field=document.forms[0].Customeremail
if (field.value==null||field.value=="")
	{alert("Please enter your email address");return false}

eventIndex.value=lbcEvent.selectedIndex

desc.value=lbcEvent[lbcEvent.selectedIndex].text
return true
}