function leadingZero( nr )
	{
		if ( nr < 10) nr = "0" + nr;
		return nr;
	}

	function leadingZero2(nr)
	{
		if (nr < 100) nr = "0" + nr;
		return nr;
	}

	startPos = 4;
	var urlVal = String( self.document.location ).toLowerCase();

	var refPos  = urlVal.indexOf("&ref=");
	if( refPos == -1) {
		refPos  = urlVal.indexOf("?ref=");
	}
	if( refPos == -1) {
		refPos  = urlVal.indexOf("%3fref%3d");
		startPos = 8;
	}


	var refString = "";
	if( refPos != -1) {

	    var remainUrl = urlVal.substring( refPos+1, urlVal.length );
	    var ampPos = remainUrl.indexOf("&",2);

		if ( ampPos == -1 ) {
			refString = remainUrl.substring( startPos, remainUrl.length );
		}
		else {
			refString = remainUrl.substring( startPos, ampPos );
		}

		var now = new Date();
		var year = now.getYear();
		if ( year < 2000 )
			year = year + 1900;
		var curDate = year + '-' + leadingZero(now.getMonth() + 1) + '-' + leadingZero(now.getDate()) + '-' + leadingZero(now.getHours()) + '.' + leadingZero(now.getMinutes()) + '.' + leadingZero(now.getSeconds()) + '.' + leadingZero2(leadingZero(now.getMilliseconds())) + "000";
		var beanDate = year + '-' + leadingZero(now.getMonth() + 1) + '-' + leadingZero(now.getDate()) + '%20' + leadingZero(now.getHours()) + ':' + leadingZero(now.getMinutes()) + ':' + leadingZero(now.getSeconds()) + '.' + leadingZero2(leadingZero(now.getMilliseconds())) + "000";

	  	// Set the refer cookie as the current date-time
     	        var expdate = "Wed, 31-Dec-08 11:59:59 GMT";
   		document.cookie="refer_cookie="+curDate+"; expires="+expdate+"; path=/";

   		if ( refString == "wa081004" ) {
   			document.cookie="wa_cookie="+refString+"; expires="+expdate+"; path=/";
   		}
		document.write('<IMG SRC="https://'+ document.domain +'/webapp/wcs/stores/servlet/ReferTrack?storeid=10001&refString='+refString+'&createDt='+beanDate+'" WIDTH=1 HEIGHT=1 ALT="">' );
	}

	function getReferCookie()
  	{
    		var dcookie=document.cookie;
    		var cname="refer_cookie=";
    		var clen=dcookie.length;
    		var cbegin=0;
    		while (cbegin<clen)
      		{
        		var vbegin=cbegin+cname.length;
        		if (dcookie.substring(cbegin, vbegin) == cname)
          		{
            		var vend=dcookie.indexOf(";", vbegin);
            		if (vend == -1)
              			vend=clen;
            		return unescape(dcookie.substring(vbegin, vend));
          		}
        		cbegin=dcookie.indexOf(" ", cbegin)+1;
        		if (cbegin == 0)
          			break;
      		}
    		return null;
  	}

	function getWACookie()
  	{
    		var dcookie=document.cookie;
    		var cname="wa_cookie=";
    		var clen=dcookie.length;
    		var cbegin=0;
    		while (cbegin<clen)
      		{
        		var vbegin=cbegin+cname.length;
        		if (dcookie.substring(cbegin, vbegin) == cname)
          		{
            		var vend=dcookie.indexOf(";", vbegin);
            		if (vend == -1)
              			vend=clen;
            		return unescape(dcookie.substring(vbegin, vend));
          		}
        		cbegin=dcookie.indexOf(" ", cbegin)+1;
        		if (cbegin == 0)
          			break;
      		}
    		return null;
  	}

	function clearReferCookie( cookieDate )
  	{
   	  	var expdate = "Wed, 31-Dec-01 11:59:59 GMT";
   		document.cookie="refer_cookie="+cookieDate+"; expires="+expdate+"; path=/";
	}

	function clearWACookie( cookieDate )
  	{
   	  	var expdate = "Wed, 31-Dec-01 11:59:59 GMT";
   		document.cookie="wa_cookie="+cookieDate+"; expires="+expdate+"; path=/";
	}