 <!--
/*Funcion de Fecha - colexpo.com*/
var mydate = Date();
var length = mydate.length;
var myYear = (new Date()).getYear();
if (myYear < 1000) myYear+=1900;
var myDay = (new Date()).getDay();
var myMonth=(new Date()).getMonth();
var myMonthDay = (new Date()).getDate();

month = new Array();
month[0] = "Enero";
month[1] = "Febrero";
month[2] = "Marzo";
month[3] = "Abril";
month[4] = "Mayo";
month[5] = "Junio";
month[6] = "Julio";
month[7] = "Agosto";
month[8] = "Septiembre";
month[9] = "Octubre";
month[10] = "Noviembre";
month[11] = "Diciembre";

day = new Array();
day[0] = "Domingo";
day[1] = "Lunes";
day[2] = "Martes";
day[3] = "Miércoles";
day[4] = "Jueves";
day[5] = "Viernes";
day[6] = "Sábado";

month_eng = new Array();
month_eng[0] = "January";
month_eng[1] = "February";
month_eng[2] = "March";
month_eng[3] = "April";
month_eng[4] = "May";
month_eng[5] = "June";
month_eng[6] = "Julio";
month_eng[7] = "August";
month_eng[8] = "September";
month_eng[9] = "October";
month_eng[10] = "November";
month_eng[11] = "December";

day_eng = new Array();
day_eng[0] = "Sunday";
day_eng[1] = "Monday";
day_eng[2] = "Tuesday";
day_eng[3] = "Wednesday";
day_eng[4] = "Thursday";
day_eng[5] = "Friday";
day_eng[6] = "Saturday";


var myWeekDay = day[myDay]
var myMonth=month[myMonth];

var myWeekDay_eng= day_eng[myDay]
var myMonth_eng=month_eng[(new Date()).getMonth()];

function writeDate()
{
 var dateStr = myMonthDay +" de " + myMonth + ", "  + myYear;
document.write(dateStr);
}

function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

	function ExpandeBloque(BlockName) {
		img = eval('document.img_'+BlockName);
		if ( img != null ) {
			x=img.src;
			if (document.getElementById(BlockName).style.display == "block") {
				document.getElementById(BlockName).style.display = "none";
				if (x.substring(x.length-8,x.length) == "down.gif" )
					img.src = "/images/menu/menu_up.gif";
				else
					img.src = "/images/menu/menu_down.gif"
			} else {
				document.getElementById(BlockName).style.display = "block";
				if (x.substring(x.length-6,x.length) == "up.gif")
					img.src = "/images/menu/menu_down.gif";
				else
					img.src = "/images/menu/menu_up.gif";
			}
		}
	}

function MM_findObj(n, d) { //v4.01
  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_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}
	
function YY_checkform() { //v4.71
//copyright (c)1998,2002 Yaromat.com
  var a=YY_checkform.arguments,oo=true,v='',s='',err=false,r,o,at,o1,t,i,j,ma,rx,cd,cm,cy,dte,at;
  for (i=1; i<a.length;i=i+4){
    if (a[i+1].charAt(0)=='#'){r=true; a[i+1]=a[i+1].substring(1);}else{r=false}
    o=MM_findObj(a[i].replace(/\[\d+\]/ig,""));
    o1=MM_findObj(a[i+1].replace(/\[\d+\]/ig,""));
    v=o.value;t=a[i+2];
    if (o.type=='text'||o.type=='password'||o.type=='hidden'){
      if (r&&v.length==0){err=true}
      if (v.length>0)
      if (t==1){ //fromto
        ma=a[i+1].split('_');if(isNaN(v)||v<ma[0]/1||v > ma[1]/1){err=true}
      } else if (t==2){
        rx=new RegExp("^[\\w\.=-]+@[\\w\\.-]+\\.[a-zA-Z]{2,4}$");if(!rx.test(v))err=true;
      } else if (t==3){ // date
        ma=a[i+1].split("#");at=v.match(ma[0]);
        if(at){
          cd=(at[ma[1]])?at[ma[1]]:1;cm=at[ma[2]]-1;cy=at[ma[3]];
          dte=new Date(cy,cm,cd);
          if(dte.getFullYear()!=cy||dte.getDate()!=cd||dte.getMonth()!=cm){err=true};
        }else{err=true}
      } else if (t==4){ // time
        ma=a[i+1].split("#");at=v.match(ma[0]);if(!at){err=true}
      } else if (t==5){ // check this 2
            if(o1.length)o1=o1[a[i+1].replace(/(.*\[)|(\].*)/ig,"")];
            if(!o1.checked){err=true}
      } else if (t==6){ // the same
            if(v!=MM_findObj(a[i+1]).value){err=true}
      }
    } else
    if (!o.type&&o.length>0&&o[0].type=='radio'){
          at = a[i].match(/(.*)\[(\d+)\].*/i);
          o2=(o.length>1)?o[at[2]]:o;
      if (t==1&&o2&&o2.checked&&o1&&o1.value.length/1==0){err=true}
      if (t==2){
        oo=false;
        for(j=0;j<o.length;j++){oo=oo||o[j].checked}
        if(!oo){s+='* '+a[i+3]+'\n'}
      }
    } else if (o.type=='checkbox'){
      if((t==1&&o.checked==false)||(t==2&&o.checked&&o1&&o1.value.length/1==0)){err=true}
    } else if (o.type=='select-one'||o.type=='select-multiple'){
      if(t==1&&o.selectedIndex/1==0){err=true}
    }else if (o.type=='textarea'){
      if(v.length<a[i+1]){err=true}
    }
    if (err){s+='* '+a[i+3]+'\n'; err=false}
  }
  if (s!=''){alert('La información requerida no ha sido llenada:\t\t\t\t\t\n\n'+s)}
  document.MM_returnValue = (s=='');
}

/* -------- Funciones menu ----------- */
var posicionados = false
var menusItems = new Array ()
var submenusCapas = new Array()

function posicionaDesplegado (){
	for (i=0;i<submenusCapas.length;i++)
	{
		posx= xOffsetLeft(menusItems[i])
		posy= xOffsetTop (menusItems[i])
		xMoveTo(submenusCapas[i],posx+anchotabla,posy+altotabla)
	}
}

function verDesplegado(capa){
 if (posicionados){
	for (i=0;i<submenusCapas.length;i++){
		if (submenusCapas[i] != capa) xHide(submenusCapas[i])
	}
	clearTimeout(retardo)
	xShow(capa)
 }
}

function ocultaDesplegadoRetardo(capa){
 if (posicionados){
	ocultar = capa
	clearTimeout(retardo)
	retardo = setTimeout("xHide('" + ocultar + "')",1000)
 }
}

function verDesplegadoRetardo(ind){
 if (posicionados){
	clearTimeout(retardo)
 }
}

/* -------- funcion para iluninar crud ----------- */

// x_core.js, part of X, a Cross-Browser.com Javascript Library
// Copyright (C) 2001,2002,2003,2004,2005 Michael Foster - Distributed under the terms of the GNU LGPL - OSI Certified
// File Rev: 5

var xVersion='3.15.4',xNN4,xOp7,xOp5or6,xIE4Up,xIE4,xIE5,xUA=navigator.userAgent.toLowerCase();
if (window.opera){
  xOp7=(xUA.indexOf('opera 7')!=-1 || xUA.indexOf('opera/7')!=-1);
  if (!xOp7) xOp5or6=(xUA.indexOf('opera 5')!=-1 || xUA.indexOf('opera/5')!=-1 || xUA.indexOf('opera 6')!=-1 || xUA.indexOf('opera/6')!=-1);
}
else if (document.all && xUA.indexOf('msie')!=-1) {
  xIE4Up=parseInt(navigator.appVersion)>=4;
  xIE4=xUA.indexOf('msie 4')!=-1;
  xIE5=xUA.indexOf('msie 5')!=-1;
}
else if (document.layers) {xNN4=true;}
xMoz=xUA.indexOf('gecko')!=-1;
xMac=xUA.indexOf('mac')!=-1;

function xGetElementById(e) {
  if(typeof(e)!='string') return e;
  if(document.getElementById) e=document.getElementById(e);
  else if(document.all) e=document.all[e];
  else e=null;
  return e;
}


/* xTableIterate()
   sec - ID or element reference of table, tHead, tBody, or tFoot
   fnCallback - function reference which will be called for
                each row and cell in section. If fnCallback returns
                false then iterations will stop. It will be
                passed the following arguments:
                obj - reference to the current cell
                      or current row if isRow is true.
                isRow - true if obj is a ref to a TR,
                        false if obj is a ref to a TD.
                row - 0-based row number relative to section.
                col - 0-based column number relative to section.
                data - passed to fnCallback at each call
*/
function xTableIterate(sec, fnCallback, data)
{
  var r, c;
  sec = xGetElementById(sec);
  if (!sec || !fnCallback) { return; }
  for (r = 0; r < sec.rows.length; ++r) {
    if (false == fnCallback(sec.rows[r], true, r, c, data)) { return; }
    for (c = 0; c < sec.rows[r].cells.length; ++c) {
      if (false == fnCallback(sec.rows[r].cells[c], false, r, c, data)) { return; }
    }
  }
}

/* xTableCursor - mouseover highlight on rows and cells.
   id  - table id.
   inh - inherit style.
   def - default style.
   hov - row hover style.
   sel - cell selected style.
*/
function xTableCursor(id, inh, def, hov, sel) // object prototype
{
  var tbl = xGetElementById(id);
  if (tbl) {
    xTableIterate(tbl, init);
  }
  function init(obj, isRow)
  {
    if (isRow) {
      obj.className = def;
      obj.onmouseover = trOver;
      obj.onmouseout = trOut;
    }
    else {
      obj.className = inh;
      obj.onmouseover = tdOver;
      obj.onmouseout = tdOut;
    }
  }
  this.unload = function() { xTableIterate(tbl, done); }
  function done(o) { o.onmouseover = o.onmouseout = null; }
  function trOver() { this.className = hov; }
  function trOut() { this.className = def; }
  function tdOver() { this.className = sel; }
  function tdOut() { this.className = inh; }
}
/*************** Inicio Pop Up con Iframes  *************************/

mostrarCambio=1; 
mostrarContador=0;
var ns=(document.layers);
var ie=(document.all);
var w3=(document.getElementById && !ie);
var calunit=ns? "" : "px"
var mitadanchoIfr = 0;
var mitadaltoIfr = 0

function mostrarLayer() {
		mostrarContador+=1;
		if (ie){
			documentWidth  =truebody().offsetWidth/2+truebody().scrollLeft-20;
			documentHeight =truebody().offsetHeight/2+truebody().scrollTop-20;
		}	
		else if (ns){
			documentWidth=window.innerWidth/2+window.pageXOffset-20;
			documentHeight=window.innerHeight/2+window.pageYOffset-20;
		} 
		else if (w3){
			documentWidth=self.innerWidth/2+window.pageXOffset-20;
			documentHeight=self.innerHeight/2+window.pageYOffset-20;
		} 
		mostrarDiv.left=documentWidth-mitadanchoIfr+calunit;
		mostrarDiv.top =documentHeight-mitadaltoIfr+calunit;
		setTimeout("mostrarLayer()",10);
}

function truebody() {
	return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
}

function PopUpIframe(rutaIframe, anchoIfr, altoIfr) 
{
	mitadanchoIfr = parseInt(anchoIfr)/2;
	mitadaltoIfr = parseInt(altoIfr)/2;
	if(!ns && !ie && !w3) return;
	if(ie) mostrarDiv=eval('window.document.all.iFramePopUp.style');
	else if(w3)	mostrarDiv=eval('window.document.getElementById("iFramePopUp").style');
	window.document.getElementById("iFramePopUp").src = rutaIframe;
	mostrarDiv.zIndex = 500;
	mostrarDiv.width = anchoIfr + "px";
	mostrarDiv.height = altoIfr + "px";
	mostrarDiv.display = "";
	mostrarLayer();
}
function OcultaIframePopup()
{
	parent.document.getElementById("iFramePopUp").style.display = "none"
	parent.document.getElementById("iFramePopUp").src = "about:blank";
	
}

/*************** Funcion Cambiar Imagenes  *************************/
function MM_swapImgRestore() { //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_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.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_findObj(n, d) { //v4.01
  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_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
/*************** Fin Pop Up con Iframes  *************************/

/*************** Funcion iluminar  *************************/

var arranque = false;

function iluminarsubmenu(reglones)
{
	if(!arranque)
	{
		rowSetup(reglones);
		arranque = true;
	}
}

function rowSetup(nThis)
{
  var sec, r, e;
  sec = document.getElementById('tbody' + nThis);
  if (sec && sec.rows) {
    for (r = 0; r < sec.rows.length; ++r) {
      e = sec.rows[r];
      e.onmouseover = trOnMouseover;
      e.onmouseout = trOnMouseout;
      e.className = 'trOutsubmenu';
    }
  }
}
function trOnMouseover()
{
  this.className = 'trOversubmenu';
}
function trOnMouseout()
{
  this.className = 'trOutsubmenu';
}
function xTableCursor(id, inh, def, hov, sel) // object prototype
{
  var tbl = xGetElementById(id);
  if (tbl) {
    xTableIterate(tbl, init);
  }
  function init(obj, isRow)
  {
    if (isRow) {
      obj.className = def;
      obj.onmouseover = trOver;
      obj.onmouseout = trOut;
    }
    else {
      obj.className = inh;
      obj.onmouseover = tdOver;
      obj.onmouseout = tdOut;
    }
  }
  this.unload = function() { xTableIterate(tbl, done); }
  function done(o) { o.onmouseover = o.onmouseout = null; }
  function trOver() { this.className = hov; }
  function trOut() { this.className = def; }
  function tdOver() { this.className = sel; }
  function tdOut() { this.className = inh; }
}
/*Funcion Pestañas*/
<!--
function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.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_findObj(n, d) { //v4.01
  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_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_nbGroup(event, grpName) { //v6.0
  var i,img,nbArr,args=MM_nbGroup.arguments;
  if (event == "init" && args.length > 2) {
    if ((img = MM_findObj(args[2])) != null && !img.MM_init) {
      img.MM_init = true; img.MM_up = args[3]; img.MM_dn = img.src;
      if ((nbArr = document[grpName]) == null) nbArr = document[grpName] = new Array();
      nbArr[nbArr.length] = img;
      for (i=4; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
        if (!img.MM_up) img.MM_up = img.src;
        img.src = img.MM_dn = args[i+1];
        nbArr[nbArr.length] = img;
    } }
  } else if (event == "over") {
    document.MM_nbOver = nbArr = new Array();
    for (i=1; i < args.length-1; i+=3) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = (img.MM_dn && args[i+2]) ? args[i+2] : ((args[i+1])? args[i+1] : img.MM_up);
      nbArr[nbArr.length] = img;
    }
  } else if (event == "out" ) {
    for (i=0; i < document.MM_nbOver.length; i++) {
      img = document.MM_nbOver[i]; img.src = (img.MM_dn) ? img.MM_dn : img.MM_up; }
  } else if (event == "down") {
    nbArr = document[grpName];
    if (nbArr)
      for (i=0; i < nbArr.length; i++) { img=nbArr[i]; img.src = img.MM_up; img.MM_dn = 0; }
    document[grpName] = nbArr = new Array();
    for (i=2; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = img.MM_dn = (args[i+1])? args[i+1] : img.MM_up;
      nbArr[nbArr.length] = img;
  } }
}
//-->