function ns () {
	if (navigator.appName == "Netscape") {
		var slasher = "/";
	} else {
		var slasher = "\\";
	}
	return (slasher);
}

function rtn() {
	return (unescape("%0D%0A"));
}
function para() {
	return (unescape("%0D%0A%0D%0A%20%20%20%20"));
}
function writetext(phrase) {
	phrase = escape(phrase);
	var fronter = "";
	var backer = "";
	var replrtn = "%20%20%3CP%3E"
	var findrtn = "%0D%0A";
	var rpos = phrase.indexOf(findrtn)
	while (rpos > -1) {
		fronter = phrase.substring(0,rpos);
		backer = phrase.substring(rpos+6,phrase.length);
		phrase = fronter + replrtn + backer;
		rpos = phrase.indexOf(findrtn)
	}
	phrase = unescape(phrase);
	return (phrase);
}






function MakeVar(GS,name,formfield,expdate) {
	var ischk = (formfield.type == "checkbox");
	if (GS == "GET") {
		var RetName = GetCookie (name);
		if (MakeVar.arguments.length > 2 ) {
			if (formfield.type == "checkbox") {
				var ticker = true;
				if (RetName == "false") {
					ticker = false;
				}
				formfield.checked = ticker;
			} else {
				formfield.value = RetName;
			}
		} else {
			return RetName;
		}
	} else {
		var FormVal = formfield.value;
		if (ischk == true) {
			FormVal = formfield.checked;
		}
		return SetCookie (name, FormVal, expdate);
	}
	return null;
}
function CookieCount() {
	var remcookie = document.cookie
	if (remcookie.length >= 1) {
		var count = 1;
		var pos = remcookie.indexOf("; ");
		while (pos >= 1) {
			count += 1;
			remcookie = remcookie.substring(pos+3,remcookie.length);
			pos = remcookie.indexOf("; ");
		}
		return count;
	}
	return 0;
}




function GetVal (name) {
	//fullname should be in the classname:storename pairing
	var splitter = name.indexOf("_");
	if (splitter > -1) {
		var classname = name.substring(0,splitter);
		var storename = name.substring(splitter+1,name.length);
		var whole = GetCookie(classname);
		if (whole.length <=1) {
			return ("");
		} else {
			var findstore = "_"+storename+"=";			
			if (whole.indexOf(findstore) > -1) {
				var value = whole.substring(whole.indexOf(findstore)+1,whole.length);
				value = value.substring(value.indexOf("=")+1,value.length);
				value = value.substring(0,value.indexOf("_"));
				if ((value.length <= 1) & (value.substring(0,1) == " ")) {
					return ("");
				} else {
					return (value);
				}

			} else {
				return ("");
			}
		}
	} else {
		//alert("Please tell siteware that they have a 'pair problem'.  We'll get this fixed as soon as you tell us.  Thanks!");
		return("CONTACT SITEWARE");
	}
}

function getCookieVal (offset) {
	var endstr = document.cookie.indexOf (";", offset);
	if (endstr == -1) {
		endstr = document.cookie.length;
	}
	var whole = unescape(document.cookie.substring(offset, endstr));
		//alert('gcv took ' + offset + ', returning ' + whole);
	return (whole);

}

function GetCookie (name) {
	var arg = name + "=";
	var alen = arg.length;
	var clen = document.cookie.length;
	var nextcookie = "";
	var remcookie = "";
	var i = 0;
	//alert('COOKIE BEGIN IS: ' + document.cookie);
	while (i < clen) {
		var j = i + alen;
		nextcookie = document.cookie.substring(i, j);
		remcookie =  document.cookie.substring(i+j, document.cookie.length);
        	if (nextcookie == arg) {
			// ignore first spurious entry if needed;
			//alert("remcookie is " + remcookie + ". pos of " + arg + " is " + remcookie.indexOf(arg) + ".");
			//if (remcookie.indexOf(arg) < 0) {
				
				return getCookieVal (j);
			//} else {
				//alert("Going to second block for arg " + arg);
			//}
		}
	        i = document.cookie.indexOf(" ", i) + 1;
	        if (i == 0) break; 
      }
      return ("");
}

function GetExpiry() {
	var expires = new Date(2010,1,2,3,4,5);
	expires = expires.toGMTString();
	return (expires);
}
 

function SetCookie (name, value) {
	var setpart = name + "=" + escape (value) + "; expires=" + GetExpiry();
	document.cookie = setpart;
	var cookiecheck = GetCookie(name);
	if (cookiecheck != value) {
		//alert("Cookie not written correctly. Tried to store '" + value + "', but got '" + cookiecheck + "' instead.  Bad!");
	} else {
		//alert("Stored cookie '" + name + "' with value '" + value + "' in folder '" + location.pathname + "'");
	}
}

function SetVal (name, value) {
	var splitter = name.indexOf("_");
	if (splitter > -1) {
		var classname = name.substring(0,splitter);
		var storename = name.substring(splitter+1,name.length);
		var whole = GetCookie(classname);
		if (whole.substring(0,1) != "_") {
			whole = "_" + whole;
		}
		var wFront = "";
		var wBack = "";
		var findstore = "_"+storename+"=";
		var storepair = storename + "=" + value + "_";
		if (whole.indexOf(findstore) > -1) {
			wFront = whole.substring(0,whole.indexOf(findstore)+1);
			wBack = whole.substring(whole.indexOf(findstore)+2,whole.length);
			wBack = wBack.substring(wBack.indexOf("_")+1,wBack.length);
			whole = wFront + storepair + wBack;
		} else {
			whole += storepair;
		}
		SetCookie(classname,whole);
	} else {
		SetCookie(name, value);	
	}
}


function DeleteCookie (name) {
	var expires = new Date(1997,1,2,3,4,5);
	expires = expires.toGMTString();
	document.cookie = name + "=" + "_" + "; expires=" + expires;
}

function WipeCookies () {
// Gets rid of all cookies for the current site
	counter = 0;
	while ((CookieCount() > 0) && (counter < 5)) {
		counter += 1;
		DeleteCookie('haPackages');
		var count = 0;
		while (count < 10) {
			count += 1;
			var WhichGroup = "sEMailGroup" + count;
			DeleteCookie(WhichGroup);
		}
	}
	DeleteCookie('sClient');
	DeleteCookie('sEMailGroup1');
	if (CookieCount() > 0) {
		//alert("Reset Done. " + CookieCount() + " cookies remain, about " + document.cookie.length + " characters long.  Enjoy!");
		document.writeln(document.cookie + para());
	}
}