	function pID(sID) {
	 var    p;
	 if(      document.getElementById) // isMozilla || isIE5
	        p=document.getElementById(sID);
	 else if( document.layers)         // isNetscape4
	        p=document.layers[sID];
	 else                              // isIE4
	        p=document.all[sID];
	 return p; ///
	}
	function iFindChar(s1, sIn) {
	 var iPos=-1;
	 for(var i=0;  i<sIn.length; i++) {
	  if(sIn.charAt(i)==s1) {
	   iPos=i;
	   break; //
	  }
	 }
	 return iPos; ///
	}
	function iFindCharRight(s1, sIn) {
	 var iPos=-1;
	 for(var i=sIn.length-1; i>0; i--) {
	  if(sIn.charAt(i)==s1) {
	   iPos=i;
	   break; //
	  }
	 }
	 return iPos; ///
	}
	function sTheNameOfFile(sFullPathFilename) {
	 var iPos=iFindCharRight('\\', sFullPathFilename);
	 var    s=sFullPathFilename.substr(iPos+1);
	 return s; ///
	}
	function sThePathOfFile(sFullPathFilename) {
	 var iPos=iFindCharRight('\\', sFullPathFilename);
	 var    s=sFullPathFilename.substr(0, iPos+1);
	 return s; ///
	}
	function sTrim(s) {
	 var iPosNoBlank=-1;
	 for(var i=s.length-1; i>=0; i--) {
	  if(s.substr(i,1)!=' ') {
	     iPosNoBlank=i;
	     break ; //
	  }
	 }
	 if(iPosNoBlank>-1) return s.substr(0,iPosNoBlank+1); ///
	 else               return s; ///
	}
	function sRTrim(s) {
	 return   sTrim(s); ///
	}
	function sLTrim(s) {
	 var iPosNoBlank=-1;
	 for(var i=0; i<s.length; i++) {
	  if(s.substr(i,1)!=' ') {
	     iPosNoBlank=i;
	     break ; //
	  }
	 }
	 if(iPosNoBlank>-1) return s.substr(iPosNoBlank); ///
	 else               return s; ///
	}
	function     sAllTrim(s) {
	 return sLTrim(sRTrim(s)); ///
	}

function nula(){
}

function colorbarras() {
	var sNav=             navigator.appName;
//	var nVersion=parseInt(navigator.appVersion);
	if( sNav=="Microsoft Internet Explorer" ) {
		document.body.style.scrollbarFaceColor      ="#003366";
		document.body.style.scrollbarArrowColor     ="#FAFAFA";
		document.body.style.scrollbarTrackColor     ="#285B84";
		document.body.style.scrollbarShadowColor    ="#DBE0E4";
		document.body.style.scrollbarHighlightColor ="#DBE0E4";
		document.body.style.scrollbar3dlightColor   ="#003C67";
		document.body.style.scrollbarDarkshadowColor="#003C67";
	}
}

function validar_usuario() {
	var sMen="";
	var bValor=true;
	if(document.forms[0].elements[0].value.length==0)
	   sMen=sMen+"\tNombre de Usuario\n";
	if(document.forms[0].elements[1].value.length==0)
	   sMen=sMen+"\tContraseña\n";
	if(sMen) {
		window.alert("Debe completar los siguientes campos del formulario:\n\n"+
		             sMen);
		bValor=false;
	 }
	return(bValor); ///
}

function validar_entidad() {
	var sMen="";
	var bValor=true;
	if(document.forms[0].elements[0].value.length==0)
	 sMen=sMen+"\tNombre de Usuario\n";
	if(document.forms[0].elements[1].value.length==0)
	 sMen=sMen+"\tContraseña\n";
	if(document.forms[0].elements[3].value.length==0)
	 sMen=sMen+"\tNombre de Entidad\n";
	if(document.forms[0].elements[4].value.length==0)
	 sMen=sMen+"\tC.I.F.\n";
	if(sMen) {
		window.alert("Debe completar los siguientes campos del formulario:\n\n"+
		             sMen);
		bValor=false;
	} else {
		if(document.forms[0].elements[14].value.length > 0) {
			var i = 1;
			var s = document.forms[0].elements[14].value;
			var sLength = document.forms[0].elements[14].value.length;
			while((i < sLength) && (s.charAt(i) != "@")) {
				i++;
			}
			if((i >= sLength) || (s.charAt(i) != "@"))
			 sMen="Debe indicar una cuenta de correo válida";
			else i += 2;
			while((i < sLength) && (s.charAt(i) != ".")) {
				i++
			}
			if((i >= sLength - 1) || (s.charAt(i) != "."))
			 sMen="Debe indicar una cuenta de correo válida";
			if(sMen) {
				window.alert(sMen);
				bValor=false;
			} else {
				bValor=true;
			}
		}
	}
	return(bValor); ///
}

function eliminarentidad() {
	var ejec=false;
	var val=window.confirm("¿Está seguro que desea eliminar esta entidad?\nPulse en \"Aceptar\" para eliminarlo.");
	if (val) ejec=true;
	return(ejec);
}

function eliminarnoticia() {
	var ejec=false;
	var val=window.confirm("¿Está seguro que desea eliminar esta noticia?\nPulse en \"Aceptar\" para eliminarlo.");
	if (val) ejec=true;
	return(ejec);
}

function validarnoticia() {
	var sMen="";
	var bValor=true;
	if(document.forms[0].elements[0].value.length==0)
	 sMen=sMen+"\tNoticia\n";
	if(sMen) {
		window.alert("Debe completar los siguientes campos del formulario:\n\n"+
		             sMen);
		bValor=false;
	} else {
		sMen="";
		if(document.forms[0].elements[0].value.length>255)
		   sMen="Datos demasiado extensos en la noticia\n";
		if(sMen) {
			window.alert(sMen);
			bValor=false;
		 }
	 }
	return(bValor);
}

function validarnoticia1() {
	var sMen="";
	var bValor=true;
	if(document.forms[0].elements[0].value.length==0)
	   sMen=sMen+"\tNoticia\n";
	if(sMen) {
		window.alert("Debe completar los siguientes campos del formulario:\n\n"+
		             sMen);
		bValor=false;
	 }
	return(bValor);
}
