me1="lapuerta";
me2="csadm";
me3="org";
me4="@";
me5=".";

function borraquotaprotector()
  {document.Suscripcio.Cuota_Protector.disabled=false;document.Suscripcio.Cuota_Protector.value="";document.Suscripcio.Cuota_Protector.disabled=true}
  
function borracodibanc()
  {document.Suscripcio.Codigo_Banco.disabled=false;document.Suscripcio.Codigo_Banco.value="";document.Suscripcio.Codigo_Banco.disabled=true}

function activaquotaprotector()
  {document.Suscripcio.Cuota_Protector.disabled=false;document.Suscripcio.Cuota_Protector.focus()}

function activacodibanc()
  {document.Suscripcio.Codigo_Banco.disabled=false;document.Suscripcio.Codigo_Banco.focus()}

function comprova()
  {var avis="";
  if (document.Suscripcio.Suscriptor.value=="") {avis=" - El nombre del destinatario de la suscripción \n"};
  if (document.Suscripcio.Dirección.value=="") {avis=avis+" - La dirección donde recibir la revista \n"};
  if (document.Suscripcio.Población.value=="") {avis=avis+" - La población de su dirección \n"};
  if (document.Suscripcio.CP.value=="") {avis=avis+" - El código postal de su población \n"};
  if (document.Suscripcio.Teléfonos.value=="") {avis=avis+" - Un teléfono para contactar con usted si fuera necesario \n"};  
  if ((document.Suscripcio.Email.value!="")&&(document.Suscripcio.Email.value.indexOf("@")==-1)&&(document.Suscripcio.Email.value.indexOf(".")==-1)){avis=avis+" - Un Email correcto \n"};
  if (!document.Suscripcio.Cuota[0].checked && !document.Suscripcio.Cuota[1].checked && !document.Suscripcio.Cuota[2].checked) {avis=avis+" - La clase de cuota de la suscripción \n"};
  if (document.Suscripcio.Cuota[2].checked && (document.Suscripcio.Cuota_Protector.value<20)){avis=avis+ " - La cuota como socio protector superior a 20,00 € \n"};
  if (!document.Suscripcio.Pago[0].checked && !document.Suscripcio.Pago[1].checked){avis=avis+" - El medio de pago que desea para su suscripción \n"};
  if (document.Suscripcio.Pago[0].checked && (document.Suscripcio.Codigo_Banco.value.length!=20)){avis=avis+" - El código de su cuenta bancaria, 20 dígitos numéricos sin espacios en blanco ni guiones \n"};
  if (avis!="") {alert("POR FAVOR, \n para enviar su boletín de suscripción es necesario indicar: \n" + avis + "GRACIAS"); return false}
  else {alert("Su formulario de suscripción será enviado a LA PUERTA \nSeguidamente volverá a la página principal de nuestra web \nGRACIAS");
        document.Suscripcio.recipient.value=me1+me4+me2+me5+me3; return true} 
  }
 
function numero(camp)	
  {texte=eval(camp).value;
  if (texte.length > 0) {ultima=texte.substr(texte.length-1,1); 
  if (ultima<"0" || ultima>"9") {eval(camp).value=texte.substr(0,texte.length-1)}}
  }

function imp1(camp)
  {if (eval(camp).checked) {document.Suscripcio.Import.value=parseFloat(document.Suscripcio.Import.value)+4}
   else {document.Suscripcio.Import.value=parseFloat(document.Suscripcio.Import.value)-4};
  calcultotal() 
  }
function imp2(camp)
  {if (eval(camp).checked) {document.Suscripcio.Import.value=parseFloat(document.Suscripcio.Import.value)+10}
   else {document.Suscripcio.Import.value=parseFloat(document.Suscripcio.Import.value)-10};
  calcultotal()
  }
function imp3(camp)
  {if (eval(camp).checked) {document.Suscripcio.Import.value=parseFloat(document.Suscripcio.Import.value)+9}
   else {document.Suscripcio.Import.value=parseFloat(document.Suscripcio.Import.value)-9};
  calcultotal()
  }

function calcultotal()
  {document.Suscripcio.Total.value=parseFloat(document.Suscripcio.Import.value)+parseFloat(document.Suscripcio.Impcorreo.value)}

function comprova2()  
  {var avis="";
  if (document.Suscripcio.Suscriptor.value=="") {avis=" - El nombre del destinatario del pedido \n"};
  if (document.Suscripcio.Dirección.value=="") {avis=avis+" - La dirección donde recibir el pedido \n"};
  if (document.Suscripcio.Población.value=="") {avis=avis+" - La población de su dirección \n"};
  if (document.Suscripcio.CP.value=="") {avis=avis+" - El código postal de su población \n"};
  if (document.Suscripcio.Teléfonos.value=="") {avis=avis+" - Un teléfono para contactar con usted si fuera necesario \n"};  
  if ((document.Suscripcio.Email.value!="")&&(document.Suscripcio.Email.value.indexOf("@")==-1)&&(document.Suscripcio.Email.value.indexOf(".")==-1)){avis=avis+" - Un Email correcto \n"};
  if (!document.Suscripcio.Pago[0].checked && !document.Suscripcio.Pago[1].checked){avis=avis+" - El medio de pago que desea \n"};
  if (document.Suscripcio.Pago[0].checked && (document.Suscripcio.Codigo_Banco.value.length!=20)){avis=avis+" - El código de su cuenta bancaria, 20 dígitos numéricos sin espacios en blanco ni guiones \n"};
  if (parseFloat(document.Suscripcio.Impcorreo.value)==0){avis=avis+" - Si el pedido será enviado a España o al extranjero \n"};
  if (parseFloat(document.Suscripcio.Import.value)==0){avis=avis+" - Los números que desea recibir, no hay ninguno seleccionado \n"};
  if (avis!="") {alert("POR FAVOR, \n para enviar su boletín de pedido es necesario indicar: \n" + avis + "GRACIAS"); return false}
  else {alert("Su formulario de pedido será enviado a LA PUERTA \nSeguidamente volverá al formulario de suscripción \nGRACIAS");
        document.Suscripcio.recipient.value=me1+me4+me2+me5+me3; return true} 
  }
