var actCSS
	var actCON

/* FUNCIONES ESPECIALES PARA OTRAS FUNCIONES */
	function left(str, n){if (n <= 0) return ""; else if (n > String(str).length)return str; else return String(str).substring(0,n);}
	function right(str, n){if (n <= 0) return ""; else if (n > String(str).length) return str; else {var iLen = String(str).length; return String(str).substring(iLen, iLen - n);}}
/* FINAL FUNCIONES ESPECIALES */
	

	function men_OVE(OP) {var celOP = document.getElementsByTagName('TD'); var numOP = celOP.length; if(numOP>0){do{var nom = celOP[numOP-1].id; if (nom.indexOf('O_')!=-1){document.getElementById(celOP[numOP-1].id).className="opOUT" }; document.getElementById(OP).className="opOVE"} while(--numOP);}}
  function men_OUT()   {var celOP = document.getElementsByTagName('TD'); var numOP = celOP.length; if(numOP>0){do{var nom = celOP[numOP-1].id; if (nom.indexOf('O_')!=-1){document.getElementById(celOP[numOP-1].id).className="opOUT" }; if (nom.indexOf('_A')!=-1){document.getElementById(celOP[numOP-1].id).className="opOVE" }} while(--numOP);}}

	function abreNORMAS (URL){window.open(URL,"Normas","width=800,height=600,scrollbars=NO"); location.href="normas.asp"}
	
	function abre_PDF(f_PDF) {window.open(f_PDF, "", "width=800, height=600, resizable=yes, scrollbars=yes")}

	function abreVENTANA(URL,TIT,PAR){window.open(URL,TIT,PAR);}

	function env_ENL(nE){document.ent_ENL.pasPAG.value=nE; document.ent_ENL.submit();}

	function sub_DOC(){
		if (document.gru_TRB.FILE1.value ==""){alert("El campo DOCUMENTO está vacío"); document.gru_TRB.FILE1.focus(); return;}
		if (document.gru_TRB.catDOC.value =="|"){alert("El campo CATEGORÍA está sin seleccionar"); document.gru_TRB.catDOC.focus(); return;}
		if (document.gru_TRB.titDOC.value ==""){alert("El campo TÍTULO está vacío"); document.gru_TRB.titDOC.focus(); return;}
		document.gru_TRB.submit();
	}

	function cambiaCON(){
		if (actCON==null){actCON="N";return;}
		if (actCON=="N"){actCON="SN"}
		if (actCON=="S"){actCON="N"}
		if (actCON=="SN"){actCON="S"}
		leerCSS(actCSS)
		cambiaCSS(actCSS)
	}

	function cambiaCSS(ponCSS){
		if (actCON==null){actCON="N";}
		if (actCON=="S"){ponCSS=ponCSS+"c";}

		var i, a; //, main;
		for(i=0; (a = document.getElementsByTagName("link")[i]); i++) {if(a.getAttribute("rel").indexOf("style") != -1 && a.getAttribute("title")) {a.disabled = true; if(a.getAttribute("title") == ponCSS) a.disabled = false;}}
		actCSS=ponCSS;
		document.cookie ="fsos_css= "+actCSS
	}

	function leerCSS(ponCSS){
		if(right(actCSS,1)=="c") {actCSS=left(actCSS,actCSS.length-1);}

		if (actCSS=="normal" && (ponCSS=="nor" || ponCSS=="men")){return;}
		if (actCSS!="normal" && ponCSS=="nor"){cambiaCSS('normal');return;}
		if (actCSS=="normal" && ponCSS=="mas"){cambiaCSS('granden');return;}
		if (actCSS=="granden" && ponCSS=="mas"){cambiaCSS('grandem'); return;}
		if (actCSS=="grandem" && ponCSS=="mas"){return;}

		if (actCSS=="granden" && ponCSS=="men"){cambiaCSS('normal');return;}
		if (actCSS=="grandem" && ponCSS=="men"){cambiaCSS('granden');return;}
		return;
	}
  function si_f01(campo) {campo.style.borderColor="#338195"; campo.style.borderBottomColor="#AA0000"; campo.style.backgroundColor="#FFFFFF";} 
  function no_f01(campo) {campo.style.borderColor="#9BC65A"; campo.style.backgroundColor="#FAFFFA";}