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];}
}
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;
}

<!--------CENTRAR CAPAS--------->
function CenterLayer(minWidth,newLeft,layerHalf,Layer)	{

//minWidth:minimo ancho del diseño?? (704), newLeft:la posicion q deberia tener si es el minimo ancho, Layer:la capa
//layerHalf: la mitad de la capa q se va a recolocar
	
	
	//Explorer y Mozzila
	
	if (navigator.appName == "Netscape"){
		//alert ("netscape");
		winWidth = document.documentElement.offsetWidth;
		//alert ("ancho pag. = " + winWidth);
	}
	else	{ //MSIE
		//alert ("explorer");
		winWidth = document.documentElement.offsetWidth;
		winWidth -= 20;
		//alert ("ancho pag. = " + winWidth);
		//w += 8;

	}
   
	//defino la mitad
	//si es menor que el minimo ancho
	if (winWidth<=minWidth)	{
		layerLeft = newLeft;

		//llamo la funcion de recolocar capas (ANCHO MINIMO)!!!
		MM_changeProp(Layer,'','style.left',layerLeft,'DIV');
		//alert ("ancho mimnimo");
		
	}
	

	else {
		//alert ("la mitad de la page =" + ((winWidth)?(winWidth)/2:100));
		layerLeft =((winWidth)?(winWidth)/2:100) - layerHalf;
		//alert ("layerleft = " + layerLeft);
	
		//llamo la funcion de recolocar capas (ANCHO CUALQUIERA)!!!
		MM_changeProp(Layer,'','style.left',layerLeft,'DIV');
		//alert ("ancho normal");
	}

	

}

<!--------CAMBIAR POSICION CAPAS--------->
function MM_changeProp(objName,x,theProp,theValue) { //v6.0
  var obj = MM_findObj(objName);
  if (obj && (theProp.indexOf("style.")==-1 || obj.style)){
    if (theValue == true || theValue == false)
      eval("obj."+theProp+"="+theValue);
    else eval("obj."+theProp+"='"+theValue+"'");
  }
}

<!--------FUNCION CAMBIAR TEXTOS CAPA--------->
function MM_setTextOfLayer(objName,x,newText) { //v4.01
  if ((obj=MM_findObj(objName))!=null) with (obj)
    if (document.layers) {document.write(unescape(newText)); document.close();}
    else innerHTML = unescape(newText);
}

<!--------TEXTOS A CAMBIAR--------->

//currentText = new Array ('','%3Cb%3ESANTA BIBLIA%3C/b%3E%3Cbr%3EEl texto de la Biblia traducido por un equipo de especialistas de primer %0D%0Aorden, dirigidos por el Dr. Evaristo Mart&iacute;n, con introducciones, %0D%0Anotas explicativas, citas de pasajes paralelos, &iacute;ndices de %0D%0Anombres y de conceptos y siete claves de lectura.','%3Cb%3ETEXTO 2%3C/b%3E%3Cbr%3EEl texto de la Biblia traducido por un equipo de especialistas de primer %0D%0Aorden, dirigidos por el Dr. Evaristo Mart&iacute;n, con introducciones, %0D%0Anotas explicativas, citas de pasajes paralelos, &iacute;ndices de %0D%0Anombres y de conceptos y siete claves de lectura.','%3Cb%3ETEXTO 3%3C/b%3E%3Cbr%3El texto de la Biblia traducido por un equipo de especialistas de primer %0D%0Aorden, dirigidos por el Dr. Evaristo Mart&iacute;n, con introducciones, %0D%0Anotas explicativas, citas de pasajes paralelos, &iacute;ndices de %0D%0Anombres y de conceptos y siete claves de lectura.','%3Cb%3ETEXTO 4%3C/b%3E%3Cbr%3EEl texto de la Biblia traducido por un equipo de especialistas de primer %0D%0Aorden, dirigidos por el Dr. Evaristo Mart&iacute;n, con introducciones, %0D%0Anotas explicativas, citas de pasajes paralelos, &iacute;ndices de %0D%0Anombres y de conceptos y siete claves de lectura.','%3Cb%3ETEXTO 5%3C/b%3E%3Cbr%3EEl texto de la Biblia traducido por un equipo de especialistas de primer %0D%0Aorden, dirigidos por el Dr. Evaristo Mart&iacute;n, con introducciones, %0D%0Anotas explicativas, citas de pasajes paralelos, &iacute;ndices de %0D%0Anombres y de conceptos y siete claves de lectura.','%3Cb%3ETEXTO 6%3C/b%3E%3Cbr%3EEl texto de la Biblia traducido por un equipo de especialistas de primer %0D%0Aorden, dirigidos por el Dr. Evaristo Mart&iacute;n, con introducciones, %0D%0Anotas explicativas, citas de pasajes paralelos, &iacute;ndices de %0D%0Anombres y de conceptos y siete claves de lectura.','%3Cb%3ETEXTO 7%3C/b%3E%3Cbr%3EEl texto de la Biblia traducido por un equipo de especialistas de primer %0D%0Aorden, dirigidos por el Dr. Evaristo Mart&iacute;n, con introducciones, %0D%0Anotas explicativas, citas de pasajes paralelos, &iacute;ndices de %0D%0Anombres y de conceptos y siete claves de lectura.','%3Cb%3ETEXTO 8%3C/b%3E%3Cbr%3EEl texto de la Biblia traducido por un equipo de especialistas de primer %0D%0Aorden, dirigidos por el Dr. Evaristo Mart&iacute;n, con introducciones, %0D%0Anotas explicativas, citas de pasajes paralelos, &iacute;ndices de %0D%0Anombres y de conceptos y siete claves de lectura.','TEXTO 9','TEXTO 10');

<!--------TEMPORIZADOR/MOSTRAR OCULTAR CAPAS--------->
function MM_showHideLayers() { //v3.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; }
    obj.visibility=v; }
}

/*** variable para TimeOut de Capa ***/

////*************
//by Juanjo Escribano
////*************
var temporizador
var timeMenu = 10;
var timeMenu2 = 1000;

//esta funcion para HomeMusica
function HideAllLayers (theLayer,Ndecapas) {
	//alert( theLayer + ' ||| ' + theLayer.indexOf('_'));
	cutOver = theLayer.indexOf('_');
	//alert (theLayer.substring(0,cutOver));
	theLayerString = theLayer.substring(0,cutOver) + '_0';
	//alert (theLayerString);
	for (i=1;i<=Ndecapas;i++) {
		if (theLayer != (theLayerString + i))	{
			//alert ('ocultar|||' + theLayerString + i);
			MM_showHideLayers(theLayerString + i,'','hide');
		}
	}
}

function ocultacapa()
{
	//todas las capas habidas y por haber
	MM_showHideLayers('HomeSeccionExplBR','','hide');
	MM_showHideLayers('HomeSeccionExplR','','hide');
	MM_showHideLayers('HomeSeccionExplInfantil','','hide');
	MM_showHideLayers('HomeSeccionExplCrecimiento','','hide');
	MM_showHideLayers('SubSeccionExpl','','hide');
	MM_showHideLayers('HomeSeccionExplMV','','hide');
	
	//Las capas de musica y video
	MM_showHideLayers('HomeMenuMV_01','','hide');
	MM_showHideLayers('HomeMenuMV_02','','hide');
	MM_showHideLayers('HomeMenuMV_03','','hide');
	MM_showHideLayers('HomeMenuMV_04','','hide');
	MM_showHideLayers('HomeMenuMV_05','','hide');
	
	MM_showHideLayers('HomeMenuMVideo_01','','hide');
	MM_showHideLayers('HomeMenuMVideo_02','','hide');
	MM_showHideLayers('HomeMenuMVideo_03','','hide');
}

function pontimeout(seg)
{
	temporizador = setTimeout('ocultacapa()',seg);
}

function quitatimeout()
{
	clearTimeout(temporizador);
}

function AbreVentanaCarrito()
{
	navegador  = navigator.appName;
	if(navegador == "Netscape")	{
		formu = document.compra;
	}
	else
		formu = compra;
	
    wCarrito = window.open("","Carrito","scrollbars=no,resizable=yes,width=300,height=144,left=50,top=50");
    formu.submit();
    wCarrito.self.focus();
}

function vercesta()	{
	document.vercompra.submit();	
}


function testbusqueda(theForm)	{
	if ((theForm.isbn.value == "") && (theForm.ean.value == "") && (theForm.titulo.value == "") && (theForm.autor.value == "")  && (theForm.pclave.value == "") && (theForm.materia[theForm.materia.selectedIndex].value == "") && (theForm.estilo[theForm.estilo.selectedIndex].value == "") && (theForm.soporte[theForm.soporte.selectedIndex].value == "") && (theForm.coleccion.value == ""))	{
		alert("Por favor, introduzca los criterios de búsqueda.");
	}
	else if ((theForm.isbn.value == "") && (theForm.titulo.value == "") && (theForm.autor.value == "")  && (theForm.pclave.value == "") && (theForm.materia[theForm.materia.selectedIndex].value == "") && (theForm.soporte[theForm.soporte.selectedIndex].value == 5))	{
		alert("Por favor, seleccione algún criterio complementario a Soporte: Libros.");
	}
	else	{
		theForm.action = "listalibros.php";
		theForm.submit();
	}								
}

function testboletin(theForm)	{
	if(!theForm.priva.checked)
		alert("Debe aceptar nuestra Política de Privacidad para continuar.");
	if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(theForm.email.value) && theForm.materia[theForm.materia.selectedIndex].value != ""){
    		theForm.submit();
    	}
    	else {
    		alert("La dirección de email introducida es incorrecta o no se ha seleccionado Materia.");
    	}
							
}

function envia(detalles,order)	{
	document.forden.order.value = document.selectorder.order.options[document.selectorder.order.selectedIndex].value;
	document.forden.detalles.value = detalles;
	document.forden.submit();
}

function enviaorder()	{
	document.forden.order.value = document.selectorder.order.options[document.selectorder.order.selectedIndex].value;
	document.forden.submit();
}

function enviamas(numini)	{
	document.forden.numini.value = numini;
	document.forden.order.value = document.selectorder.order.options[document.selectorder.order.selectedIndex].value;
	document.forden.submit();
}

function testalta(altacliente) 
{
	cosa = 0;
	cad = "Por favor, rellene los siguientes campos:\n\n";  
	if (altacliente.mail.value == "")
	{
		cad = cad + "\t* Dirección de Correo Electrónico\n";
		cosa = 1;
	}	
	if (altacliente.pass.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t* Contraseña";
		else
			cad = cad + "\t* Contraseña";
		cosa = 1;
	}
	if (altacliente.pass.value.length < 6)
	{
		if (cosa == 1)
			cad = cad + "\t * La contraseña debe tener seis caracteres\n";
		else
			cad = cad + "\t * La contraseña debe tener seis caracteres\n";
		cosa = 1;
	}
	if (altacliente.nombre_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t* Nombre de Facturación\n";
		else
			cad = cad + "\t* Nombre de Facturación\n";
		cosa = 1;
	}
	if (altacliente.cif_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * CIF / NIF\n";
		else
			cad = cad + "\t * CIF / NIF\n";
		cosa = 1;
	}
	if (altacliente.direccion_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * Dirección de Facturación\n";
		else
			cad = cad + "\t * Dirección de Facturación\n";
		cosa = 1;
	}
	if (altacliente.ciudad_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * Ciudad de Facturación\n";
		else
			cad = cad + "\t * Ciudad de Facturación\n";
		cosa = 1;
	}
	if (altacliente.est_prov_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * Estado / Provincia de Facturación\n";
		else
			cad = cad + "\t * Estado / Provincia de Facturación\n";
		cosa = 1;
	}
	if (altacliente.CP_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * Código Postal de Facturación\n";
		else
			cad = cad + "\t * Código Postal de Facturación\n";
		cosa = 1;
	}
	if (altacliente.pais_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * País de Facturación\n";
		else
			cad = cad + "\t * País de Facturación\n";
		cosa = 1;
	}
	
	
	if (cosa == 0)
		/* están todos los campos */
		altacliente.submit();
	else
		/* falta algún campo */
		alert(cad);
}


function testFormLogin (frm) 
{
	cosa = 0;
	cad = "Por favor, rellene los siguientes campos:\n\n";  
	if (frm.email.value == "")
	{
		cad = cad + "\t* Dirección de Correo Electrónico\n";
		cosa = 1;
	}	
	if (frm.password.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t* Contraseña";
		else
			cad = cad + "\t* Contraseña";
		cosa = 1;
	}
	if (frm.password.value.length < 6)
	{
		if (cosa == 1)
			cad = cad + "\n\t* La contraseña debe tener seis caracteres\n";
		else
			cad = cad + "\n\t * La contraseña debe tener seis caracteres\n";
		cosa = 1;
	}
	
	if (cosa == 0)
		/* están todos los campos */
		frm.submit();
	else
		/* falta algún campo */
		alert(cad);
}


function testmal(malpass) 
{
	cosa = 0;
	cad = "Por favor, rellene los siguientes campos:\n\n";  
	if (malpass.mail.value == "")
	{
		cad = cad + "\t* Dirección de Correo Electrónico\n";
		cosa = 1;
	}	
	if (malpass.pass.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t* Contraseña";
		else
			cad = cad + "\t* Contraseña";
		cosa = 1;
	}
	if (malpass.pass.value.length < 6)
	{
		if (cosa == 1)
			cad = cad + "\n\t* La contraseña debe tener seis caracteres\n";
		else
			cad = cad + "\n\t * La contraseña debe tener seis caracteres\n";
		cosa = 1;
	}
	
	if (cosa == 0)
		/* están todos los campos */
		malpass.submit();
	else
		/* falta algún campo */
		alert(cad);
}

function testmal1(malpass) 
{
	cosa = 0;
	cad = "Por favor, rellene los siguientes campos:\n\n";  
	if (malpass.mail.value == "")
	{
		cad = cad + "\t* Dirección de Correo Electrónico\n";
		cosa = 1;
	}	
	if (cosa == 0)
		/* están todos los campos */
		malpass.submit();
	else
		/* falta algún campo */
		alert(cad);
}

function test(modcliente) 
{
	cosa = 0;
	cad = "Por favor, rellene los siguientes campos:\n\n";  
	if (modcliente.correo.value == "")
	{
		cad = cad + "\t* Dirección de Correo Electrónico\n";
		cosa = 1;
	}	
	if (modcliente.pass.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t* Contraseña";
		else
			cad = cad + "\t* Contraseña";
		cosa = 1;
	}
	if (modcliente.nombre_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t* Nombre de Facturación\n";
		else
			cad = cad + "\t* Nombre de Facturación\n";
		cosa = 1;
	}
	if (modcliente.cif_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * CIF / NIF\n";
		else
			cad = cad + "\t * CIF / NIF\n";
		cosa = 1;
	}
	if (modcliente.direccion_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * Dirección de Facturación\n";
		else
			cad = cad + "\t * Dirección de Facturación\n";
		cosa = 1;
	}
	if (modcliente.ciudad_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * Ciudad de Facturación\n";
		else
			cad = cad + "\t * Ciudad de Facturación\n";
		cosa = 1;
	}
	if (modcliente.est_prov_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * Estado / Provincia de Facturación\n";
		else
			cad = cad + "\t * Estado / Provincia de Facturación\n";
		cosa = 1;
	}
	if (modcliente.CP_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * Código Postal de Facturación\n";
		else
			cad = cad + "\t * Código Postal de Facturación\n";
		cosa = 1;
	}
	if (modcliente.pais_fact.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t * País de Facturación\n";
		else
			cad = cad + "\t * País de Facturación\n";
		cosa = 1;
	}
	
	
	if (cosa == 0)
		/* están todos los campos */
		modcliente.submit();
	else
		/* falta algún campo */
		alert(cad);
}

function testdel(delcli) 
{
	cosa = 0;
	cad = "Por favor, rellene los siguientes campos:\n\n";  
	if (delcli.mail.value == "")
	{
		cad = cad + "\t* Dirección de Correo Electrónico\n";
		cosa = 1;
	}	
	if (delcli.pass.value == "")
	{
		if (cosa == 1)
			cad = cad + "\t* Contraseña";
		else
			cad = cad + "\t* Contraseña";
		cosa = 1;
	}
	if (delcli.pass.value.length < 6)
	{
		if (cosa == 1)
			cad = cad + "\n\t* La contraseña debe tener seis caracteres\n";
		else
			cad = cad + "\n\t * La contraseña debe tener seis caracteres\n";
		cosa = 1;
	}
	
	if (cosa == 0)
		/* están todos los campos */
		delcli.submit();
	else
		/* falta algún campo */
		alert(cad);
}
function testinformacion(info) 
{
	cosa = 0;
	cad = "Por favor, rellene los siguientes campos:\n\n";  
	if (info.Razon_social.value == "")
	{
		cad = cad + "\t* Razón social\n";
		cosa = 1;
	}	
	if (info.Nombre_comercial.value == "")
	{
		cad = cad + "\t* Nombre comercial\n";
		cosa = 1;
	}
	if (info.Persona_contacto.value == "")
	{
		cad = cad + "\t* Persona de Contacto\n";
		cosa = 1;
	}
	
	if (info.Direccion_completa.value == "")
	{
		cad = cad + "\t* Direccion completa\n";
		cosa = 1;
	}
	if (info.Telefono.value == "")
	{
		cad = cad + "\t* Telefono\n";
		cosa = 1;
	}
	if (info.Correo_electronico.value == "")
	{
		cad = cad + "\t* Correo electrónico\n";
		cosa = 1;
	}
	if (cosa == 0)
		/* están todos los campos */
		info.submit();
	else
		/* falta algún campo */
		alert(cad);
}
function testdel2(bajacli) 
{
	if (confirm("Va a darse de baja como cliente registrado.\n Por favor confirme su baja"))
		{
			bajacli.submit();
		}
}
var _lvFw=null;
   function _LvWinFocus(w) { if (w && w.focus) { _lvFw=w; setTimeout("_LvWinFocusT()",100); } }
   function _LvWinFocusT() { if (_lvFw!=null) { _lvFw.focus();_lvFw=null;} }
function OpenWin(url,name,attr)
{
    var fw;
    if (attr) fw=window.open(url,name,attr);
    else if (name) fw=window.open(url,name);
    else if (url) fw=window.open(url);
    _LvWinFocus(fw);
}

function AbreVentana(URL,Ancho,Alto,scroll)
{
	w = window.open(URL,"","scrollbars="+ scroll + ",height="+ Alto +",width="+ Ancho +",resizable=yes,left=0,top=0");
	w.self.focus();
}