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_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_findObj(n, d) { //v4.0
  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 && document.getElementById) x=document.getElementById(n); return x;
}

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 getPPFind(obj){
	var sURL;
	sURL = '/pp_find_new.cfm';
 	obj.action = sURL;
 	obj.submit();
}

function getSelected(obj){
 // I don't know why this was here, but it causes errors on IIS6.  Commented it out. -RPS 10/13/08
 //obj.action = window.location.pathname;
 obj.submit();
}

function openDetail(sURL, iRefNum, iPicSeq, iNumPic)
{
	var sNewURL;
	sNewURL = sURL + '/HePopupPic.cfm?lgpic=' + iRefNum + '&pic_seq=' + iPicSeq + '&NumPic=' + iNumPic;
	wDetail = window.open(sNewURL ,'wDetail','resizable=yes,scrollbars=yes,status=no,toolbar=no,height=520,width=550,top=25,left=75');
	wDetail.focus();
}

function openSPC()
{
	var sNewURL;
	sNewURL = '/spc.htm';
	wSPC = window.open(sNewURL ,'wSPC','resizable=yes,scrollbars=yes,status=no,toolbar=no,height=400,width=500');
	wSPC.focus();
}

function openSmallCal(sURL, pRefNum, pMonth, pYear)
{
	sNewURL = sURL + '/PopupCalendar.cfm?ref_num=' + pRefNum + '&month=' + pMonth + '&year=' + pYear;
	wCalendar = window.open(sNewURL , 'wCalendar', 'resizable=yes,scrollbars=no,status=no,toolbar=no,height=300,width=530,top=25,left=75');
	wCalendar.focus();
}

function openTranslate(sURL)
{
	top.location.href = sURL;
}

function Favorite(){
if ((navigator.appName=="Microsoft Internet Explorer") && (parseInt(navigator.appVersion)>=4)) {
  var url="http://www.perfectplaces.com/";
  var title="Perfect Places Vacation Rental Properties";
  window.external.AddFavorite(url,title);
   }
   else {
	  if(navigator.appName == "Netscape")
		 alert ("Please press Ctrl-D to add www.perfectplaces.com your favorites");
   }
}

function openCurrency(sURL)
{
	var sNewURL;
	sNewURL = sURL + '/currency_converter.cfm';
	currency_convert = window.open(sNewURL,'currency_convert','resizable=yes,scrollbars=yes,status=no,toolbar=no,height=450,width=700,top=25,left=75');
	currency_convert.focus();
}

function openMapWindow(url)
{
	window.open(url,"Window","scrollbars, width=640,height=640,resizable");
}

function openRentorsOrgWindow(url)
{
	window.open(url,"Window","scrollbars, width=700,height=640,resizable");
}