var HM_DOM = (document.getElementById) ? true : false;

   var HM_NS4 = (document.layers) ? true : false;

   var HM_IE = (document.all) ? true : false;

   var HM_IE4 = HM_IE && !HM_DOM;

   var HM_Mac = (navigator.appVersion.indexOf("Mac") != -1);

   var HM_IE4M = HM_IE4 && HM_Mac;

   var HM_IsMenu = (HM_DOM || HM_NS4 || (HM_IE && !HM_IE4M));



   if(!HM_IsMenu) event = null;



var zz, zv, d, fTSR;

var gBF=false;

var g_MINY = 1601;

var g_MAXY = 4500;

var g_month = 0;

var g_day = 0;

var g_year = 0;

var g_yLow = 1990;

var g_eC=null;

var g_eCV="";



var rgMC = Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);

d = new Date();

fTSR=0;

zv = d.getTime();

zz = "&zz="+zv;



var DiasPorMes=[31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];

ns4 = (document.layers)? true:false

ie4 = (document.all)? true:false

ie5=(ie4 && navigator.userAgent.indexOf('MSIE 5')>0);

var x = 0;

var y = 0;

var trk = 0;

var offsetx=-85;

var offsety=14;

var diaSeleccionado= ""+diaSeleccionado;


var Meses = new Array("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre");
var Hoy = new Date();

var divCalendario; //Indica el id de la etiqueta del calendario
var objReceptor; //Indica el objeto que va obtener la fecha seleccionada
var estiloCalendario; //Indica el estilo inicial del calendario

//if (ns4 || ie4) {

   //if (ns4) over = document.ptsDiv

   //if (ie4) over = ptsDiv.style

   //document.onmousemove = mouseMove

   //if (ns4) document.captureEvents(Event.MOUSEMOVE)

//}


function getObj(name)
{
  var obj;
  if (document.getElementById)
  {
  	obj = document.getElementById(name);	
  }
  else if (document.all)
  {
	obj = document.all[name];
  }
  else if (document.layers)
  {
   	obj = document.layers[name];
  }
  return obj;
}


function callayerWrite(txt) {

        if (ns4) {

                var lyr = document.ptsDiv.document

                lyr.write(txt)

                lyr.close()

        }

        else if (ie4) document.all["calendario"].innerHTML = txt

}



function MM_SIR() { //v3.0

    var i,x,a=document.MM_sr; 

    for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) 

    x.src=x.oSrc;

}



function MM_PI() { 

    var d=document; 

    if(d.images){ 

      if(!d.MM_p) d.MM_p=new Array();

      var i,j=d.MM_p.length,a=MM_PI.arguments; 

      for(i=0; i<a.length; i++)

      if (a[i].indexOf("#")!=0){ 

         d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];

      }

    }

}



function MM_FO(n, d) { 

    var p,i,x;  

    if(!d) d=document; 

    if((p=n.indexOf("?"))>0&&parent.frames.length) {

      d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);

    }

    if(!(x=d[n])&&d.all) x=d.all[n]; 

    for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];

    for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_FO(n,d.layers[i].document); return x;

}



function MM_SI() { 

    var i,j=0,x,a=MM_SI.arguments; 

    document.MM_sr=new Array; 

    for(i=0;i<(a.length-2);i+=3)

    if ((x=MM_FO(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}

}



function vacio()

{

}



esletra        = " ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789.-ÑñáéíóúüÁÉÍÓÚÜ&";

esnumero       = "0123456789";



function es_numero(cadena,lg)

{

   if (lg != cadena.length)  {return 1;}

   for (i=0;i<cadena.length;i++)

   if (esnumero.indexOf(cadena.charAt(i))==-1){return 1;}

   return 0;

}



function es_letra (cadena)

{

   lg = cadena.length;

   if (lg == 0) {return 1};

   for (i=0;i<cadena.length;i++)

   if (esletra.indexOf(cadena.charAt(i))==-1){return 1;}

   return 0;

}





function openwindow(direccion, name, cadena)  

{  

  var winf = window.open(direccion,name,cadena);  

  winf.focus();  

} 



function abrirventana(varHttp, lenX, lenY, bScroll) {

    var winf = open(varHttp, null, "width=" + lenX + ",height=" + lenY + ",status=no,menubar=no,scrollbars=" + bScroll + ",resizable=no");

    winf.focus();  

}



function GoToAuxWin(n, page){

numero = n;

page = "/pl/" + page;

listin = open(page, "", "toolbar=no,=no,directories=no,status=yes,menubar=no,scrollbars=yes,resizable=yes,copyhistory=no,width=320,height=300");

if(navigator.appName == "Netscape")

listin.focus();

}



function Calendario(tipo,pais_an,id, idObjRcptr, estilo, fecha){  
	tipoFecha=tipo;
	pais=pais_an;
	
	divCalendario = getObj(id);	
	objReceptor = getObj(idObjRcptr);
	
    estiloCalendario = estilo;
    var fecha_array;

    if (fecha != "")
    {		
        fecha_array = fecha.split("-");
		Hoy = new Date(fecha_array[2],fecha_array[1]-1,fecha_array[0]);				
    }

	if (divCalendario.style.visibility=="visible") {
  	   cerrarCalendario();
  	   return;
	}
    
	abrirCalendario(tipo);

}



function showObject(obj) {

if (ns4) obj.visibility = "show"

else if (ie4) obj.visibility = "visible"

}



function hideObject(obj) {

if (ns4) obj.visibility = "hide"

else if (ie4) obj.visibility = "hidden"

}



function abrirCalendario(tipoFecha){

  var text_cal="";

  fecha_real =new Date();

  anio_real = fecha_real.getFullYear();

  mes_real = fecha_real.getMonth();

  dia_real = fecha_real.getDate();


 

  fechaInputSeleccionada=objReceptor.value.substring(objReceptor.value.indexOf("-"),objReceptor.value.length);
  diaYaSeleccionado=1*objReceptor.value.substring(0,objReceptor.value.indexOf('-'));
    

  ano = "" +Hoy.getYear();

  mes = (Hoy.getMonth()+1);

  mes = (mes<10?"0":"")+mes;

  fechaSeleccionada="/"+mes+"/"+ano.substring(2,4);

  var Anyo=Hoy.getYear(); // Si el año es anterior a 2000 debe sumarse 1900 a la cantidad obtenida

   // Observacion: El anyo se contabiliza a partir de 1900

   var EsteDia=Hoy.getDate();



  // Actualizacion del mes de Febrero (por los anyos bisiestos)

  if (((Anyo % 4 == 0) && (Anyo % 100 != 0)) || (Anyo % 400 == 0))

    DiasPorMes[1] = 29;

  // Numero de dias del mes actual

  NDias =DiasPorMes[Hoy.getMonth()];



  // Calculo que dia de la semana es el primero del mes

  PrimerDia=Hoy;

  PrimerDia.setDate(1);

 // Observacion: Obtengo el dia de hoy (p.e, 10-11-1999) y calculo que dia de la semana

 // es el dia 1 del mismo mes y anyo (p.e, 1-11-1999)



  Comienzo=PrimerDia.getDay();



  if (Comienzo==0) Comienzo=6;

    else Comienzo=PrimerDia.getDay()-1;



 // Escritura en la pantalla de la tabla correspondiente al mes actual 



   text_cal="<div id='calendario' style='"+estiloCalendario+"'>"

   text_cal=text_cal+"<CENTER>"

   text_cal=text_cal+"<TABLE BORDER=0 cellspacing=0 cellpadding=1 bgcolor=000000>"

   text_cal=text_cal+"<tr><td>"

   text_cal=text_cal+"<TABLE BORDER=0 cellspacing=0 cellpadding=0 bgcolor=FFFFFF>"

   text_cal=text_cal+"<TR bgcolor=485160 class=calendario>"



   // Escribo en nombre del mes en la cabecera de la tabla





   if ( 1==3 && Hoy.getMonth() == mes_real && Hoy.getFullYear() == anio_real )

     text_cal=text_cal+"<TD align=left width=20>&nbsp;"

   else

     text_cal=text_cal+"<TD align=center width='20'><a href='Javascript:void(null)' onClick='mesAtras(&quot;"+tipoFecha+"&quot;)'><img src='/img/infoBoletin/pic012.gif' border=0 ></a>"

     text_cal=text_cal+"</TD>"



 text_cal=text_cal+'<td COLSPAN=5 align=center><font color="white">'+Meses[Hoy.getMonth()*1]



   // Observacion: Los meses se numeran desde 0 hasta 11



   text_cal=text_cal+" "

   text_cal=text_cal+Anyo

     text_cal=text_cal+"<TD align=center width='20'><a href='Javascript:void(null)' onClick='mesAdelante(&quot;"+tipoFecha+"&quot;)'><img src='/img/infoBoletin/pic013.gif' border=0 ></a>"

  text_cal=text_cal+"</TD></TR>"

   text_cal=text_cal+"<tr><td colspan=7 bgcolor=000000><img src='/pic/es/t.gif' height=1 border=0></td></tr>"

   text_cal=text_cal+"<TR class=calendario bgcolor=FFFFFF><td align=center>L<td align=center>M<td align=center>X<td align=center>J<td align=center>V<td align=center>S<td align=center>D</TR>"



   text_cal=text_cal+"<tr><td colspan=7 bgcolor=000000><img src='/pic/es/t.gif' height=1 border=0></td></tr>"



 // Escritura de los espacios en blanco de la tabla



 text_cal=text_cal+"<TR>"

   columna=0;



   for (i=0; i<Comienzo; i++)

      {

        text_cal=text_cal+"<TD>"

        columna++;

        text_cal=text_cal+"</TD>"

      }



   // Escritura de los dias del mes



 for (i=1; i<=NDias; i++)

      {

      text_cal=text_cal+"<TD class=calendario width='20'>"

        if ((i == diaYaSeleccionado)&&(fechaInputSeleccionada == fechaSeleccionada))

             estilo="style='text-decoration:none;color:#000066'";

        else if (columna == 6)

             estilo="style='text-decoration:none;color: #ff0000'";

        else if (columna == 5)

             estilo="style='text-decoration:none;color:#ff0000'";

        else 

             estilo="style='text-decoration:none;color:#000066'";



   if ( Hoy.getMonth() == mes_real && Hoy.getFullYear() == anio_real && i < dia_real)

        //15/07/2002 Solo activa los días a partir del que estamos   text_cal=text_cal+"<center><font color='#CCCCCC'>"+i+"</font></center>"

        text_cal=text_cal+"<center><div id="+i+" style='cursor:hand' onclick='javascript:diaSeleccionado="+i+";verDiaSeleccionado(&quot;"+tipoFecha+"&quot;)'><a href='Javascript:void(null)' "+estilo+">"+i+"</a></div></center>"



   else

        text_cal=text_cal+"<center><div id="+i+" style='cursor:hand' onclick='javascript:diaSeleccionado="+i+";verDiaSeleccionado(&quot;"+tipoFecha+"&quot;)'><a href='Javascript:void(null)' "+estilo+">"+i+"</a></div></center>"



        if (i == EsteDia || columna == 6)

             text_cal=text_cal

        else if (columna == 0)

             text_cal=text_cal

        text_cal=text_cal+"</TD>"

columna++;

        if (columna == 7)

          { text_cal=text_cal+"</TR><TR>"; // Comienza una nueva fila

            columna=0;

          }

    }//fin del for



  text_cal=text_cal+"</TR>"

  text_cal=text_cal+"<TR>"



  text_cal=text_cal+"<TD colspan=5></td><td colspan=2 align=right><a href='Javascript:void(null)' onClick='cerrarCalendario()'><img src='/img/infoBoletin/pic014.gif' border=0 ></a>"

  text_cal=text_cal+"</TD>"

  text_cal=text_cal+"</TR>"

text_cal=text_cal+"</TABLE>"

  text_cal=text_cal+"</TD>"

  text_cal=text_cal+"</TR>"

text_cal=text_cal+"</TABLE>"

text_cal=text_cal+"</CENTER>"

  text_cal=text_cal+"</div>"
//class=pts
//text_cal=    "<TABLE WIDTH=80 BORDER=0 CELLPADDING=1 CELLSPACING=0 BGCOLOR=#044064><TR><TD><TABLE WIDTH=100% BORDER=0 CELLPADDING=1 CELLSPACING=0><TR><TD nowrap class=pts>&nbsp;"+text+"&nbsp;</TD></TR></TABLE></TD></TR></TABLE>";

//alert(text_cal);

//callayerWrite(text_cal);



calendario.outerHTML=text_cal;

calendario.style.visibility="visible";



}//finn de abrir calendario



function cerrarCalendario(){

     calendario.style.visibility="hidden";

}







function verDiaSeleccionado(tipoFecha){

mesActual=Hoy.getMonth()+1;

anoActual=Hoy.getYear();

anoActual=""+anoActual;

mesActual= ""+mesActual;

mesActual = mesActual.length==2 ? mesActual : "0"+mesActual;

diaSeleccionado= ""+diaSeleccionado;

diaSeleccionado = diaSeleccionado.length==2 ? diaSeleccionado : "0"+diaSeleccionado;

if (tipoFecha=="I") {
objReceptor.value=diaSeleccionado+"-"+mesActual+"-"+anoActual.substring(0,4);}
var objTmp = getObj("tmp_" + objReceptor.name);
if (objTmp != null) {
 objTmp.value=objReceptor.value;
}


calendario.style.visibility="hidden";

    //Hoy=new Date(2002,0,28); //año,mes,dia

//control_fecha();

   }//fin verDiaSeleccionado



function mesAtras(tipoFecha){

   if (Hoy.getMonth()==0){

  mesActual=11;

  anoActual=Hoy.getYear()-1;

  }

  else{

  mesActual=Hoy.getMonth()-1;

  anoActual=Hoy.getYear();

  }

//     Hoy=new Date(anoActual,mesActual,28); //año,mes,dia

      Hoy=new Date(anoActual,mesActual,1); //año,mes,dia

      abrirCalendario(tipoFecha);

}//fin mesAtras



function mesAdelante(tipoFecha){

  if (Hoy.getMonth()==11){

  	mesActual=0;

  	anoActual=Hoy.getYear()+1;

  }

  else{

  mesActual=Hoy.getMonth()+1;

  anoActual=Hoy.getYear();

  }

      Hoy=new Date(anoActual,mesActual,1); //año,mes,dia

//      Hoy=new Date(anoActual,mesActual,28); //año,mes,dia

      abrirCalendario(tipoFecha);

}//fin mesAdelante



function GetInputDate(t) {

var l = t.length;

if(0 == l) return false;

var cSp = '\0';

var sSp1 = "";

var sSp2 = "";

for(var i=0; i<t.length; i++){

var c=t.charAt(i);

if(c==' ' || isdigit(c)) continue;

else if(cSp == '\0' && (c == '/' || c == '-' || c == '.')) {

cSp = c;

sSp1 = t.substring(i+1,l);

} else if(c==cSp) sSp2 = t.substring(i+1,l);

else if(c != cSp) return false;

}

if(0 == sSp1.length) return false;

var m=atoi(sSp1);

var d=atoi(t);

var y; 

if(0 != sSp2.length) y = atoi(sSp2);

else y = DefYr(m,d);

if(y < 100){

y = 1900+y;

while(y < g_yLow) y = y+100;

}

if(y < g_MINY || y > g_MAXY || m < 1 || m > 12) return false;

if(d < 1 || d > GetMonthCount(m,y)) return false;

g_month = m;

g_day = d;

g_year = y;

return true;

}



function DefYr(m,d){

var dt = new Date();

var yCur = (dt.getYear() < 1000) ? 1900+dt.getYear() : dt.getYear();

if(m-1 < dt.getMonth() || (m-1 == dt.getMonth() && d < dt.getDate())) return 1+yCur;

else return yCur;

}



function atoi(s){

var t=0;

for(var i=0; i<s.length; i++){

var c=s.charAt(i);

if(!isdigit(c)) return t;

else t = t*10 + (c-'0');

}

return t;

}



function isdigit(c) {

return(c >= '0' && c <= '9');

}



function GetMonthCount(m,y){

var c = rgMC[m-1];

if((2 == m) && IsLeapYear(y)) c++;

return c;

}



function IsLeapYear(y){

if(0 == y % 4 && ((y % 100 != 0) || (y % 400 == 0))) return true;

else return false;

}