//Variables y funciones globales de Tilde //------------------------------------------------------------------------------- // Variables de sustitución y cálculo var euro=parseFloat(166.386); //--- var articulo = new Array (85); //articulo[0] = new libro("ISBN","TÍTULO", "PRECIO EUROS sin IVA", "PRECIO PTAS sin IVA"); articulo[0] = new libro("ISBN","TÍTULO",0,0); articulo[1] = new libro("978-84-922009-0-0","Platón: Libro VII de la República.",1154,1920); articulo[2] = new libro("978-84-922009-6-0","Rousseau: Discurso sobre el origen y los fundamentos de la desigualdad entre los hombres.",1154,1920); articulo[3] = new libro("978-84-922009-4-8","Kant: Prólogo en introducción de la Crítica de la Razón Pura.",1154,1920); articulo[4] = new libro("978-84-922009-2-4","Nietzche: La Genealogía de la Moral. Tratados 1º y 2º.",1154,1920); articulo[5] = new libro("978-84-922009-7-9","Introducción al comentario de texto filosófico.",481,800); articulo[6] = new libro("978-84-95314-66-6","Hume: Compendio de un Tratado de la Naturaleza Humana.",1154,1920); articulo[7] = new libro("978-84-95314-90-1","Nietzsche: Sobre verdad y mentira en el sentido extramoral.",1154,1920); articulo[8] = new libro("978-84-95314-88-6","Colección Cuadernos de Filosofía 1º Bachillerato (OBRA COMPLETA) 4 volúmenes.",3460,5757); articulo[9] = new libro("978-84-95314-84-0","I. El Ser Humano.",865,1439); articulo[10] = new libro("978-84-95314-23-9","II. El Conocimiento y la Realidad.",865,1439); articulo[11] = new libro("978-84-95314-86-4","III. La Acción.",865,1439); articulo[12] = new libro("978-84-95314-87-1","IV. La Sociedad.",865,1439); articulo[13] = new libro("978-84-95314-96-3","I. L'Esser Humà.",865,1439); articulo[14] = new libro("978-84-95314-24-6","II. El coneixement i la Realitat.",865,1439); articulo[15] = new libro("978-84-95314-98-7","III. L'Acció.",865,1439); articulo[16] = new libro("978-84-95314-99-4","IV. La Societat.",865,1439); articulo[17] = new libro("978-84-922009-3-1","PEPE Y FELISA. Aprender a pensar. Lectura y Guía)",1058,1760); articulo[18] = new libro("978-84-95314-69-7 ","Introducción a la Estadística y Probabilidad (Manual de ejercicios resueltos)",2836,4719); articulo[19] = new libro("978-84-95314-39-0","Neruda memoria crepitante.",1250,2080); articulo[20] = new libro("978-84-95314-37-6","Cultura Clásica: La Eneida.",865,1440); articulo[21] = new libro("978-84-95314-21-5","Rimas y Leyendas de Gustavo Adolfo Bécquer.",865,1440); articulo[22] = new libro("978-84-95314-40-6","Microrrelatos.",865,1440); articulo[23] = new libro("978-84-96977-00-6","LENGUA CASTELLANA: Análisis de Texto.",1154,1920); articulo[24] = new libro("978-84-95314-65-9","LATÍN 1º y 2º de Bachillerato.",2308,3840); articulo[25] = new libro("978-84-95314-94-9","INTRODUCCIÓN AL GRIEGO CLÁSICO.1º/2º Bachillerato.",1923,3200); articulo[26] = new libro("978-84-95314-41-3","Cultura Clásica: El Viaje en la Antigüedad.",865,1440); articulo[27] = new libro("978-84-96977-01-3","Cuentos del siglo XIX para lectores del siglo XXI",865,1440); articulo[28] = new libro("ISBN","TÍTULO",0,0); articulo[29] = new libro("978-84-95314-64-2","Cultura Clásica : Antología de la Ilíada y la Odisea.",865,1440); articulo[30] = new libro("978-84-95314-70-3","Cultura Clásica : Semblanza de Sócrates.",962,1600); articulo[31] = new libro("ISBN","TÍTULO",0,0); articulo[32] = new libro("978-84-95314-68-0","La discreta enamorada.Lope de Vega",865,1440); articulo[33] = new libro("978-84-95314-73-4","ÉTICA CÍVICA. Derechos Humanos: Bases de una ética cívica.",2308,3840); articulo[34] = new libro("ISBN","TÍTULO",0,0); articulo[35] = new libro("ISBN","TÍTULO",0,0); articulo[36] = new libro("ISBN","TÍTULO",0,0); articulo[37] = new libro("978-84-95314-35-5","1. Saga de Bósi.---> AGOTADO <---",000,0); articulo[38] = new libro("978-84-95314-19-3","2. Saga de los Ynglingos. ---> AGOTADO <---",000,0); articulo[39] = new libro("978-84-923474-1-4","3. Saga de Ragnar Calzas Peludas. ---> AGOTADO <---",000,0); articulo[40] = new libro("978-84-923474-30-7","4. Los Orígenes del Pensamiento Europeo.",1250,2080); articulo[41] = new libro("978-84-95314-80-2","5. Poética.",865,1439); articulo[42] = new libro("978-84-95314-77-0","6. Historia Danesa I.Libros I-IV y Historia DanesaII.Libros V-IX, (2 volúmenes). ---> AGOTADO <---",000,0); articulo[43] = new libro("978-84-95314-81-9","7. El Trampolín Fáustico: Ciencia, mito y poder en el desarrollo sostenible.",1250,2080); articulo[44] = new libro("978-84-95314-91-8","8. La Dama de Elche en el año 2000:Análisis Tecnológico y Artístico.",1250,2080); articulo[45] = new libro("978-84-95314-92-5","9. Saga de los habitantes de Eyr. (Eyrbyggja Saga).",1442,2400); articulo[46] = new libro("978-84-95314-05-5","Antología del teatro español en un acto.",865,1440); articulo[47] = new libro("978-84-95314-67-3","Lisias. Defensa de la muerte de Eratóstenes",1442,2400); articulo[48] = new libro("978-84-95314-74-1","ÈTICA CÍVICA. Drets Humans: Bases d'una ètica cívica. VALENCIÀ",2308,3840); articulo[49] = new libro("978-84-95314-06-1","11. Saga de Gisli Sursson.---> AGOTADO <---",000,0); articulo[50] = new libro("978-84-95314-04-8","El Lazarillo de Tormes.",865,1440); articulo[51] = new libro("978-84-95314-12-3","Campanas Góticas Valencianas.",1250,2080); articulo[52] = new libro("978-84-95314-11-8","Creando ciudades sostenibles.---> AGOTADO <---",000,0); articulo[53] = new libro("978-84-95314-14-7","Mucho cuento. Narraciones breves del XIII al XX.",865,1440); articulo[54] = new libro("978-84-95314-18-5","El Gran Sitio de Malta de 1565. ---> AGOTADO <---",000,0); articulo[55] = new libro("978-84-95314-26-0","Equidad en un Mundo Frágil.",1250,2080); articulo[56] = new libro("978-84-95314-17-8","Cultura Clásica: El Asno de Oro.",865,1440); articulo[57] = new libro("ISBN","TÍTULO",0,0); articulo[58] = new libro("978-84-95314-20-8","Las Primeras Palabras de la Humanidad.",1250,2080); articulo[59] = new libro("978-84-95314-16-1","Cultura Clásica: Historias de fantasmas y misterio de la Antigüedad.",865,1440); articulo[60] = new libro("978-84-95314-15-4","Poetas españoles contemporáneos.",865,1440); articulo[61] = new libro("978-84-95314-33-8","Tan cerca como África.",1827,3040); articulo[62] = new libro("978-84-95314-34-5","Lo que nunca te han contado sobre la Anorexia Nerviosa.",1827,3040); articulo[63] = new libro("978-84-95314-38-3","Biología Humana. Una introducción a las ciencias de la salud. 2º Bachillerato",2875,4784); articulo[64] = new libro("978-84-95314-42-0","Terrorismo y posmodernidad.",1346,2240); articulo[65] = new libro("978-84-95314-43-7","Apología de Sócrates.",865,1440); articulo[66] = new libro("978-84-95314-44-4","¿Dónde está mi cabeza? Y otros relatos.",865,1440); articulo[67] = new libro("978-84-95314-46-8","Colección Cuadernos de Filosofía 2º Bachillerato (OBRA COMPLETA) 15 Fascículos.",4471,7439); articulo[68] = new libro("978-84-95314-47-5","Platón. Cuadernos de Filosofía 2º Bachillerato. Fascículo 1",298,496); articulo[69] = new libro("978-84-95314-53-6","Aristóteles. Cuadernos de Filosofía 2º Bachillerato. Fascículo 2",298,496); articulo[70] = new libro("978-84-95314-55-0","Tomás de Aquino. Cuadernos de Filosofía 2º Bachillerato. Fascículo 3",298,496); articulo[71] = new libro("978-84-95314-48-2","Guillermo de Ockham. Cuadernos de Filosofía 2º Bachillerato. Fascículo 3",298,496); articulo[72] = new libro("978-84-95314-52-9","Nicolás Maquiavelo. Cuadernos de Filosofía 2º Bachillerato. Fascículo 4",298,496); articulo[73] = new libro("978-84-95314-49-9","Renato Descartes. Cuadernos de Filosofía 2º Bachillerato. Fascículo 5",298,496); articulo[74] = new libro("978-84-95314-56-7","John Locke. Cuadernos de Filosofía 2º Bachillerato. Fascículo 6",298,496); articulo[75] = new libro("978-84-95314-57-4","Baruch de Spinoza. Cuadernos de Filosofía 2º Bachillerato. Fascículo 7",298,496); articulo[76] = new libro("978-84-95314-58-1","Jean Jaques Rousseau. Cuadernos de Filosofía 2º Bachillerato. Fascículo 8",298,496); articulo[77] = new libro("978-84-95314-51-2","David Hume. Cuadernos de Filosofía 2º Bachillerato. Fascículo 9",298,496); articulo[78] = new libro("978-84-95314-59-8","Inmanuel Kant. Cuadernos de Filosofía 2º Bachillerato. Fascículo 10",298,496); articulo[79] = new libro("978-84-95314-60-4","Stuart Mill. Cuadernos de Filosofía 2º Bachillerato. Fascículo 11",298,496); articulo[80] = new libro("978-84-95314-61-1","Karl Marx. Cuadernos de Filosofía 2º Bachillerato. Fascículo 12",298,496); articulo[81] = new libro("978-84-95314-62-8","Friedrich Nietzsche. Cuadernos de Filosofía 2º Bachillerato. Fascículo 13",298,496); articulo[82] = new libro("978-84-95314-54-3","Martin Heidegger. Cuadernos de Filosofía 2º Bachillerato. Fascículo 14",298,496); articulo[83] = new libro("978-84-95314-50-5","Ludwig Wittgenstein. Cuadernos de Filosofía 2º Bachillerato. Fascículo 15",298,496); articulo[84] = new libro("978-84-95314-63-5","Cultura Clásica: Metamorfosis de Ovidio. Antología",865,1440); //Añadir los elementos siguiendo el mismo esquema //------------------------------------------------------------------------------- // variables para el formulario de pedido //---------- comienza definición de objeto libro function libro (isbn, titulo, eurosiniva, precio, precioiva) { this.Isbn = isbn; this.Titulo = titulo; this.Eurosiniva = eurosiniva; this.Precio = precio; this.Precioiva = Math.round(precio*1.04); this.Cant=0; this.Acum=0; this.Euroiva = AddDecimal(Math.round(parseFloat(eurosiniva*1.04))); this.DimeDatos = libro_Mostrar_en_Documento; } //--- reasignando métodos del objeto libro (lo escribirá en el documento) linea97 function libro_Mostrar_en_Documento() { document.write("" + "ISBN: " + this.Isbn + "
"); document.write("" + "Título: " + this.Titulo + "
"); document.write("" + "Precio sin I.V.A.: " + AddDecimal(this.Eurosiniva) + " €" + " / " + ""); document.write("" + "Precio con I.V.A.: " + this.Euroiva + " €" + "
"); //---anulo ptas ---document.write("Precio sin I.V.A.: " + this.Precio + " Pta." +" / "); //---anulo ptas ---document.write("Precio con I.V.A.: " + this.Precioiva + " Pta."+ "
"); } //--- Adherir un punto decimal a un número function AddDecimal(numero) { var ConDecimal = ""; var num = "" + numero; if (num.length == 0) { ConDecimal += "0"; } else if (num.length == 1) { ConDecimal += "0.0" + num; } else if (num.length == 2) { ConDecimal += "0." + num; } else { ConDecimal += num.substring(0, num.length - 2); ConDecimal += "."; ConDecimal += num.substring(num.length - 2, num.length); } return ConDecimal; } // ---- Calcular el pedido function calcular(pedido) { var STasa = 0.00,SSubTotal = 0.00,STotal = 0.00; var Articulo0 ="",Articulo1 ="", Articulo2 = "",Articulo3 = "",Articulo4 ="",Articulo5 = "",Articulo6 = "",Articulo7 = "",Articulo8 = "",Articulo9 = "",Articulo10 = ""; var Articulo11 ="",Articulo12 = "",Articulo13 = "",Articulo14 = "",Articulo15 = "",Articulo16 = "",Articulo17 = "",Articulo18 = "",Articulo19 = "",Articulo20 = ""; var Articulo21 ="",Articulo22 = "",Articulo23 = "",Articulo24 = "",Articulo25 = "",Articulo26 = "",Articulo27 = "",Articulo28 = "",Articulo29 = "",Articulo30 = ""; var Articulo31 ="",Articulo32 = "",Articulo33 = "",Articulo34 = "",Articulo35 = "",Articulo36 = "",Articulo37 = "",Articulo38 = "",Articulo39 = "",Articulo40 = ""; var Articulo41 ="",Articulo42 = "",Articulo43 = "",Articulo44 = "",Articulo45 = "",Articulo46 = "",Articulo47 = "",Articulo48 = "",Articulo49 = "",Articulo50 = ""; var Articulo51 ="",Articulo52 = "",Articulo53 = "",Articulo54 = "",Articulo55 = "",Articulo56 = "",Articulo57 = "",Articulo58 = "",Articulo59 = "",Articulo60 = ""; var Articulo61 ="",Articulo62 = "",Articulo63 = "",Articulo64 = "",Articulo65 = "",Articulo66 = "",Articulo67 = "",Articulo68 = "",Articulo69 = "",Articulo70 = ""; var Articulo71 ="",Articulo72 = "",Articulo73 = "",Articulo74 = "",Articulo75 = "",Articulo76 = "",Articulo77 = "",Articulo78 = "",Articulo79 = "",Articulo80 = ""; var Articulo81 ="",Articulo82 = "",Articulo83 = "",Articulo84 = ""; var SCant = 0, SBasePta = 0, STasaPta = 0, STotalPta = 0 ; for (i=0; i<=articulo.length -1 ; i++) { //--- evitando decimales en cantidades subc1 = eval("pedido.Articulo"+i+".value"); canti = (!parseInt(subc1))?0:parseInt(subc1); //--- pasando valores al array libro articulo[(i)].Cant = canti; articulo[(i)].Acum = articulo[(i)].Eurosiniva * articulo[(i)].Cant; SCant += articulo[(i)].Cant; SSubTotal += articulo[(i)].Acum; subc2 = "Acum"+i; document.forms[0].elements[(subc2)].value = AddDecimal(articulo[(i)].Acum); } //--- Pasando otros valores al formulario STotalP =SSubTotal; document.forms.pedido.TotalP.value = AddDecimal(STotalP); document.forms.pedido.SCant.value = parseInt(SCant); } //--- borrar despues de comprobar function BorrarDatos(pedido) { for (i=0; i<=articulo.length -1; i++) { subc1="Articulo"+i; document.forms[0].elements[(subc1)].value =""; subc2="Acum"+i; document.forms[0].elements[(subc2)].value =""; articulo[(i)].Cant =""; articulo[(i)].Acum =""; } SSubTotal =""; STotalP = ""; pedido.TotalP.value = ""; SCant = ""; pedido.SCant.value = ""; return (limpiaCookies()); } //------------------------------------------------------------------------------- //---------------- sustituido function leePedido() { var elem, cant, total=0, art; var cadart=leeCookie('cadArt'); var cadcant = leeCookie('cadCant'); if (cadart) { cadart = cadart.split('#'); cadcant = cadcant.split('#'); for (elem=0; elem0){ articulo[art].Cant = parseInt(cant); total++ } } } return total; } //------------------ //Nueva función respecto de la versión 1 //Pone la cantidad pedida (valor) al artículo seleccionado (nombre) function nuevoItem(nombre, valor) { articulo[nombre].Cant = parseInt(valor); } //Nueva función respecto de la versión 1 //Crea la cesta de la compra y salta a la página dada por urlCesta //Crea dos cadenas una para los artículos pedidos y otra para las cantidades //guarda estas listas en 2 cookies (cadArt y cadCant) //El límite está en el tamaño del cookie (4K) //Si existe problema de espacio se pueden cambiar los índices de tienda y los name de los //botones Anotar con nombre mas cortos como a1,a2...etc function crearCesta(urlCesta) { var ind, indart ='', cntart =''; for (ind in articulo) if (articulo[ind].Cant > 0) { indart += ind+'#'; cntart += articulo[ind].Cant+'#'; } creaCookie('cadArt', indart) creaCookie('cadCant', cntart); location.href = urlCesta } //------------------------ //----------------------- cookiesSitio = new Array; function listaCookies() { var lista = document.cookie.split("; "); var nombre; for (var i =0; i < lista.length; i++) { nombre = lista[i].split("="); cookiesSitio[unescape(nombre[0])]=unescape(nombre[1]); } return cookiesSitio; } function leeCookie(valor) { var dato; var plant = new RegExp("("+valor+"=)([^;]*)(;*)"); dato = document.cookie.search(plant); //* pasa una a una todas los 61 items si el valor es mayor a 0 tiene dato if (dato >= 0) return RegExp.$2; else return null; } //nombre: indice del artículo en objeto tienda y valor: cantidad function creaCookie(nombre, valor) { document.cookie = nombre+"="+valor } function borraCookie(valor) { document.cookie = valor+"=0; expires= Thu, 01-Jan-80 00:00:01 GMT" } function limpiaCookies() { var dato; cookiesSitio = listaCookies(); for (dato in cookiesSitio) { borraCookie(dato) ; } } // ----- Presupuestar function Presupuestar(cesta) { if (tipocli == "Particular") { dto=0.95;} else { if (destino <4) {dto=0.75;} if (destino == 4) {dto=0.50;} if (destino == 5) {dto="consultar descuento"} } if (destino == 3 && tipocli == "Particular" || destino == 1){iva=1.04;} else{ iva=1.0;} totalPresup = Math.round((totalbase*dto)*iva); document.forms.cesta.BaseImp.value = AddDecimal(totalbase); document.forms.cesta.Descuento.value = (dto*100)-100; document.forms.cesta.IVA.value = (iva*100)-100; document.forms.cesta.TotalPedido.value = AddDecimal(totalPresup); // if (TotalPresup = null){ alert("El importe de su pedido no se puede calcular porque los gastos de envío debe consultarlos mediante correo electrónico con nuestra distribuidora.);} // else{alert (" El importe de su pedido es de "+AddDecimal(totalPresup)+" euros aplicándose condiciones de venta específicas para Ud.");} }