function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

function unblur() {
	this.blur();
} 
function blurLinks() {
	if (!document.getElementById) return;
	theLinks = document.getElementsByTagName("A");
	theAreas = document.getElementsByTagName("AREA");
	for(i=0; i<theLinks.length; i++) {theLinks[i].onfocus = unblur;}
	for(i=0; i<theAreas.length; i++) {theAreas[i].onfocus = unblur;}
  }
  
  
  function doPrint()
{
  window.focus();
  window.print();
}



function tableruler()
{
	if (document.getElementById && document.createTextNode)
	{
		var tables=document.getElementsByTagName('table');
		for (var i=0;i<tables.length;i++)
		{
			if(tables[i].className=='ruler')
			{
				var trs=tables[i].getElementsByTagName('tr');
				for(var j=0;j<trs.length;j++)
				{
					if(trs[j].parentNode.nodeName=='TBODY')
					{
						trs[j].onmouseover=function(){this.className='ruled';return false}
						trs[j].onmouseout=function(){this.className='';return false}
					}
				}
			}
		}
	}
}


function doPrint()
{
  window.focus();
  window.print();
}

//Array of Chalets
//Object constructor
function chaletRecord(chalet_id, chalet_name, country_c, resort_id, chalet_rating, sleeps_min, sleeps_max)
{
  this.chalet_id = chalet_id
  this.chalet_name = chalet_name
  this.country_c = country_c
  this.resort_id = resort_id
  this.chalet_rating = chalet_rating
  this.sleeps_min = sleeps_min
  this.sleeps_max = sleeps_max
}

//Create main array
var chaletList = new Array()

//Create array pointer
var chaletPoint

//Fill main array entries with objects
<%
Dim rstChaletList, icount
icount = 0
'retrieve chalet id and name from DB
strSQL = "SELECT tbl_Chalet.Chalet_ID_C, tbl_Chalet.Chalet_Name_X, tbl_Resort.Country_C, tbl_Chalet.Resort_ID_C, tbl_Chalet.Chalet_Type_C, " & _
                      "tbl_Chalet.Sleeps_Min_A, tbl_Chalet.Sleeps_Max_A " & _
			"FROM tbl_Chalet INNER JOIN " & _
                      "tbl_Resort ON tbl_Chalet.Resort_ID_C = tbl_Resort.Resort_ID_C INNER JOIN " & _
                      "tbl_Website_Resort ON tbl_Resort.Resort_ID_C = tbl_Website_Resort.Resort_ID_C " & _
			"WHERE (tbl_Website_Resort.Website_ID_C = " & intWebsiteID & ") AND (tbl_Chalet.Suspend_B = 'N') AND (tbl_Chalet.AccomType_ID_C = " & intCateringTypeID & ") " & _
			"ORDER BY tbl_Chalet.Chalet_Name_X"
Set rstChaletList = DBConn.Execute(strSQL)
'create a javascript array entry for each chalet
While Not rstChaletList.EOF
	Response.Write "chaletList[" & icount & "] = new chaletRecord(""" & rstChaletList("chalet_id_c") & """, """ & rstChaletList("chalet_name_x") & """,""" & _
														rstChaletList("country_c") & """,""" & rstChaletList("resort_id") & """,""" & _
														rstChaletList("chalet_type_c") & """,""" & rstChaletList("sleeps_min_a") & """,""" & _
														rstChaletList("sleeps_max_a") & """);" & vbcrlf
	rstChaletList.Movenext
	icount = icount + 1
Wend
Response.Write "chaletPoint = " & icount & ";"
Set rstChaletList = Nothing
%>

function populateChaletList()
{
var myEle;
var flag = 0;

//Clear drop down list
for (var q=frmsearch.chaletlist.options.length; q>=0; q--)
  {
    frmsearch.chaletlist.options[q] = null;
  }   

//Add 'Show all' to top of list
myEle = document.createElement ("option");
myEle.value = '';
myEle.text = 'Show All';
frmsearch.chaletlist.add(myEle);			

//Add array of items to dropdown list
for (x=0; x < chaletPoint; x++)
  {
         
    //Retrieve Groupsize and Rating
    var intGroupSize = frmsearch.txtsleeps.options[frmsearch.txtsleeps.selectedIndex].value;
    var intRating = frmsearch.txtrating.options[frmsearch.txtrating.selectedIndex].value;

	if(intGroupSize != "" || intRating != "")
	{
	  if(intRating != "")
	  {
		if(intGroupSize != "")
		{
			if(intGroupSize >= chaletList[x].min_sleeps && intGroupSize <= chaletList[x].max_sleeps && intRating == chaletList[x].chalet_rating)
			{
				//Add chalet to list
				myEle = document.createElement ("option");
				myEle.value = chaletList[x].chalet_id;
				myEle.text = chaletList[x].chalet_name;
				frmsearch.chaletlist.add(myEle);			
				flag = 1;
			}
		}
		else
		{
			if(intRating == chaletList[x].chalet_rating)
			{
				//Add chalet to list
				myEle = document.createElement ("option");
				myEle.value = chaletList[x].chalet_id;
				myEle.text = chaletList[x].chalet_name;
				frmsearch.chaletlist.add(myEle);				
				flag = 1;
			}
		}
	  }
	  else
	  {
		  if(intGroupSize >= chaletList[x].min_sleeps && intGroupSize <= chaletList[x].max_sleeps)
		  {
			//Add chalet to list  
			myEle = document.createElement ("option");
			myEle.value = chaletList[x].chalet_id;
			myEle.text = chaletList[x].chalet_name;
			frmsearch.chaletlist.add(myEle);			  
			flag = 1;
		  }
	  }
	}
	else
	{
        myEle = document.createElement ("option");
        myEle.value = chaletList[x].chalet_id;
        myEle.text = chaletList[x].chalet_name;
        frmsearch.chaletlist.add(myEle);		
		flag = 1;
	}

	if(flag == 0)
	{
		for (var q=frmsearch.chaletlist.options.length; q>=0; q--)
		{
			frmsearch.chaletlist.options[q] = null;
		}  		
		myEle = document.createElement ("option");
        myEle.value = '';
        myEle.text = 'No matching properties';
        frmsearch.chaletlist.add(myEle);		
	}
}
