var Hoy = new Date();
var HoyMes = Hoy.getMonth();
var HoyAno = Hoy.getYear();
if (HoyAno < 2000) { HoyAno += 1900; }


function ImprimeCalendario(m,a,div,campo,DivFalsoInput) {
var meses = new Array(12);
meses[0] = "Ene";
meses[1] = "Feb";
meses[2] = "Mar";
meses[3] = "Abr";
meses[4] = "May";
meses[5] = "Jun";
meses[6] = "Jul";
meses[7] = "Ago";
meses[8] = "Sep";
meses[9] = "Oct";
meses[10] = "Nov";
meses[11] = "Dic";
var dtPriemerDia = new Date(a,m,1,0,0,0);
var dtUltimoDia = new Date(a,m+1,2-2,0,0,0);
var intUltimoDia = dtUltimoDia.getDate();
var diaHoy = Hoy.getDay();
var casillas = intUltimoDia + dtPriemerDia.getDay();
var lineas = parseInt(casillas /7);
if (lineas <(casillas/7)) { lineas +=1; }
var ct =1;
var dt =1;
var cal = "<table border='0' cellpadding='1' width='100%' cellspacing='1' style='background-color:#B5B5BE'>";
cal += "<tr align='center' bgcolor='#FFFFFF'><td colspan='7'><strong>" + meses[m] + " " + a +  "</strong></td></tr>";
cal += "<tr align='center' bgcolor='#FFFFFF'><td>D</td><td>L</td><td>M</td><td>M</td><td>J</td><td>V</td><td>S</td></tr>";

for (I=1;I<=lineas;I++) {
	cal += "<tr align='center' bgcolor='#FFFFFF'>";
	for (i=1;i<=7;i++) {
		cal += "<td>";

		if ((ct <=dtPriemerDia.getDay())||(dt>intUltimoDia)) { cal +="&nbsp;"; }
		else if ((m==HoyMes)&&(dt < Hoy.getDate())) {
			cal += dt;
			dt+=1;
		}
		else if (((m<HoyMes)&&(a==HoyAno))||(a < HoyAno)) {
			cal += dt;
			dt+=1;	
		}
		else { 
			cal+="<a href=\"javascript:AsignaValorCampo('" + campo + "','" + meses[m] + "." + dt + "." + a + "','" + DivFalsoInput + "')\">" + dt + "</a>";
			dt+=1;
		}

		cal += "</td>";
		ct +=1;
	}
	cal += "</tr>";
}

if (m==11) { ny= a+1; nm=0; py=a; pm=m-1; }
else if (m==0) { ny= a; nm=m+1; py=a-1; pm=11; }
else  { ny= a; nm=m+1; py=a; pm=m-1;}

cal += "<tr bgcolor='#FFFFFF'><td>";

if ((a==HoyAno)&&(m==HoyMes)) { cal += "&nbsp;";}
else {
	cal += "<a href=\"javascript:ReMes(" + pm + "," + py + ",'" + div + "','" + campo + "','" + DivFalsoInput + "')\">";
	cal += "<img src='../graficos/fle_izq.gif' alt='" + meses[pm] + " del " + py + "' width='16' height='14' border='0'>";
	cal += "</a>";
}

cal += "</td><td colspan='5' align='center'><table cellspacing='0' cellpadding='0'><tr><td>";

cal += "<select id='CalNueAnio' onChange='ReMes(parseInt(document.getElementById(\"CalNueMes\").value),parseInt(this.value),\"" + div + "\",\"" + campo + "\",\"" + DivFalsoInput + "\")'>"; 


if (HoyAno < a) { 
	var pya = parseInt(a)-1;
	cal += "<option value='" + pya + "'>" + pya + "</option>";
}

cal += "<option value='" + a + "' selected>" + a + "</option>";

if (HoyAno == a) { 
	var nya = parseInt(a)+1;
	cal += "<option value='" + nya + "'>" + nya + "</option>";
}


cal += "</select></td><td>";


cal += "<select id='CalNueMes' onChange='ReMes(parseInt(this.value),parseInt(document.getElementById(\"CalNueAnio\").value),\"" + div + "\",\"" + campo + "\",\"" + DivFalsoInput + "\")'>"; 

for (I=0;I<meses.length;I++) {
if (I==m) { sel = " selected"; } else { sel= ""; }
cal += "<option value='" + I + "'" + sel + ">" + meses[I] + "</option>";
}


cal += "</select></td><td>";
cal += "<a href='javascript:>";
cal += "<img src='../graficos/fle_der.gif' alt='' width='16' height='14' border='0'>";
cal += "</a></td></tr></table>";

cal += "</td><td align='right'>";
cal += "<a href=\"javascript:ReMes(" + nm + "," + ny + ",'" + div + "','" + campo + "','" + DivFalsoInput + "')\">";
cal += "<img src='../graficos/fle_der.gif' alt='" + meses[nm] + " del " + ny + "' width='16' height='14' border='0'>";
cal += "</a>";
cal += "</td></tr></table>";
return cal;
}

function AsignaValorCampo(CampoId,fecha,DivFalsoInput) {
document.getElementById(CampoId).value= fecha;
document.getElementById(DivFalsoInput).innerHTML = fecha;
}

function ReImprimeCalendario(m,a,div,campo,DivFalsoImput) { 
	if (document.getElementById(div).style.display=="none") { 
		document.getElementById(div).style.display="inline";
		document.getElementById(div).innerHTML="";
		document.getElementById(div).innerHTML= ImprimeCalendario(m,a,div,campo,DivFalsoImput);
	}
	else {document.getElementById(div).style.display="none"; }
	
}

function ReMes(m,a,div,campo,DivFalsoImput) { 
	document.getElementById(div).innerHTML="";
	document.getElementById(div).innerHTML= ImprimeCalendario(m,a,div,campo,DivFalsoImput);
}







