<!--
var wi = new Array();

function Cerrar_Ventanas()
{
 for (i = 0; i < 10; i++)
 {
  if ( (wi[i] != null) && (! wi[i].closed) )
  {
   
   if (typeof(wi[i].Cerrar) != "undefined") wi[i].Cerrar(); else wi[i].close();
  } 
 }
}

function EsBisiesto(year)
{
 return (((year % 4 == 0) && (year % 100 != 0)) || (year % 400 == 0));
}

function FechaValida(f)
{
 if (f.lastIndexOf('.') != -1) return null;

 var jsFecha = f.split("/");
 
 if ((jsFecha[0] == '') || (jsFecha[0] == null) ||
     (jsFecha[1] == '') || (jsFecha[1] == null) ||
	 (jsFecha[2] == '') || (jsFecha[2] == null))
 return null;	 
 
 var jsdia  = new Number(jsFecha[0]);
 var jsmes  = new Number(jsFecha[1]);
 var jsanio = new Number(jsFecha[2]);
 
 if ((isNaN(jsdia)) || (isNaN(jsmes)) || (isNaN(jsanio)))
 return null;
 
 if ((jsmes < 1) || (jsmes > 12))
 return null;
 
 if (jsdia < 1) return null;
 
 if ( ((jsmes == 1) || (jsmes == 3) || (jsmes == 5) || (jsmes == 7)
       || (jsmes == 8) || (jsmes == 10) || (jsmes == 12)) && (jsdia > 31))
 return null;
 
 if ( ((jsmes == 4) || (jsmes == 6) || (jsmes == 9) || (jsmes == 11)) && (jsdia > 30) )
 return null;
 
 if (jsmes == 2)
 {
  if (EsBisiesto(jsanio))
  {
   if (jsdia > 29) return null;
  }
  else
  {
   if (jsdia > 28) return null;
  }
 }
  
 jsFec = new Date(jsanio, jsmes - 1, jsdia, 23);
 return jsFec;
}

function OptIndex(valor, selobj)
{

 for (i=0; i<selobj.length; i++)
 {
  if (selobj.options[i].value == valor) return i;
 }
 return -1;
}

function Nuevo_Dialogo(w_in, pagina, ancho, alto)
{
 return w_in.showModalDialog(pagina,'', 'center:yes;dialogWidth:' + ancho.toString() + ';dialogHeight:' + alto.toString());
}

function Nueva_Ventana(w_in, pagina, ancho, alto)
{
 l = (screen.availwidth - ancho) / 2;
 t = (screen.availheight - alto) / 2;

 w_out = w_in.open(pagina,"_blank",'toolbar=no,location=no,directories=no,status=yes,menubar=no,width=' + ancho.toString() + ',height=' + alto.toString() + ',top=' + t.toString() + ',left=' + l.toString());
 w_out.focus();
 return w_out;
}

function Ayuda_Fecha(txt)
{
 show_calendar(txt.id, txt.value);
 // var jsFecha = Nuevo_Dialogo(window, '/rhproneu/calendar.html', 16, 15);
 //if (jsFecha == null) txt.value = ''
 // else txt.value = jsFecha;
}

function MenuAM_Cancelar(w)
{
 w.parent.close();
}


/* - - - - - - - - - - - - - - - - - - - - - - - - - - */
// Funciones para el men· desplegable
function PopUp(w, ancho, pagina)
{
 with (w.parent)
 {
  document.all.mainFrame.scrolling = "no";
  parent.Marcos.cols = ancho.toString() + ",*";
  topFrame.document.location.href = pagina;
 }
}

function SelRec_Key(wmenu)
{
 var WinVista = wmenu.parent.parent.mainFrame.mainFrame;
 
 if (WinVista.RecKey == null) return null 
 else
 {
  var RecKey = WinVista.SelRecKey();
  if (RecKey == null) return null
  else return RecKey;
 }
}

function Refrescar_Vista(wmenu)
{
 var WinFiltro = wmenu.parent.parent.mainFrame.topFrame.leftFrame;
 WinFiltro.Filtrar(); 
}

function Menu_Salir(wmenu)
{
 wmenu.parent.parent.close();
}

// Funciones generales
function Verif_Integer(w,event)
{
 if ((event.keyCode < 48) || (event.keyCode > 57))
 {
  event.returnValue = false;
 }
}

function Verif_Float(w)
{
 if ((w.event.keyCode < 44) || ((w.event.keyCode > 44) && (w.event.keyCode < 48)) || (w.event.keyCode > 57))
 {
  w.event.returnValue = false;
 }
}

function Buscar_Empleado(leg, tp)
{
 return Nuevo_Dialogo(window, 'busemp40.html?ws-leg=' + leg + "&qs-tipoperf=" + tp, 1, 1);
}

function Buscar_Cliente(cod)
{
 return Nuevo_Dialogo(window, 'buscli00.html?ws-cod=' + cod, 1, 1);
}

function Obtener_Empleado(cod, desc, tp)
{
// cod: Campo que muestra el legajo
// desc: campo que muestra el apeynom
 var jsDesc = Buscar_Empleado(cod.value, tp);

 if (jsDesc == null)
 {
  cod.value = '';
  desc.value = '';
 }
 else
 {
  desc.value = jsDesc;
 } 
}

function codifURL(s)
{
 //return(s.replace(new RegExp("&","igm"), '%26').replace(new RegExp("?","igm"), '%3F'));
 var r1 = new RegExp("&","igm");
 var r2 = new RegExp("[?]","igm");
 
 var s1 = s.toString().replace(r1, '%26');
 var s2 = s1.toString().replace(r2, '%3F');
 return (s2);
}
var jsMaxRetValue = 1900;
var jsMaxRetValue = 1900;


function validarFecha(fd, fh) {
	/* fd,fh: strings que representan fechas */
	/* retorna 'true' si la fecha que representa fd es anterior a la que representa 
	   fh; y ambas son válidas */
	   
	/* requiere de cadenas.js */
	   
   if ((fh !== '') && (fd !== ''))
   {
    jsFD = new Date(Fecha_Anio(fd), Fecha_Mes(fd) - 1, Fecha_Dia(fd), 23);
    jsFH = new Date(Fecha_Anio(fh), Fecha_Mes(fh) - 1, Fecha_Dia(fh), 23);
    
    if (jsFD > jsFH)
     {
      alert('La fecha hasta debe ser mayor o igual a la fecha desde');
      return false;
     }
   }
}
function getElementsByName_ie(tag,name){
// Adaptacion para IE de la funcion getElementsByName
	var elem = document.getElementsByTagName(tag);
	var arr = new Array();
	for (i = 0, iArr = 0; i < elem.length; i++) {
		var att = elem[i].getAttribute("name");
		 if ( att == name) {
			 arr[iArr] = elem[i];
			 iArr++;
		 }		
	}
	return arr;
}


//Funciones para la creacion del calendario. 




function show_calendar(str_target, str_datetime) {
	var arr_months = ["Enero", "Febrero", "Marzo", "Abril", "Mayo", "Junio",
		"Julio", "Agosto", "Septiembre", "Octubre", "Noviembre", "Diciembre"];
	var week_days = ["Do", "Lu", "Ma", "Mi", "Ju", "Vi", "Sa"];
	var n_weekstart = 1; // day week starts from (normally 0 or 1)

	var dt_datetime = (str_datetime == null || str_datetime =="" ?  new Date() : str2dt(str_datetime));
	var dt_prev_month = new Date(dt_datetime);
	dt_prev_month.setMonth(dt_datetime.getMonth()-1);
	var dt_next_month = new Date(dt_datetime);
	dt_next_month.setMonth(dt_datetime.getMonth()+1);
	var dt_firstday = new Date(dt_datetime);
	dt_firstday.setDate(1);
	dt_firstday.setDate(1-(7+dt_firstday.getDay()-n_weekstart)%7);
	var dt_lastday = new Date(dt_next_month);
	dt_lastday.setDate(0);
	
	// html generation (feel free to tune it for your particular application)
	// print calendar header
	var str_buffer = new String (
		"<html>\n"+
		"<head>\n"+
		"	<title>Calendario</title>\n"+
		"</head>\n"+
		"<body bgcolor=\"White\">\n"+
		"<table class=\"clsOTable\" cellspacing=\"0\" border=\"0\" width=\"100%\">\n"+
		"<tr><td bgcolor=\"#4682B4\">\n"+
		"<table cellspacing=\"1\" cellpadding=\"3\" border=\"0\" width=\"100%\">\n"+
		"<tr>\n	<td bgcolor=\"#4682B4\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_prev_month)+"');\">"+
		"<img src=\"/rhproneu/images/calPrev.gif\" width=\"16\" height=\"16\" border=\"0\""+
		" alt=\"previous month\"></a></td>\n"+
		"	<td bgcolor=\"#4682B4\" colspan=\"5\">"+
		"<font color=\"white\" face=\"tahoma, verdana\" size=\"2\">"
		+arr_months[dt_datetime.getMonth()]+" "+dt_datetime.getFullYear()+"</font></td>\n"+
		"	<td bgcolor=\"#4682B4\" align=\"right\"><a href=\"javascript:window.opener.show_calendar('"
		+str_target+"', '"+dt2dtstr(dt_next_month)+"');\">"+
		"<img src=\"/rhproneu/images/calNext.gif\" width=\"16\" height=\"16\" border=\"0\""+
		" alt=\"next month\"></a></td>\n</tr>\n"
	);

	var dt_current_day = new Date(dt_firstday);
	// print weekdays titles
	str_buffer += "<tr>\n";
	for (var n=0; n<7; n++)
		str_buffer += "	<td bgcolor=\"#87CEFA\">"+
		"<font color=\"white\" face=\"tahoma, verdana\" size=\"2\">"+
		week_days[(n_weekstart+n)%7]+"</font></td>\n";
	// print calendar table
	str_buffer += "</tr>\n";
	while (dt_current_day.getMonth() == dt_datetime.getMonth() ||
		dt_current_day.getMonth() == dt_firstday.getMonth()) {
		// print row heder
		str_buffer += "<tr>\n";
		for (var n_current_wday=0; n_current_wday<7; n_current_wday++) {
				if (dt_current_day.getDate() == dt_datetime.getDate() &&
					dt_current_day.getMonth() == dt_datetime.getMonth())
					// print current date
					str_buffer += "	<td bgcolor=\"#FFB6C1\" align=\"right\">";
				else if (dt_current_day.getDay() == 0 || dt_current_day.getDay() == 6)
					// weekend days
					str_buffer += "	<td bgcolor=\"#DBEAF5\" align=\"right\">";
				else
					// print working days of current month
					str_buffer += "	<td bgcolor=\"white\" align=\"right\">";

				if (dt_current_day.getMonth() == dt_datetime.getMonth())
					// print days of current month
					str_buffer += "<a href=\"javascript:window.opener.document.getElementById('"+str_target+
					"').value='"+dt2dtstr(dt_current_day)+"'; window.close();\">"+
					"<font color=\"black\" face=\"tahoma, verdana\" size=\"2\">";
				else 
					// print days of other months
					str_buffer += "<a href=\"javascript:window.opener.document.getElementById('"+str_target+
					"').value='"+dt2dtstr(dt_current_day)+"'; window.close();\">"+
					"<font color=\"gray\" face=\"tahoma, verdana\" size=\"2\">";
				str_buffer += dt_current_day.getDate()+"</font></a></td>\n";
				dt_current_day.setDate(dt_current_day.getDate()+1);
		}
		// print row footer
		str_buffer += "</tr>\n";
	}
	// print calendar footer
	 str_buffer +=
	//	"<form name=\"cal\">\n<tr><td colspan=\"7\" bgcolor=\"#87CEFA\">"+
	//	"<font color=\"White\" face=\"tahoma, verdana\" size=\"2\">"+
	//	"Time: <input type=\"text\" name=\"time\" value=\""+
	//	"\" size=\"8\" maxlength=\"8\"></font></td></tr>\n</form>\n" +
		"</table>\n" +
		"</tr>\n</td>\n</table>\n" +
		"</body>\n" +
		"</html>\n";

	var vWinCal = window.open("", "Calendar", 
		"width=200,height=250,status=no,resizable=yes,top=200,left=200");
	vWinCal.opener = self;
	var calc_doc = vWinCal.document;
	calc_doc.write (str_buffer);
	calc_doc.close();
}
// datetime parsing and formatting routimes. modify them if you wish other datetime format
function str2dt (str_datetime) {
	var re_date = /^(\d+)\/(\d+)\/(\d+)\s*$/;
	if (!re_date.exec(str_datetime))
		return alert("Invalid Datetime format: "+ str_datetime);
	
	return (new Date (RegExp.$3, RegExp.$2-1, RegExp.$1));
	//, RegExp.$4, RegExp.$5, RegExp.$6));
}
function dt2dtstr (dt_datetime) {
var mes = dt_datetime.getMonth()+1;
var cadMes="";
if (mes <10) cadMes = "0";
cadMes += new String(mes);

	return (new String (
			dt_datetime.getDate()+"/"+(cadMes)+"/"+dt_datetime.getFullYear()+" "));
}