var dDate = new Date();

var dCurMonth = dDate.getMonth();

var dCurDayOfMonth = dDate.getDate();

var dCurYear = dDate.getFullYear();

var objPrevElement = new Object();

var arySelectedDays = new Array();

var intCount = 0;



function fToggleColor(myElement) {

	var toggleColor = "#0000ff";

	if (myElement.id == "calDateText") {

		if (myElement.color == toggleColor) {

			myElement.color = "";

		} else {

			myElement.color = toggleColor;

		}

	} else if (myElement.id == "calCell") {

		for (var i in myElement.children) {

			if (myElement.children[i].id == "calDateText") {

				if (myElement.children[i].color == toggleColor) {

					myElement.children[i].color = "";

				} else {

					myElement.children[i].color = toggleColor;

				}

			}

		}

	}

}

function fSetSelectedDay(myElement){

	if (myElement.id.toString().substr(0,myElement.id.toString().length-3) == "calCell") {

		if (!isNaN(parseInt(myElement.children[0].innerText))) {

			myElement.bgColor = "#f6ddff";

			var strDay=myElement.children[0].innerText;

			if(strDay.length<2) strDay="0"+strDay;

			var strReturnDate = document.all.tabAnno.options[document.all.tabAnno.selectedIndex].value+"-"+document.all.tabMes.options[document.all.tabMes.selectedIndex].value+"-"+strDay;

			if(document.all.traDate.value.indexOf(strReturnDate,0)>-1){

				myElement.bgColor="";

				document.all.traDate.value = document.all.traDate.value.substr(0,document.all.traDate.value.indexOf(strReturnDate,0)) + document.all.traDate.value.substr(document.all.traDate.value.indexOf(strReturnDate,0)+12,document.all.traDate.value.length);

			}else{

				document.all.traDate.value=strReturnDate;

			}

			objPrevElement.bgColor = "";

			objPrevElement = myElement;

  	}

	}

}

function fGetDaysInMonth(iMonth, iYear) {

	var dPrevDate = new Date(iYear, iMonth, 0);

	return dPrevDate.getDate();

}

function fBuildCal(iYear, iMonth, iDayStyle) {

	var aMonth = new Array();

	aMonth[0] = new Array(7);

	aMonth[1] = new Array(7);

	aMonth[2] = new Array(7);

	aMonth[3] = new Array(7);

	aMonth[4] = new Array(7);

	aMonth[5] = new Array(7);

	aMonth[6] = new Array(7);

	var dCalDate = new Date(iYear, iMonth-1, 1);

	var iDayOfFirst = dCalDate.getDay();

	var iDaysInMonth = fGetDaysInMonth(iMonth, iYear);

	var iVarDate = 1;

	var i, d, w;

	if (iDayStyle == 2) {

		aMonth[0][0] = "<font color=red>Domingo</font>";

		aMonth[0][1] = "Lunes";

		aMonth[0][2] = "Martes";

		aMonth[0][3] = "Miércoles";

		aMonth[0][4] = "Jueves";

		aMonth[0][5] = "Viernes";

		aMonth[0][6] = "<font color=#009933>Sabado</font>";

	} else if (iDayStyle == 1) {

		aMonth[0][0] = "<font color=red>Dom</font>";

		aMonth[0][1] = "Lun";

		aMonth[0][2] = "Mar";

		aMonth[0][3] = "Mie";

		aMonth[0][4] = "Jue";

		aMonth[0][5] = "Vie";

		aMonth[0][6] = "<font color=#009933>Sab</font>";

	} else {

		aMonth[0][0] = "<font color=red>D</font>";

		aMonth[0][1] = "L";

		aMonth[0][2] = "K";

		aMonth[0][3] = "M";

		aMonth[0][4] = "J";

		aMonth[0][5] = "V";

		aMonth[0][6] = "<font color=#009933>S</font>";

	}

	for (d = iDayOfFirst; d < 7; d++) {

		aMonth[1][d] = iVarDate;

		iVarDate++;

	}

	for (w = 2; w < 7; w++) {

		for (d = 0; d < 7; d++) {

			if (iVarDate <= iDaysInMonth) {

				aMonth[w][d] = iVarDate;

				iVarDate++;

	    }

	  }

	}

	return aMonth;

}

function fDrawCal(iYear, iMonth, iday, iCellWidth, iCellHeight, sDateTextSize, sDateTextWeight, iDayStyle) {

	var myMonth;

	myMonth = fBuildCal(iYear, iMonth, iDayStyle);

	document.write("<table border='1' align='center'>")

	document.write("<tr>");

	document.write("<td align='center' bgcolor=#cceedd style='FONT-FAMILY:Arial;FONT-SIZE:12px;FONT-WEIGHT: bold'>" + myMonth[0][0] + "</td>");

	document.write("<td align='center' bgcolor=#cceedd style='FONT-FAMILY:Arial;FONT-SIZE:12px;FONT-WEIGHT: bold'>" + myMonth[0][1] + "</td>");

	document.write("<td align='center' bgcolor=#cceedd style='FONT-FAMILY:Arial;FONT-SIZE:12px;FONT-WEIGHT: bold'>" + myMonth[0][2] + "</td>");

	document.write("<td align='center' bgcolor=#cceedd style='FONT-FAMILY:Arial;FONT-SIZE:12px;FONT-WEIGHT: bold'>" + myMonth[0][3] + "</td>");

	document.write("<td align='center' bgcolor=#cceedd style='FONT-FAMILY:Arial;FONT-SIZE:12px;FONT-WEIGHT: bold'>" + myMonth[0][4] + "</td>");

	document.write("<td align='center' bgcolor=#cceedd style='FONT-FAMILY:Arial;FONT-SIZE:12px;FONT-WEIGHT: bold'>" + myMonth[0][5] + "</td>");

	document.write("<td align='center' bgcolor=#cceedd style='FONT-FAMILY:Arial;FONT-SIZE:12px;FONT-WEIGHT: bold'>" + myMonth[0][6] + "</td>");

	document.write("</tr>");

	for (w = 1; w < 7; w++) {

		document.write("<tr>")

		for (d = 0; d < 7; d++) {

			if(iday == myMonth[w][d])

				document.write("<td bgcolor='#ffffff' align='center' valign='top' width='" + iCellWidth + "' height='" + iCellHeight + "' id=calCell_"+w+d+" style='CURSOR:Hand' onMouseOver='fToggleColor(this)' onMouseOut='fToggleColor(this)' onclick=fSetSelectedDay(this)>");

			else

				document.write("<td align='center' valign='top' width='" + iCellWidth + "' height='" + iCellHeight + "' id=calCell_"+w+d+" style='CURSOR:Hand' onMouseOver='fToggleColor(this)' onMouseOut='fToggleColor(this)' onclick=fSetSelectedDay(this)>");

			if (!isNaN(myMonth[w][d])) {

				document.write("<font id=calDateText onMouseOver='fToggleColor(this); window.status=this.id;' style='CURSOR:Hand;FONT-FAMILY:Arial;FONT-SIZE:" + sDateTextSize + ";FONT-WEIGHT:" + sDateTextWeight + "' onMouseOut='fToggleColor(this)' onclick=fSetSelectedDay(this)>" + myMonth[w][d] + "</font>");

			} else {

				document.write("<font id=calDateText onMouseOver='fToggleColor(this)' style='CURSOR:Hand;FONT-FAMILY:Arial;FONT-SIZE:" + sDateTextSize + ";FONT-WEIGHT:" + sDateTextWeight + "' onMouseOut='fToggleColor(this)' onclick=fSetSelectedDay(this)> </font>");

			}

			document.write("</td>")

		}

		document.write("</tr>");

	}

	document.write("</table>")

}

function fUpdateCal(iYear, iMonth) {

	myMonth = fBuildCal(iYear, iMonth);

	objPrevElement.bgColor = "";

		for (w = 1; w < 7; w++) {

		for (d = 0; d < 7; d++) {

			if (!isNaN(myMonth[w][d])) {

				calDateText[((7*w)+d)-7].innerText = myMonth[w][d];

			} else {

				calDateText[((7*w)+d)-7].innerText = " ";

			}

		}

	}

}

function EnterToBR(strMEMO){

	var str1=new String(strMEMO);

	var str2 = "";		

	for(var i=0;i<str1.length;i++){

		if(str1.charCodeAt(i)=="13")

			str2=str2+"<br>";

		else if(str1.charCodeAt(i)=="10")

			str2=str2;

		else

			str2=str2+str1.charAt(i);

	}

	return (str2);

}