<!-- ===================================================
<!-- File Name   : libJavascriptPB.js
<!-- Description : Javascript Functions
<!-- Version     : 1.1
<!-- ===================================================
<!-- 
<!-- This file and any code within it is owned by Perfect Blue  -  http://www.perfectblue.co.uk
<!-- and is licensed for use only by Perfect Blue clients.  This file may not be resold, copied
<!-- transferred or modified without prior permisson from Perfect Blue for any purpose other
<!-- than as a backup or archive copy.
<!-- © 2003 Perfect Blue
<!-- http://www.perfectblue.co.uk

function pb_formToGetURL(formName) {
    var fieldName='';
	var fieldValue='';
	var url='';
		for (var i = 0; i<document.forms[formName].elements.length; i++) {
			fieldName = escape(document.forms[formName].elements[i].name);
			fieldValue = escape(document.forms[formName].elements[i].value);
			url += fieldName+'='+fieldValue+'&';
		}	
    return url;
}

function pb_noRefreshSubmit(formName,url,swapImage,message) {
	var getVars='';
	var fullUrl='';
		getVars=pb_formToGetURL(formName);
		fullurl = url+getVars;
		swapImage.src=fullurl;
	if (message) {
		alert(fullurl);
		alert(message);
	}
	return false;
}

function pb_changeActSubmit(formName,actValue,message) {
	if (message) {
		if (confirm(message)) {		
			document.forms[formName].elements['act'].value=actValue;
			document.forms[formName].submit();
		}
	} else {
			document.forms[formName].elements['act'].value=actValue;
			document.forms[formName].submit();
	}
}


function pb_cVarSubmit(formName,cVar,cVarValue,message) {
	if (message) {
		if (confirm(message)) {		
			document.forms[formName].elements[cVar].value=cVarValue;
			document.forms[formName].submit();
		}
	} else {
			document.forms[formName].elements[cVar].value=cVarValue;
			document.forms[formName].submit();
	}
}


function pb_changeActSubmitToBlank(formName,actValue,message) {
	if (message) {
		if (confirm(message)) {		
			document.forms[formName].elements['act'].value=actValue;
			document.forms[formName].target='blank';
			document.forms[formName].submit();
			document.forms[formName].target='_self';
		}
	} else {
			document.forms[formName].elements['act'].value=actValue;
			document.forms[formName].target='_blank';
			document.forms[formName].submit();
			document.forms[formName].target='_self';
	}
}



function pb_getURL(url) {
	window.location=url;
	}
	
function pb_popUp(url,winName,toolbar,scrollbars,location,statusbar,menubar,resizable,width,height) {
	lft = ',left='+((screen.width-width)/2);
	tp = ',top='+((screen.height-height)/2);
	toolbar = 'toolbar='+toolbar;
	scrollbars=',scrollbars='+scrollbars;
	location=',location='+location;
	statusbar=',statusbar='+statusbar;
	menubar=',menubar='+menubar;
	resizable=',resizable='+resizable;
	width=',width='+width;
	height=',height='+height;
	params = ' '+toolbar+scrollbars+location+statusbar+menubar+resizable+width+height+lft+tp;
	//confirm(params);
	pb_popWin = window.open(url,winName,params);	
	return pb_popWin;
}

function pb_setAllCheckboxes(fmName,cbNamePart,cbCheck) {
// cbCheck should be true or false;
var fldName = new String('');
var cbName = new String(cbNamePart);
  with (document.forms[fmName]) {
    for (var i=0; i < elements.length; i++) {
	fldName = elements[i].name;
    if (elements[i].type == 'checkbox' && fldName.substring(0,cbName.length) == cbName)
    elements[i].checked = cbCheck;
    }
  }
}

function pb_toggleCheckboxes(fmName,cbNamePart) {
	cbCount = pb_countCheckedCheckboxes(fmName,cbNamePart);
	if (cbCount>1) {
		cbCheck = false;
	} else {
		cbCheck = true;
	}
	pb_setAllCheckboxes(fmName,cbNamePart,cbCheck);
}

function pb_getURL(pbURL) {	
	document.location = pbURL;
}

function pb_decodeEA(val) {
    encVal = new String(val);
    finVal = '';
    for (i=0;i<encVal.length;i++) {
    finVal+=(String.fromCharCode(encVal.charCodeAt(i)-7));
    }
    return finVal;
}

function pb_displayEA(val) {
	document.write('<a href="mailto:'+pb_decodeEA(val)+'">');
	document.write(pb_decodeEA(val));
	document.write('</a>');
}

function pb_swapStyle(pbObj,setStyle) {
	pbObj.className=setStyle;
}





	


//THIS GOES WITH THE MACROMEDIA VALIDATE FORM SCRIPT TO CONVERT fieldName TO Field Name FOR DISPLAY
function pb_convertFieldName(name) {
	oldName = new String(name);
	newName = new String('');
	newName += oldName.substr(0,1);
	newChar = new String('');
	newName = newName.toUpperCase(); 
	for (i=1;i<oldName.length;i++) {
		newChar = oldName.substr(i,1);
		if (newChar.charCodeAt(0)>90) {
			newName+=newChar;
		} else {
			newChar = newChar.toUpperCase();
			newName += ' '+newChar;
		}
	}
	return ''+newName;
}

// MACROMEDIA FUNCTIONS

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_validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=pb_convertFieldName(val.name); if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='* '+nm+' must contain an e-mail address.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='* '+nm+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '* '+nm+' must be completed.\n'; }
  } if (errors) alert('Please correct the following:\n\n'+errors);
  document.MM_returnValue = (errors == '');
}

	
			




