function createRequestObject(inString) 
{ 
    var request   = new Object();
    var nameVal   = "";
    var separator = ",";

    if (inString.charAt(0) == "?") 
    { 
       inString = inString.substring(1, inString.length); 
        keypairs = inString.split("&"); 
        for (var i=0; i < keypairs.length; i++) 
        { 
            nameVal = keypairs[i].split("="); 
            for (a in nameVal) 
            { 
               nameVal[a] = nameVal[a].replace("+", " ");
               nameVal[a] = unescape(nameVal[a]).replace("[","").replace("]",""); 
            } 
            if (request[nameVal[0]]) 
            { 
               request[nameVal[0]] += separator + nameVal[1]; 
            } 
            else 
            { 
               request[nameVal[0]] = nameVal[1]; 
            } 
        } 
    } 
    return request; 
} 


function checkBrowser() {	
var detect = navigator.userAgent.toLowerCase();
var version,total;
	
		if (checkIt('konqueror'))
		{
			browser = "Konqueror";
			OS = "Linux";
		}
		else if (checkIt('safari')) browser = "Safari"
		else if (checkIt('omniweb')) browser = "OmniWeb"
		else if (checkIt('opera')) browser = "Opera"
		else if (checkIt('webtv')) browser = "WebTV";
		else if (checkIt('icab')) browser = "iCab"
		else if (checkIt('firefox')) browser = "Firefox"
		else if (checkIt('msie')) browser = "Internet Explorer"
		else if (!checkIt('compatible'))
		{
			browser = "Netscape Navigator"
			version = detect.charAt(8);
		}
		else browser = "An unknown browser";
		
		if (!version) version = detect.charAt(place + thestring.length);
		
		if (!OS)
		{
			if (checkIt('linux')) OS = "Linux";
			else if (checkIt('x11')) OS = "Unix";
			else if (checkIt('mac')) OS = "Mac"
			else if (checkIt('win')) OS = "Windows"
			else OS = "an unknown operating system";
		}
return;
}
function checkIt(string)
{
	place = detect.indexOf(string) + 1;
	thestring = string;
	return place;
}
function clik() {
var begin = document.cookie.indexOf("clik=Y");
if (begin == -1) {
	if(typeof(document.frames) == "undefined" || typeof(document.frames.bodyFrame) == "undefined") {document.location = "/clik.html?pg="+document.location; }
	else { parent.frames.bodyFrame.location = "/clik.html?pg=" + document.location; }
	}
else {
	begin = document.cookie.indexOf("svg=Y");
	if(begin == -1) {
		document.cookie="svg=Y";
		var svgIsLoaded;
		if(OS == "Windows") {
			if(browser == "Firefox") svgIsLoaded = (typeof(document.createElementNS("http://www.w3.org/2000/svg","rect")) == "object");
			if(browser == "Netscape Navigator") svgIsLoaded = (navigator.mimeTypes["image/svg+xml"]!=null)&&(navigator.mimeTypes["image/svg+xml"].enabledPlugin!=null);
			if(browser == "Internet Explorer") svgIsLoaded =  isSVGControlInstalled();
			if(browser == "Opera") svgIsLoaded = (navigator.mimeTypes["image/svg"]&&navigator.mimeTypes["image/svg"].enabledPlugin!=null)||(navigator.mimeTypes["image/svg-xml"]&&navigator.mimeTypes["image/svg-xml"].enabledPlugin!=null);
			if(!svgIsLoaded) parent.frames.bodyFrame.location = "svg.html?pg=" +document.location;
			}
		else {
			if(browser == "Firefox") {
				svgIsLoaded = (typeof(document.createElementNS("http://www.w3.org/2000/svg","rect")) == "object");
				if(!svgIsLoaded) parent.frames.bodyFrame.location = "svg.html?pg=" +document.location;
				}
			else {
				if(confirm("This site requires an SVG viewer to view documents.\nView the help page to install a viewer?")) {
					parent.frames.bodyFrame.location = "svg.html?pg="+document.location;
					}
				}
			}
		}
	}
}
function updateMap() {
r = parseInt(document.getElementById('mapRadius').value);
if (isNaN(r)) r = 0;
document.getElementById('mapRadius').value = r.toString();
a = document.getElementById('aerialNo').value;
t = parseFloat(document.getElementById('mapTransp').value);
if (isNaN(t)) t = 0.5;
if(t > 1.0) t = 1;
if(t < 0) t = 0;
document.getElementById('mapTransp').value = da(t,1);
document.getElementById('mplt').src = "http://vdb.pcpao.org/vdbie?"+mapX+","+mapY+","+r+","+"580,"+t+","+a+","+mapS;
var x = document.getElementById('mptr');
if(browser == "Internet Explorer") {
	document.getElementById('mbody').removeChild(x);
	do_map("mbody",mapX,mapY,r,mapW,t,a,mapS,NALPN);
	}
else document.getElementById('mplt').src = "http://vdb.pcpao.org/vdbie?"+mapX+","+mapY+","+r+","+mapW+","+t+","+a+","+mapS+","+NALPN;
}
function netscapeKeyPress(e) {
keyCode = e.which;
}
function do_map(mbdy,x,y,d,w,t,i,s,pn) {
var tr = document.createElement("TR");
tr.setAttribute("id","mptr");
var td23 = document.createElement("TD");
//td.setAttribute("height",w);
td23.setAttribute("align","center");
td23.setAttribute("colSpan","2");
if(browser == "Internet Explorer") {
	var eo = document.createElement("EMBED");
 	} 
 else {
	var eo = document.createElement("IFRAME");
 	}
eo.setAttribute("type","image/svg+xml");
eo.setAttribute("height",w);
eo.setAttribute("width",w);
eo.setAttribute("id","mplt");
eo.setAttribute("src", "http://vdb.pcpao.org/vdbie?"+x+","+y+","+d+","+w+","+t+","+i+","+s+","+pn);
td23.appendChild(eo);
var td1 = document.createElement("TD");
td1.setAttribute("align","center");
a1 = document.createElement("A");
a1.setAttribute("href",mapURL);
a1.setAttribute("target","_blank");
txt1 = document.createTextNode('Click here for Interactive Map');
a1.appendChild(txt1);
td1.appendChild(a1);
var td4 = document.createElement("TD");
td4.setAttribute("align","center");
a4 = document.createElement("A");
a4.setAttribute("href",mapURL);
a4.setAttribute("target","_blank");
txt4 = document.createTextNode('Click here for Interactive Map');
a4.appendChild(txt4);
td4.appendChild(a4);
tr.appendChild(td1);
tr.appendChild(td23);
tr.appendChild(td4);
document.getElementById(mbdy).appendChild(tr);
 }
function chkRetMap() {
if(navigator.appName == "Microsoft Internet Explorer") keyCode = window.event.keyCode;
if(keyCode == 13) updateMap();
return true;
}


//
// This code gets run to capture netscape keystrokes in keyCode
//
var thestring,place,OS,browser;
var detect = navigator.userAgent.toLowerCase();
var zeroes = "0000000";
var blanks = "_______";
var keyCode;
checkBrowser();
document.onKeyPress = netscapeKeyPress;
if(document.layers) document.captureEvents(Event.KEYPRESS);
if(!document.all && document.getElementById) document.addEventListener("keypress",netscapeKeyPress,true);

if(document.domain.indexOf("pcpao.org") > 0) document.domain = "pcpao.org";
function da(Number,Decimals,Separator) {
 // **********************************************************
 // Placed in the public domain by Affordable Production Tools
 // March 21, 1998
 // Web site: http://www.apt.simplenet.com
 Number += ""          
 Decimals += ""       
 Separator += ""      
 if((Separator == "") || (Separator.length > 1)) Separator = "."
 if(Number.length == 0) Number = "0"
 var OriginalNumber = Number  
 var Sign = 1
 var Pad = ""
 var Count = 0

 if(parseFloat(Number)){
  Number = parseFloat(Number)} else {
  Number = 0}
 
 if((parseInt(Decimals,10)) || (parseInt(Decimals,10) == 0)){
  Decimals = parseInt(Decimals,10)} else {
  Decimals = 0}
 if(Number < 0)
 {
  Sign = -1        
  Number *= Sign    
 }
 if(Decimals < 0)
  Decimals *= -1
 Number = "" + Math.floor(Number * Math.pow(10,Decimals + 1) + 5)
 if((Number.substring(1,2) == '.')||((Number + '')=='NaN'))
  return(OriginalNumber) 
   if(Number.length < Decimals +1) 
 {
  for(Count = Number.length; Count <= Decimals; Count++)
   Pad += "0"
 }
 Number = Pad + Number 
 if(Decimals == 0){
  Number = Number.substring(0, Number.length -1)} else {
 Number = Number.substring(0,Number.length - Decimals -1) +
          Separator +
          Number.substring(Number.length - Decimals -1,
          Number.length -1)}
 if(Sign == -1)
  Number = "-" + Number  
 if(Number.length == 0)
  Number="0"
 return comma(Number)
}
function comma(string) {
var frac = "";
var j;
var outp = "";
var nd = 0;
j = string.lastIndexOf('.');
if (j >= 0) {
  frac = string.substring(j,string.length+1)
  real = string.substring(0,j)
  }
else {
  real = string;
  }
for(j=real.length-1;j >= 0; j--) {
  if(nd == 3) {
        outp = ',' + outp
        nd = 0;
        }
  nd++;
        outp = real.charAt(j) + outp
  }
outp += frac;
return (outp);  
}