var _blnmsg = true;
function IniciaPag() {

	//top.frames["greca"].document.form.menu.value = 1;
	//self.defaultStatus = "Seleccione una opción de las disponibles.";
	return true;
}

function FinPag() {
	self.defaultStatus = "";
	return true;
}

  if (!(document.all||document.getElementById)) document.tags.td.fontSize="10px";
 // if (self.location == parent.location) document.location.replace("http://www.cajalaboral.com");

  var ns6=document.getElementById&&!document.all;
  if (!ns6){
    var str_base=document.all?"document.all.":"document.layers.";
    var str_arriba=document.all?".style.pixelTop":".top";
    var str_alto=document.all?".offsetHeight":".document.height";
    var str_recorte=document.all?".style.clip":".clip.bottom";
    var str_mostrar=document.all?".style.visibility='visible'":".visibility='show'";
    var str_ocultar=document.all?".style.visibility='hidden'":".visibility='hide'";
  }
 
 
  var vnt_abierto='';
  var vnt_porabrir='';
  var bln_ocupado=false;

 function fn_iniciar(NumMenu){
   IniciaPag();
   if (bln_ocupado)	return;
   if (ns6){
     if (!document.getElementById(arr_submenus[NumMenu])) return;
   }
   else{
     if (!eval(str_base+arr_submenus[NumMenu])) return;
   }
   if (vnt_abierto!==''&&vnt_abierto!=NumMenu){
     vnt_porabrir=NumMenu;
     fn_plegar(vnt_abierto,25,1);
   }
   else
     if	(vnt_abierto==='')
       fn_desplegar(NumMenu,25,1);
     else
       fn_plegar(vnt_abierto,25,1);
 }

 function fn_desplegar(NumMenu,Dif,Seg,int_Alto){
   bln_ocupado=true;
   vnt_abierto=NumMenu;
   vnt_porabrir='';
   if (ns6) {
     if (parseInt(document.getElementById(arr_submenus[NumMenu]).style.top)==0) {
       document.getElementById(arr_submenus[NumMenu]).style.top=1+parseInt(document.getElementById(arr_menus[NumMenu]).style.top)+parseInt(document.getElementById(arr_menus[NumMenu]).offsetHeight);
       document.getElementById(arr_submenus[NumMenu]).style.visibility='visible';
     }
     alt=parseInt(document.getElementById(arr_submenus[NumMenu]).offsetHeight);
     int_Alto=int_Alto?int_Alto:0;
     if (int_Alto+Dif>alt) Dif=alt-int_Alto;
     int_Alto+=Dif;
     fn_ajustar(NumMenu,Dif);
     if (int_Alto<alt)
       timer=setTimeout("fn_desplegar("+NumMenu+","+Dif+","+Seg+","+int_Alto+")",Seg);
     else
       bln_ocupado=false;
     return;
   }
   if (eval(str_base+arr_submenus[NumMenu]+str_arriba)==0) {
     eval(str_base+arr_submenus[NumMenu]+str_arriba+"=1+"+str_base+arr_menus[NumMenu]+str_arriba+"+"+str_base+arr_menus[NumMenu]+str_alto);
     eval(str_base+arr_submenus[NumMenu]+str_mostrar);
   }
   alt=eval(str_base+arr_submenus[NumMenu]+str_alto);
   int_Alto=int_Alto?int_Alto:0;
   if (int_Alto+Dif>alt) Dif=alt-int_Alto;
   int_Alto+=Dif;
   if (navigator.userAgent.indexOf("Mac") == -1){
	strecorte=document.all?'rect(0,100%,'+int_Alto+',0)':int_Alto;
	eval(str_base+arr_submenus[NumMenu]+str_recorte+'="'+strecorte+'"')
   }
   fn_ajustar(NumMenu,Dif);
   if (int_Alto<alt)
     timer=setTimeout("fn_desplegar("+NumMenu+","+Dif+","+Seg+","+int_Alto+")",Seg);
   else
     bln_ocupado=false;
 }

 function fn_plegar(NumMenu,Dif,Seg,int_Alto){
   bln_ocupado=true;
   if (ns6){
     alt=parseInt(document.getElementById(arr_submenus[NumMenu]).offsetHeight);
     int_Alto=int_Alto?int_Alto:alt;
     if (int_Alto-Dif<0) Dif=int_Alto;
     int_Alto-=Dif;
     document.getElementById(arr_submenus[NumMenu]).style.clip.bottom=int_Alto;
     fn_ajustar(NumMenu,-Dif);
     if (int_Alto>0)
       timer=setTimeout("fn_plegar("+NumMenu+","+Dif+","+Seg+","+int_Alto+")",Seg);
     else{
       vnt_abierto='';
       vnt_porabrir===''?bln_ocupado=false:fn_desplegar(vnt_porabrir,25,1);
       document.getElementById(arr_submenus[NumMenu]).style.visibility='hidden';
       document.getElementById(arr_submenus[NumMenu]).style.top=0;
     }
     return;
   }
   alt=eval(str_base+arr_submenus[NumMenu]+str_alto);
   int_Alto=int_Alto?int_Alto:alt;
   if (int_Alto-Dif<0) Dif=int_Alto;
   int_Alto-=Dif;
   if (navigator.userAgent.indexOf("Mac") == -1){
	strecorte=document.all?'rect(0,100%,'+int_Alto+',0)':int_Alto;
	eval(str_base+arr_submenus[NumMenu]+str_recorte+'="'+strecorte+'"')
   }
   fn_ajustar(NumMenu,-Dif);
   if (int_Alto>0)
     timer=setTimeout("fn_plegar("+NumMenu+","+Dif+","+Seg+","+int_Alto+")",Seg);
   else{
     vnt_abierto='';
     vnt_porabrir===''?bln_ocupado=false:fn_desplegar(vnt_porabrir,25,1);
     eval(str_base+arr_submenus[NumMenu]+str_ocultar);
     eval(str_base+arr_submenus[NumMenu]+str_arriba+"=0");
   }
 }

 function fn_ajustar(NumMenu,Dif){
   if (Dif==0) return;
   if (ns6){
     for(i=NumMenu+1;i<arr_menus.length;i++){
       document.getElementById(arr_menus[i]).style.top=parseInt(document.getElementById(arr_menus[i]).style.top)+Dif;
     }
     return;
   }
   for(i=NumMenu+1;i<arr_menus.length;i++){
     eval(str_base+arr_menus[i]+str_arriba+'+='+Dif);
   }
 }

