// Archivo JScript
  var Meses=new Array(01,02,03,04,05,06,07,08,09,10,11,12)
  var TextoMeses=new Array("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre")
  var Dias=new Array(31,29,31,30,31,30,31,31,30,31,30,31)
  
  function isNumber(inputVal)
  {
    var Numbers=new Array(0,1,2,3,4,5,6,7,8,9)
    var Correcto
    inputStr= ""  + inputVal
    for (var i=0; i<inputStr.length; i++)
    {
      var oneChar=inputStr.charAt(i)
      Correcto = 0
      for (var iX=0; iX<=9; iX++)
      {
        if (oneChar==Numbers[iX])
        {
          Correcto = 1
        }
      }
      if (Correcto==0)
      {
        return false
      }
    }
    return true
  }
    
    
//Funcion que comprueba si la fecha fin es mayor que la fecha de inicio
function fCompararFechas(sFechaIni, sFechaFin)
{

	sFechaIni=sFechaIni.substring(6,sFechaIni.length) + sFechaIni.substring(3,5) + sFechaIni.substring(0,2)	;
	sFechaFin=sFechaFin.substring(6,sFechaFin.length) + sFechaFin.substring(3,5) + sFechaFin.substring(0,2)	;
		
    if (sFechaIni>sFechaFin)
    {
		alert("La fecha de Inicio no puede ser mayor que la fecha fin");
		return true;
	}
	else
	{
		return false;
	}
    

}	
	
  //Funcion a llamar para validar un campo fecha. Esta llamará otra vez a otras funciones para
  //la correcta validación del campo fecha
  function fValidarFecha(CajaTexto,fecha)
  {
    if (fecha.length!=0)
    { 
      fecha=fPonCeros(fecha)
      if (fCompruebaValores(fecha))
        if (fValidaYear(fecha))
          if (fValidaMes(fecha))
            if (fValidaDia(fecha))
            {
              var Dia  = fecha.substring(0,2)
			  var Mes  = fecha.substring(3,5)
              var Year = fecha.substring(6,fecha.length)
              //CajaTexto.value=Year+ "/" + Mes+Dia
              return true
            }
            else
            {
              return false
            }
          else
          {
            return false
          }
        else
        {
          return false
        }
      else
      {
        return false
      }
    }
    else
      return true
  }
  
  
  //Funcion a llamar para validar un campo fecha. Esta llamará otra vez a otras funciones para
  //la correcta validación del campo fecha
  function fValidarFecha2(fecha)
  {
    if (fecha.length!=0)
    { 
      fecha=fPonCeros(fecha)
      if (fCompruebaValores(fecha))
        if (fValidaYear(fecha))
          if (fValidaMes(fecha))
            if (fValidaDia(fecha))
            {
              var Dia  = fecha.substring(0,2)
			  var Mes  = fecha.substring(3,5)
              var Year = fecha.substring(6,fecha.length)
              //CajaTexto.value=Year+ "/" + Mes+Dia
              return true
            }
            else
            {
              return false
            }
          else
          {
            return false
          }
        else
        {
          return false
        }
      else
      {
        return false
      }
    }
    else
      return true
  }  
  
  //----Función que comprueba el tamaño del campo fecha---------------
  //TRUE  = Correcto
  //FALSE = Incorrecto
  function fTamanoFecha(fecha)
  {
    if (fecha.length<8)
    {
      alert("Formato de fecha Incorrecto: DD/MM/AAAA")
      return false
    }
    else
    {
      return true
    }
  }
  
  //----Función que inserta el valor 0 en una fecha (1/12/2000 -> 01/12/2000)------
  //Fecha 
  function fPonCeros(fecha)
  {
    var indiceDia, indiceMes, Separador="/"
    if (fecha.indexOf("-")>0)  Separador="-"
    indiceDia=fecha.indexOf(Separador) //Indice del primer separador
    if (indiceDia==1)
    {
      fecha="0" + fecha
    }
    indiceMes=fecha.lastIndexOf(Separador)
    if (indiceMes==4)
    {
      fecha=fecha.substring(0,3) + "0" + fecha.substring(3)
    }
    return fecha
  }
  
  //----Función que comprueba si el mes es correcto-----------------
  //TRUE  = Correcto
  //FALSE = Incorrecto
  function fValidaMes(fecha)
  {
    var Mes = fecha.substring(3,5)
    for (iX=0; iX<=11; iX++)
    {
      if (Mes==Meses[iX])
      {
        return true
      }
    }
    if (Mes>12)
    {
      alert("Mes Introducido mayor a Diciembre")
	  return false
	}
    if (Mes<1)
    {
      alert("Mes Introducido menor a Enero")
	  return false
	}
  }
  
  //----Función que comprueba si el año es correcto (A partir de 1900)--
  //TRUE  = Correcto
  //FALSE = Incorrecto
  function fValidaYear(fecha)
  {
    return true
  }
  
  //----Función que comprueba si el día es correcto
  //TRUE  = Correcto
  //FALSE = Incorrecto
  function fValidaDia(fecha)
  {
    var Dia = fecha.substring(0,2)
    var Mes = fecha.substring(3,5)
    if (Dia <= Dias[Mes - 1])
    {
      return true
    }
    else
    {
      alert("El día " + Dia + " es incorrecto para el mes de " + TextoMeses[Mes - 1])
	  return false
	}
  }
  
  //----Función que comprueba el tamaño y el valor del Dia, Mes y año
  //TRUE  = Correcto
  //False = Incorrecto
  function fCompruebaValores(fecha)
  {
    var Dia  = fecha.substring(0,2)
    var Mes  = fecha.substring(3,5)
    var Year = fecha.substring(6,fecha.length)
    if ((Dia.length==2) && (Mes.length==2) && (Year.length==4))
    { 
      if ((isNumber(Dia)) && (isNumber(Mes)) && (isNumber(Year)))
      {
        return true
      }
      else
      {
        alert("Fecha introducida " + fecha + " incorrecta: DD/MM/AAAA")
		return false
      }
    }
    else
    {
      alert("Fecha introducida " + fecha + " incorrecta: DD/MM/AAAA")
	  return false
	}
  }