var CODE_INTERNAUTE = "", RES_ID = -1;
validation = false;

function optelo_getQuery(cle) {
	URL = window.location.toString();
	deb = URL.indexOf(cle)+cle.length+1;
	delta = ((URL.substring(deb)).indexOf("&") > 0) ? (URL.substring(deb)).indexOf("&") : URL.length-deb;
	return(URL.indexOf(cle)!=-1 ? URL.substring(deb,deb+delta) : null);
}

function optelo_data() {
	if (optelo_getQuery("CODE_INTERNAUTE") && optelo_getQuery("RES_ID")) {
		CODE_INTERNAUTE = optelo_getQuery("CODE_INTERNAUTE");
		RES_ID = optelo_getQuery("RES_ID");
		query = 3;
	}
	else {
		query = 4;
		if (optelo_getCookie("CODE_INTERNAUTE") && optelo_getCookie("RES_ID")) {
			CODE_INTERNAUTE = optelo_getCookie("CODE_INTERNAUTE");
			RES_ID = optelo_getCookie("RES_ID");
		}
	}
	if ((CODE_INTERNAUTE.length>0) && (RES_ID>0)) {
		document.write('<script src=http://es.optelo.com/boc/check.php?QUERY='+query+'&CODE_INTERNAUTE='+CODE_INTERNAUTE+'&RES_ID='+RES_ID+'></script>');
		optelo_setCookie("CODE_INTERNAUTE",CODE_INTERNAUTE);
		optelo_setCookie("RES_ID",RES_ID);
	}
}

function optelo_lib(URLerreur) {
	if ((CODE_INTERNAUTE.length>0) && (RES_ID>0) && (optelo_ressource==RES_ID)) {
		validation = optelo_ok();
	}
	if ((validation == true) && !(optelo_getQuery("CODE_INTERNAUTE") && optelo_getQuery("RES_ID")))
		if (((new Date()).getTime()-optelo_getCookie("DELAI") < 1000) || (optelo_getCookie("DELAI") == null))
			validation = false;

	optelo_setCookie("DELAI",(new Date()).getTime());
	if (validation == false)
		window.location.href = URLerreur;
}

function optelo_getCookie(nom) {
	if (document.cookie.length > 0) {
		debut = document.cookie.indexOf(nom+"=");
		if (debut != -1) {
			debut += nom.length+1;
			fin = document.cookie.indexOf(";", debut);
			if (fin == -1)
				fin = document.cookie.length;
			return(unescape(document.cookie.substring(debut, fin)));
		}
	}
	return null;
}
 
function optelo_setCookie(nom, valeur, expiration, path, domaine, securite) {
	document.cookie = nom + "=" + escape(valeur) +
	((expiration) ? "; expires=" + expiration.toGMTString() : "") +
	((path) ? "; path=" + path : "") +
	((domaine) ? "; domain=" + domaine : "") +
	((securite) ? "; secure" : "");
}