var meses=["Ene","Ene","Feb","Mar","Abr","May","Jun","Jul","Ago","Sep","Oct","Nov","Dic"]

function Fecha(nro,d,m,a,cFont){
	document.write('<SELECT name=day'+nro+' face=verdana size=1 onchange="cambio('+nro+');"> '); 
	document.write('<OPTION value="">Día</OPTION>');
	for (var i=1;i<32;i++){
		document.write('<OPTION value='+i);
		if (d==i) {document.write(' selected')};
		document.write('>'+i+'</OPTION>');
	}
	document.write('</SELECT>');

	document.write('<SELECT name=month'+nro+' '+cFont+' onchange="cambio('+nro+');">'); 
	document.write('<OPTION value="">Mes</OPTION>');
	for (var i=1;i<13;i++){
		document.write('<OPTION value='+i);
		if (m==i) {document.write(' selected')};
		document.write('>'+meses[i]+'</OPTION>');
	}
	document.write('</SELECT>');
							
	document.write('<SELECT name=year'+nro+' '+cFont+' onchange="cambio('+nro+');">'); 
	document.write('<OPTION value="">Año</OPTION>');
	for (var i=2002;i>1900;i--){
		document.write('<OPTION value='+i);
		if (a==i) {document.write(' selected')};
		document.write('>'+i+'</OPTION>');
	}
	document.write('</SELECT>');
}
// Devuelve la fecha en formato d/m/a
function fecha1(n){
	d1=document.form1.day1.options[document.form1.day1.selectedIndex].value;
	m1=document.form1.month1.options[document.form1.month1.selectedIndex].value;
	a1=document.form1.year1.options[document.form1.year1.selectedIndex].value;
	if ((d1=="")||(m1=="")||(a1=="")) return "";
	return d1+"/"+m1+"/"+a1;
}

// Devuelve la fecha en formato d/m/a
function fecha2(n,form){
	d1=form.day1.options[form.day1.selectedIndex].value;
	m1=form.month1.options[form.month1.selectedIndex].value;
	a1=form.year1.options[form.year1.selectedIndex].value;
	if ((d1=="")||(m1=="")||(a1=="")) return "";
	return d1+"/"+m1+"/"+a1;
}

// Valido la fecha
function Fecha_val(d,m,a){

	dFech=new Date(a,m,d);
	if (isNaN(dFech)) {
		return false;
	}else{
		return true;
	}
	
}

// Calcula la fecha
function Fecha_add(fec,nro){

	var inip=new Date((fec-0)+(nro*86400000));
	var init=inip.getDate()+"-"+meses[inip.getMonth()+1]+"-"+inip.getYear();
	
return init
}
// Devuelve un numero con nDec decimales
function formato(nro,nDec){
	// conversion a n d
	var cRetVal="";
	var cDeci="";
	var x1=nro.toString();
	var x2=x1.indexOf(".")
	if (x2==-1){
		cRetVal=x1+".";
		for (var i=0;i<nDec;i++){
			cRetVal=cRetVal+"0";
		}
	}else{
		cRetVal   = x1.substring(0,x2)
		cDeci = x1.substring(x2+1,x1.length) // Parte entera
		if (cDeci.length>=nDec+1){
			cDeci=cDeci.substring(0,nDec);
		}else{
			for (var i=cDeci.length;i<nDec;i++){
				cDeci=cDeci+"0";
			}
		}
		cRetVal=cRetVal+"."+cDeci
	}
	return cRetVal;
}