/////////////////////////////////////////////////////////////////////////////////////
//	PPWS Global Variables and Functions		/
/////////////////////////////////////////////////////////////////////////////////////
var wlpath = new String("ps5p/ppwsw.nsf") 	// Wish List Path : Picked from the Profile document by a Computed Text
if (navigator.appName != "Lotus Notes" )	// Avoid execution of the function under Lotus Notes
{
	var cookielife=60;	//Cookie Life in days : Picked from the Profile document by a Computed Text
	if (document.cookie.indexOf("ppwsw=")==-1)
	{  // Drops the Cookie
		
		var inXdays=new Date();
		var now=new Date();
		inXdays.setDate(inXdays.getDate()+cookielife);
		var val=now.getTime()+ Math.ceil(Math.random()*1000);
		// Cookie value is composed of 3 random digits added to the date-time value in ms
		document.cookie="ppwsw=" + val+ "; expires=" + inXdays.toGMTString() + " ; path=/";
		
	}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//	PPWS Library								/
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//	This function appends the "&... "parameter content of the current Location
//	to the "newloc" URL
function linkto(newloc)   {
	var params;
	var curloc=new String();
	curloc=window.location.href;
	var pos1=curloc.indexOf("&");
	if (pos1!=-1)  {
		var pos2=newloc.indexOf("!");
		if (pos2 !=-1)  {
		newloc = newloc+curloc.substring(pos1,curloc.length);
		} else	{
		newloc = newloc+"!OpenDocument"+curloc.substring(pos1,curloc.length);
		}	
	} 
	window.location = newloc
}
function databasename() {
	var curloc=new String();
	var result;
	curloc=window.location.href;
	if (curloc.indexOf(".nsf") !=-1) {
		//base indiquée par sont nom fichier
		result=curloc.substring(0,curloc.indexOf(".nsf")+4);
	}
	else {	
		curpath=window.location.pathname;
		result="http://" + window.location.host+"/"+curpath.substring(1,curpath.indexOf("/",1));	
	}
	return(result);
}
function loadList (prefix, suffix) {
         if (suffix != "0") {
         newURL = databasename()+"/pages/"+prefix+"_"+suffix+".htm"
         location =newURL;
         }
}
function updateList () {
         location = databasename()+"/ufs!OpenAgent"
}