/* PopUp Calendar v2.1   \u00A9 PCI, Inc.,2000 \u2022 Freeware   webmaster@personal-connections.com   +1 (925) 955 1624   Permission granted  for unlimited use so far as the copyright notice above remains intact. */
var ppcDF = "d/m/Y";
var ppcMN = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
var ppcWN = new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
var ppcER = new Array(4);
ppcER[0] = "Required DHTML functions are not supported in this browser.";
ppcER[1] = "Target form field is not assigned or not accessible.";
ppcER[2] = "Sorry, the chosen date is not acceptable. Please read instructions on the page.";
ppcER[3] = "Unknown error occured while executing this script.";
var ppcUC = false;
var ppcUX = 4;
var ppcUY = 4;


// HR DEV!!!

// Added by LogicSpot for cross browser compatibility
function cancelBubble(obj,evt) {
	if (window.event) { 
		window.event.cancelBubble = true; 
	}
	else { evt.cancelBubble = true;  }
}
// end LogicSpot addition

var ppcTT="<table class=tbl>\n";
var ppcCD=ppcTT;var ppcFT="";var ppcFC=true;
var ppcTI=false;var ppcSV=null;var ppcRL=null;var ppcXC=null;var ppcYC=null;
var ppcML=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
var ppcWE=new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
var ppcNow=new Date();var ppcPtr=new Date();

function getCalendarFor(target, rules, what) {
	nowformat = target.value.substring(3,5) + "/" + target.value.substring(0,2) + "/" + target.value.substring(6,10)			// switch to mm/dd/yyyy
	ppcNow = new Date(nowformat + " 01:00")																		// ADDITIONAL - PASS IN THE FIELD'S DATE AS A DEFAULT!

	ppcSV = target;
	ppcRL = rules;

	if (ppcFC) { setCalendar();ppcFC = false;}
	if ((ppcSV != null)&&(ppcSV)) {
		var obj = document.getElementById('popupcalendar');
		obj.style.top = (getAbsoluteTop(what)) + 'px';
		obj.style.left = (getAbsoluteLeft(what)-130) + 'px';
//		obj.style.visibility = "visible";
		obj.style.display = "block";

		try {
		var obj = document.getElementById('califrame');
		obj.style.top = (getAbsoluteTop(what)) + 'px';
		obj.style.left = (getAbsoluteLeft(what)-130) + 'px';
//		obj.style.visibility = "visible";
		obj.style.display = "";
		} catch(x) {}
		
	}
}


function setLyr(obj,lyr)
{
	var newX = findPosX(obj);
	var newY = findPosY(obj);
	if (lyr == 'testP') newY -= 50;
	var x = new getObj(lyr);
	x.style.top = newY + 'px';
	x.style.left = newX + 'px';
}

function getAbsoluteLeft(o) {
	oLeft = o.offsetLeft						// Get left position from the parent object
	while(o.offsetParent!=null) {					// Parse the parent hierarchy up to the document element
		oParent = o.offsetParent					// Get parent object reference
		oLeft += oParent.offsetLeft				// Add parent left position
		o = oParent
		if (o.id=="content") break;
	}
	return oLeft
}

function getAbsoluteTop(o) {
	oTop = o.offsetTop							// Get top position from the parent object
	while(o.offsetParent!=null) {					// Parse the parent hierarchy up to the document element
		oParent = o.offsetParent					// Get parent object reference
		oTop += oParent.offsetTop				// Add parent top position
		o = oParent
		if (o.id=="content") break;
	}
	return oTop
}






function switchMonth(param) {
	var tmp = param.split("|");
	setCalendar(tmp[0],tmp[1]);
}
 
 
function moveMonth(dir) {
	var obj = null;
	var limit = false;
	var tmp,dptrYear,dptrMonth;
	obj = document.forms['ppcMonthList'].sItem;
	if (obj != null) {
		if ((dir.toLowerCase() == "back")&&(obj.selectedIndex > 0)) {obj.selectedIndex--;}
		else if ((dir.toLowerCase() == "forward")&&(obj.selectedIndex < 12)) {obj.selectedIndex++;}
		else {limit = true;}
	}
	if (!limit) {
		tmp = obj.options[obj.selectedIndex].value.split("|");
		dptrYear  = tmp[0];
		dptrMonth = tmp[1];
		setCalendar(dptrYear,dptrMonth);}
	else {
		obj.style.backgroundColor = "#FF0000";
		window.setTimeout("document.ppcMonthList.sItem.style.backgroundColor = '#FFFFFF'",50);
	}
}


function selectDate(param) {
 var arr   = param.split("|");
 var year  = arr[0];
 var month = arr[1];
 var date  = arr[2];
 var ptr = parseInt(date);
 ppcPtr.setDate(ptr);
 if ((ppcSV != null)&&(ppcSV)) {
  if (validDate(date)) {ppcSV.value = dateFormat(year,month,date);hideCalendar();}
  else {showError(ppcER[2]);if (ppcTI) {clearTimeout(ppcTI);ppcTI = false;}}}
 else {
  showError(ppcER[1]);
  hideCalendar();}
}


function setCalendar(year,month) {
 if (year  == null) {year = getFullYear(ppcNow);}
 if (month == null) {month = ppcNow.getMonth();setSelectList(year,month);}
 if (month == 1) {ppcML[1]  = (isLeap(year)) ? 29 : 28;}
 ppcPtr.setYear(year);
 ppcPtr.setMonth(month);
 ppcPtr.setDate(1);
 updateContent();
}


function updateContent() {
	generateContent();
	document.getElementById('monthdays').innerHTML = ppcCD;
	ppcCD = ppcTT;
}


function generateContent() {
	var year  = getFullYear(ppcPtr);
	var month = ppcPtr.getMonth();
	var date  = 1;
	var day   = ppcPtr.getDay();
	var len   = ppcML[month];
	var bgr,cnt,tmp = "";
	var j,i = 0;
	
	var curdate = new Date()
	now = curdate.getFullYear() + "|" + (curdate.getMonth()) + "|" + curdate.getDate()
		
	for (j = 0; j < 7; ++j) {
		if (date > len) {break;}
		for (i = 0; i < 7; ++i) {
			bgr = ((i == 0)||(i == 6)) ? "wknd" : "";
			disab= ((curdate.getMonth()==month & date < curdate.getDate())) ? true : false
			if (((j == 0)&&(i < day))||(date > len)) {tmp  += makeCell(bgr,year,month,0, disab);}
			else {tmp  += makeCell(bgr,year,month,date, disab);++date;}
		}
		ppcCD += "<tr>\n" + tmp + "</tr>\n";tmp = "";
	}
	ppcCD += "<tr><td colspan=7><a href=\"javascript:selectDate('" + now + "')\" class=today>Today</a></td></tr>\n";
	ppcCD += "</table>\n";
}


function makeCell(bgr,year,month,date, disab) {
	var param = "\'"+year+"|"+month+"|"+date+"\'";
	var td2 = "</td>\n";
	var lnk = "<a href=\"javascript:selectDate("+param+")\" onMouseOver=\"window.status=\' \';return true;\" class=day>";
	var cellValue = (date != 0) ? date+"" : "&nbsp;";
	if ((ppcNow.getDate() == date)&&(ppcNow.getMonth() == month)&&(getFullYear(ppcNow) == year)) { cellValue = "<b>"+cellValue+"</b>"; }
	var cellCode = "";
	if (date == 0) {
		cellCode = "<td><span class=\"none\">" + cellValue+"</span>" + td2;
	} else {
		lnk = (disab) ? "<a href=\"javascript:;\" class=disab>" : "<a href=\"javascript:;\" onMouseUp=\"selectDate("+param+")\" class=day>"
		cellCode = "<td" + ((bgr !=="") ? " class=" + bgr : "") + ">" + lnk + cellValue + "</a>" + td2;
	}
	return cellCode;
}

function setSelectList(year,month) {
	var i = 0;
	var obj = null;
	obj = document.forms['ppcMonthList'].sItem;
	while (i < 13) {
		obj.options[i].value = year + "|" + month;
		obj.options[i].text  = year + " \u2022 " + ppcMN[month];
		i++;
		month++;
		if (month == 12) {year++;month = 0;}
	}
}


function hideCalendar() {
	//document.getElementById('PopUpCalendar').style.visibility = "hidden";
	document.getElementById('popupcalendar').style.display = "none";
	//document.all['califrame'].style.visibility = "hidden";

	try { document.all['califrame'].style.display = "none"; } catch(x) {}
	
	ppcTI = false;
	setCalendar();
	ppcSV = null;
	var obj = document.forms['ppcMonthList'].sItem;
	obj.selectedIndex = 0;
}


function showError(message) {
	window.alert("[ PopUp Calendar ]\n\n" + message);
}


function isLeap(year) {
	if ((year%400==0)||((year%4==0)&&(year%100!=0))) {return true;} else {return false;}
}


function getFullYear(obj) {
	return (obj.getYear() < 1500) ? obj.getYear() + 1900 : obj.getYear();
}


function validDate(date) {
 var reply = true;
 if (ppcRL == null) {/* NOP */}
 else {
  var arr = ppcRL.split(":");
  var mode = arr[0];
  var arg  = arr[1];
  var key  = arr[2].charAt(0).toLowerCase();
  if (key != "d") {
   var day = ppcPtr.getDay();
   var orn = isEvenOrOdd(date);
   reply = (mode == "[^]") ? !((day == arg)&&((orn == key)||(key == "a"))) : ((day == arg)&&((orn == key)||(key == "a")));}
  else {reply = (mode == "[^]") ? (date != arg) : (date == arg);}}
 return reply;
}


function isEvenOrOdd(date) {
	if (date - 21 > 0) {return "e";}
	else if (date - 14 > 0) {return "o";}
	else if (date - 7 > 0) {return "e";}
	else {return "o";}
}
 

function dateFormat(year,month,date) {
 if (ppcDF == null) {ppcDF = "m/d/Y";}
 var day = ppcPtr.getDay();
 var crt = "";
 var str = "";
 var chars = ppcDF.length;
 for (var i = 0; i < chars; ++i) {
  crt = ppcDF.charAt(i);
  switch (crt) {
   case "M": str += ppcMN[month]; break;
   case "m": str += (month<9) ? ("0"+(++month)) : ++month; break;
   case "Y": str += year; break;
   case "y": str += year.substring(2); break;
   case "d": str += ((ppcDF.indexOf("m")!=-1)&&(date<10)) ? ("0"+date) : date; break;
   case "W": str += ppcWN[day]; break;
    default: str += crt;}}
 return unescape(str);
}