// copyright © Job 't Hart
// Internet Christians
// http://www.internet-christians.com

// PENSAMIENTO CRISTIANO - TIENDA ONLINE
// http://tienda.pensamientocristiano.com
// http://distribuciones.pensamientocristiano.com
// http://iglesias.pensamientocristiano.com
// http://educacion.pensamientocristiano.com

// versión 1.6 14/06/2008
//   -> versión común
// versión 1.5 09/06/2008
//   -> checkPay a HIUtils y valPay utiliza valPaymethods
// versión 1.4 26/04/2008
//   -> añadir checkPay y modificar valPay para domiciliación bancaria
//   -> datos de cómo conoció el cliente Pensamiento Cristiano
// versión 1.3 15/03/2008
//   -> al vaciar carrito vamos a la página del carrito en vez de reload
// versión 1.2 20/08/2007
//   -> (des)habilitar botones en submit de formularios
// versión 1.1 11/06/2007
//   -> La Tienda Online es solamente para particulares
// versión 1.0 05/06/2007
//   -> versión inicial

langs=Array("es")

fldColor='rgb(0,102,102)'
fldFocusColor='rgb(0,102,102)'
fldBgColor='white'
fldFocusBgColor='rgb(204,255,204)'
fldDisBgColor='rgb(226,226,226)'

var if1='NIE'
var if2='X1527759F'
var ad1='Gregal, 24'
var ad2='08230'
var ad3='Matadepera'
var ad4='España'
var ml1='tienda'
var ml2='pensamientocristiano'
var ml3='com'

MYText["es"][0]="Por favor, introduzca el nombre de su entidad."
MYText["es"][1]="Por favor, seleccione el tipo de entidad."
MYText["es"][2]="Por favor, introduzca su nombre."
MYText["es"][3]="Por favor, introduzca su mensaje."
MYText["es"][4]="Por favor, introduzca su contraseña."
MYText["es"][5]="Por favor, introduzca el nombre de la persona de contacto."
MYText["es"][6]="Por favor, introduzca la direcci\xF3n."
MYText["es"][7]="Por favor, introduzca la localidad."
MYText["es"][8]="Por favor, seleccione la provincia."
MYText["es"][9]="Por favor, seleccione el pa\xEDs. Si no lo encuentra en la lista, env\xEDanos un mensaje a trav\xE9s del formulario de contacto."
MYText["es"][10]="Por favor, introduzca el n\xFAmero de tel\xE9fono"
MYText["es"][11]="Por favor, introduzca el c\xF3digo postal"
MYText["es"][12]="Por favor, seleccione el tipo de identificaci\xF3n fiscal"
MYText["es"][13]="Por favor, introduzca el n\xFAmero de identificaci\xF3n fiscal"

MYText["en"][0]="Please, enter the name of the organisation."
MYText["en"][1]="Please, select the type of organisation."
MYText["en"][2]="Please, enter your name."
MYText["en"][3]="Please, enter your inquiry."

MYText["nl"][0]="Voer de naam van de organisatie in, alstublieft."
MYText["nl"][1]="Selecteer de soort organisatie, alstublieft."
MYText["nl"][2]="Voer uw naam in, alstublieft."
MYText["nl"][3]="Voer uw boodschap in, alstublieft."

function valContact() {
	disableDoc()
  var res=true
  res=valTxtFld('myname',2)
  if (res) {
    res=valEmail('email')
    if (res) res=valTxtFld('mymsg',3,500)
  }
  if (!res) enableDoc()
  return res
}

function valLogin() {
	disableDoc()
  var res=true
  res=valEmail('email')
  if (res) res=valPassword('pw')
  if (!res) enableDoc()
  return res
}

function valRegister(pNew,pLogin) {
	disableDoc()
	var res=true
	if (pLogin) {
  	res=valEmail('regemail')
	  if (res) res=valPassword('regpw','cnfpw')
	}
	if (res) res=valTxtFld('myname',2)
	if (res) res=valTxtFld('address',6,100)
	if (res) res=valTxtFld('city',7)
	if (res) {
		var fld=getFld('prov')
		if (fld.selectedIndex==0) {
			MYMsg(8)
			fld.focus()
			res=false
		}
	}
	if (res) {
		var fld=getFld('ctry')
		if (fld.selectedIndex==0) {
			MYMsg(9)
			fld.focus()
			res=false
		} else {
		  if (fld[fld.selectedIndex].value=='es') res=valTxtFld('zip',11)
		}
	}
	if (res) res=valTxtFld('phone',10)
	if (res && getFld('invoice').checked) {
		fld=getFld('niftype')
		if (fld.selectedIndex==0) {
			MYMsg(12)
			fld.focus()
			res=false
		} else {
			res=valTxtFld('nif',13)
		}
	}
	if (res && !getFld('post').checked) {
		res=valTxtFld('postname',2)
		if (res) res=valTxtFld('postaddress',6,100)
		if (res) res=valTxtFld('postcity',7)
		if (res) {
			fld=getFld('postprov')
			if (fld.selectedIndex==0) {
				MYMsg(8)
				fld.focus()
				res=false
			}
		}
		if (res) {
			fld=getFld('postctry')
			if (fld.selectedIndex==0) {
				MYMsg(9)
				fld.focus()
				res=false
			} else {
				if (fld[fld.selectedIndex].value=='es') res=valTxtFld('postzip',11)
			}
		}
	}
  if (res && pNew) res=valTxtFld('otroreferrer','',500,false)
  if (!res) enableDoc()
  return res
}

function valPay(pType) {
	disableDoc()
	var res=valPayMethods(pType)
  if (!res) enableDoc()
	return res
}

function checkFactura() {
  var fld=getFld('invoice')
  if (fld) {
    if (fld.checked) {
    	enableFld('niftype')
  	  enableFld('nif')
    } else {
  	  disableFld('niftype')
  	  disableFld('nif')
    }
  }
}

function checkPost() {
	var fld=getFld('post')
	if (fld) {
  	if (fld.checked) {
  		disableFld('postname')
  		disableFld('postaddress')
  		disableFld('postzip')
  		disableFld('postcity')
  		disableFld('postprov')
  		disableFld('postctry')
  	} else {
  		enableFld('postname')
  		enableFld('postaddress')
  		enableFld('postzip')
  		enableFld('postcity')
  		enableFld('postprov')
  		enableFld('postctry')
  	}
  }
}

function convDivisa() {
	var fld1=getFld('amount');
	var fld2=getFld('origen');
	var fld3=getFld('destino');
  top.frames['google'].location="http://www.google.es/search?hl=es&q="+fld1.value+"+"+fld2.value+"+in+"+fld3.value
}

var popIMG
function ampliarImagen(pId,pW,pH){popWin(popIMG,"Imagen","/imagen.shtml?producto="+pId,pW+150,pH+95,0,0,0)}
var popLOPD
function verLOPD(){popWin(popLOPD,"LOPD","/lopd.shtml",400,300,100,100,0)}
var popAUTOR
function verAutor(pId){popWin(popAUTOR,"Autor","/autor.shtml?autor="+pId,400,300,100,100,0)}
var popMILIBRERIA
function verMiLibreria(){popWin(popMILIBRERIA,"MiLibreria","/milibreria.shtml",550,400,100,100,0)}
var popMIIGLESIA
function verMiIglesia(){popWin(popMIIGLESIA,"MiIglesia","/miiglesia.shtml",550,400,100,100,0)}
var popMICENTRO
function verMiCentro(){popWin(popMICENTRO,"MiCentro","/micentroeducativo.shtml",550,400,100,100,0)}
var popMISCONDICIONES
function verMisCondiciones(){popWin(popMISCONDICIONES,"MisCondiciones","/miscondiciones.shtml",550,400,100,100,0)}
var popSERVICIOS
function verServicios(){popWin(popSERVICIOS,"Servicios","/servicios.shtml",560,600,0,0,0)}
var popDIVISAS
function verConversor(pImp,pOrg,pDest){popWin(popDIVISAS,"Conversor","/divisas.shtml?importe="+pImp+"&origen="+pOrg+"&destino="+pDest,525,365,0,0,0)}
var popTPV
function openTPV(pId){popWin(popTPV,"TPV","/conexiontpv.shtml?pedido="+pId,725,550,0,0,0)}
var popEBOOK
function popupEBook(){popWin(popEBOOK,"eBook","/eBookEjemplo.shtml",710,570,0,0,0)}

var clientck="cliente"
var pwck="mypw"
function logoffClient() {deletecookie(clientck);deletecookie(pwck)}

var ctryck="pais"
function setCountry() {
  var fld=getFld('cartctry')
  var val=fld.options[fld.selectedIndex].value
  setcookie(ctryck,val)
  location.reload()
}

var tarifack="postservice"
function setTarifa() {
  var fld=getFld('tarifa')
  var tarifa=fld.options[fld.selectedIndex].value
  setcookie(tarifack, tarifa)
  location.reload()
}

function getTopMenuSel(){
  var keys=new Array("menu")
  var pars=getParams(keys)
  return pars[0]?pars[0]:4
}

var cartck="carrito"
function emptyCart() {deletecookie(cartck)}
function emptyClientCart(pMenu) {
  if (confirm('¿Está seguro que quiere vaciar el carrito?')) {
  	deletecookie(cartck)
  	location.href="/carrito.shtml?menu="+pMenu
  }
}
function addProductToCart(pProd,pMax,pMenu) {
	var fld=getFld('qty'+pProd)
	var qty=fld ? parseInt(fld.options[fld.selectedIndex].value) : 1
	if (updateCartCookie(pProd,qty,'add',pMax)) {
		var clck=getcookie(clientck)
		location.href=(clck=="") ? "/carrito.shtml?menu="+pMenu : "/pedido.shtml?menu="+pMenu
	} else {
		if (qty==1) {
  		alert('No se ha añadido el libro porque ya tiene '+pMax+' en el carrito, que es el máximo permitido por título.')
  	} else {
  		alert('No se han añadido los libros al carrito, porque superaría los '+pMax+' ejemplares, que es el máximo permitido por título')
  	}
	}
}
function delProdFromCart(pProd,pMenu) {
	updateCartCookie(pProd,0,'del')
	var val=getcookie(cartck)
	if (val=='') location.href="/carrito.shtml?menu="+pMenu
	else location.reload()
}
function updateCart(pProd) {
  var fld=getFld('qty'+pProd)
	var qty=parseInt(fld.options[fld.selectedIndex].value)
	updateCartCookie(pProd,qty,'upd')
	location.reload()
}
function updateCartCookie(pProd,pQty,pFunc,pMax) {
  var val=getcookie(cartck)
  var res=true
  if (val=='') {
  	if (pFunc!='del') {
    	val=pProd+','+pQty
      setcookie(cartck,val)
    }
  } else {
    var prods=new Array()
    var newprods=new Array()
    var newi=0
    prods=val.split(',')
    var maxi=prods.length
    var found=false
    for (var i=0; i<maxi; i=i+2) {
      if (prods[i]==pProd) {
        found=true
        if (pFunc=='add') {
        	newprods[newi]=prods[i]
        	newi++
        	var myQty=parseInt(prods[i+1])
        	if (myQty==pMax){
        		res=false
        	} else {
          	newprods[newi]=myQty+pQty
          	if (newprods[newi]>pMax) newprods[newi]=pMax
          }
        	newi++
        } else if (pFunc=='upd') {
        	newprods[newi]=prods[i]
        	newi++
        	newprods[newi]=pQty
        	newi++
        }
      } else {
     		newprods[newi]=prods[i]
     		newi++
     		newprods[newi]=prods[i+1]
     		newi++
      }
    }
    if (!found && pFunc!='del') {
      newprods[newi]=pProd
      newi++
      newprods[newi]=pQty
    }
    if (pFunc=='del' && newi==0) {
    	deletecookie(cartck)
    } else if (res) {
      val=newprods.join(',')
      setcookie(cartck,val)
    }
  }
  return res
}


function Prov(i,d){this.iso=i;this.desc=d}
function setProvs(pFld1,pFld2,pval2){
  var fld1=getFld(pFld1)
  var fld2=getFld(pFld2)
  for (var i=fld2.options.length-1; i>=0; i--) fld2.options[i]=null
  if (fld1.selectedIndex>0) {
    var provs=countries[fld1[fld1.selectedIndex].value]
    var maxi=provs.length
    fld2.options[0]=new Option('Seleccione...', '')
    for (var i=0; i<maxi; i++) {
      if (pval2==provs[i].iso) {
        fld2.options[i+1]=new Option(provs[i].desc,provs[i].iso,true,true)
      } else {
        fld2.options[i+1]=new Option(provs[i].desc,provs[i].iso)
      }
    }
  } else {
    fld2.options[0]=new Option('Seleccione primero el país...', '')
  }
}

function exCierre(){
	var month=getFld('month').value
	location.href='/admin/cierre.shtml?close='+val
}

