var Hoy = new Date();
var HoyMes = Hoy.getMonth();
var HoyAno = Hoy.getYear();
if (HoyAno < 2000) { HoyAno += 1900; }


function ImprimeCalendario(m,a,div,campo) {
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' width='100%' cellspacing='1' style='background-color:#D3D4C7'>";
cal += "<tr align='center' bgcolor='#DDDFD1'><td colspan='7'><strong>" + meses[m] + " " + a +  "</strong></td></tr>";
cal += "<tr align='center' bgcolor='#DDDFD1'><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='#DDDFD1'>";
	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 { 
			cal+="<a href='#' onclick=\"AsignaValorCampo('" + campo + "','" + meses[m] + "." + dt + "." + a + "')\">" + 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='#DDDFD1'><td>";

if ((a==HoyAno)&&(m==HoyMes)) { cal += "&nbsp;";}
else {
	cal += "<a href=\"javascript:ReMes(" + pm + "," + py + ",'" + div + "','" + campo + "')\">";
	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'>Otro mes</td><td align='right'>";
cal += "<a href=\"javascript:ReMes(" + nm + "," + ny + ",'" + div + "','" + campo + "')\">";
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) {
document.getElementById(CampoId).value= fecha;
}

function ReImprimeCalendario(m,a,div,campo) { 
	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);
	}
	else {document.getElementById(div).style.display="none"; }
	
}

function ReMes(m,a,div,campo) { 
	document.getElementById(div).innerHTML="";
	document.getElementById(div).innerHTML= ImprimeCalendario(m,a,div,campo);
}