function Random(N) {
    return Math.floor(N * (Math.random() % 1));
}

var idx = document.URL.indexOf('?');
var params = new Array();
params["ref"] = '';

if (idx != -1) {
   var pairs = document.URL.substring(idx+1, document.URL.length).split('&');
   for (var i=0; i<pairs.length; i++) {
      nameVal = pairs[i].split('=');
      params[nameVal[0]] = nameVal[1];
   }
}

var isPerfCookie = false;
var wholeCookie = document.cookie;
if (wholeCookie.indexOf("EPSONP_REF") > 0) {
   isPerfCookie = true;
   var isRefSet = cookie.Get('REF_ID');
   if ((isRefSet == "null") || (isRefSet == '')) {
      cookie.Set("PREF_CODE", 'true', null, "/", "");
      if (unescape(params["ref"]) == '') {
	cookie.Set("REF_ID", Random(20000000), null, "/", "");
	cookie.Set("REF_CODE", 'a', null, "/", "");
      }
   } else {
      var isPRefSet = cookie.Get('PREF_CODE');
      if (isPRefSet != '') {
	 cookie.Set("PREF_CODE", 'a', null, "/", "");
      }
   }
}

if (unescape(params["ref"]) != '') {
   var isRefSet = cookie.Get('REF_ID');
   if ((isRefSet == "null") || (isRefSet == '')) {
      cookie.Set("REF_ID", Random(20000000), null, "/", "");
   }
   cookie.Set("REF_CODE", unescape(params["ref"]), null, "/", "");

	var checkRef = unescape(params["ref"]);
	if ((checkRef.length) > 8) {
		if (checkRef.substring(0,1) == 'p') {
			var isSpecialRefSet = cookie.Get(checkRef);
			if ((isSpecialRefSet == "null") || (isSpecialRefSet == '')) {
				cookie.Set(checkRef, "EPSONP_REF", checkRef.substring(1,4), "/", document.domain);
			}
		} else if (checkRef.substring(0,1) == 'r') {
			cookie.Set(checkRef, "EPSONP_REF", checkRef.substring(1,4), "/", document.domain);
		}
	}

} else {
   var isRefSet = cookie.Get('REF_CODE');
   if (isRefSet != '') {
      cookie.Set("REF_CODE", 'a', null, "/", "");
   }
}