	function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
//Para la pasarela
function MM_Fin() { //v3.0
  window.location="Pagotarjeta.html";
}
//Control de imagenes
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_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 ocultar(Layer1){ 
document.getElementById(Layer1).style.visibility="hidden"; 
}
function ABCdario(letra,pag,nombre) {//v3.0
		window.document.forms[0].Letra.value= letra;
		window.document.forms[0].Pag.value= pag;
		window.document.forms[0].submit();
	}
function Filtrar(letra,pag,nombre) {//v3.0
		//if (window.document.Buscar.Letra) window.document.Buscar.Letra.value= letra;
		window.document.Buscar.Pag.value= pag;
		window.document.Buscar.submit();
	}
function Nuevo(formulario) { //v3.0
if ((!isNaN(formulario.Cantidad.value)) && (formulario.Cantidad.value>0))
	formulario.submit();
else {
	alert ("Debe seleccionar la cantidad que desee.")
	formulario.Cantidad.focus();
	return false;
	}
}
function FechaActual(idioma){ 

if (idioma=="es"){
	var dia = new Array("Domingo", "Lunes", "Martes", "Mi\xE9rcoles", "Jueves", "Viernes", "S\xE1bado");
	var meses = new Array("enero", "febrero", "marzo", "abril", "mayo", "junio", "julio", "agosto", "septiembre", "octubre", "noviembre", "diciembre");
}else{
	var dia = new Array("Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday");
	var meses = new Array("January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December");
}
var data = new Date;
 var index2 = data.getDay();
 var index = data.getMonth();
 var an = data.getYear();
 if (an < 1000) {
 an = 1900 + an;
 }
 if (idioma=="es"){
 document.write(dia[index2] + ", " + data.getDate() + " de " + meses[index] + " de " + an);
 }else{
 document.write(dia[index2] + ", " + data.getDate() + " " + meses[index] + ", " + an);
 }
}
function MM_jumpMenu(selObj){ //v3.0
		  window.document.Buscar.action=selObj.options[selObj.selectedIndex].value;
		  window.document.Buscar.Pagina.value=selObj.options[selObj.selectedIndex].value;
		  window.document.Buscar.Letra.value="";
		  window.document.Buscar.Nombre.value=selObj.options[selObj.selectedIndex].text;
		  if (selObj.options[selObj.selectedIndex].text=="Histórico") 
		  	window.document.Buscar.Tipo.value=selObj.options[selObj.selectedIndex].text;
		  else
			  window.document.Buscar.Tipo.value="";
}
//Validar formulario
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;
}

function MM_validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' must contain an e-mail address.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is mandatory field.\n'; }
  } if (errors) alert('following error(s) occurred:\n'+errors);
  document.MM_returnValue = (errors == '');
}
//Controla el número de caracteres introducidos dentro de una  caja de texto.
function Control(Obj, tam){
	if (Obj.innerHTML.length > tam)
		Obj.innerHTML=Obj.innerHTML.substring(0,tam);
}
//v1.0 Flash
//Copyright 2006 Adobe Systems, Inc. All rights reserved.
function AC_AddExtension(src, ext)
{
  if (src.indexOf('?') != -1)
    return src.replace(/\?/, ext+'?'); 
  else
    return src + ext;
}

function AC_Generateobj(objAttrs, params, embedAttrs) 
{ 
  var str = '<object ';
  for (var i in objAttrs)
    str += i + '="' + objAttrs[i] + '" ';
  str += '>';
  for (var i in params)
    str += '<param name="' + i + '" value="' + params[i] + '" /> ';
  str += '<embed ';
  for (var i in embedAttrs)
    str += i + '="' + embedAttrs[i] + '" ';
  str += ' ></embed></object>';

  document.write(str);
}

function AC_FL_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".swf", "movie", "clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
     , "application/x-shockwave-flash"
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_SW_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".dcr", "src", "clsid:166B1BCA-3F9C-11CF-8075-444553540000"
     , null
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_GetArgs(args, ext, srcParamName, classid, mimeType){
  var ret = new Object();
  ret.embedAttrs = new Object();
  ret.params = new Object();
  ret.objAttrs = new Object();
  for (var i=0; i < args.length; i=i+2){
    var currArg = args[i].toLowerCase();    

    switch (currArg){	
      case "classid":
        break;
      case "pluginspage":
        ret.embedAttrs[args[i]] = args[i+1];
        break;
      case "src":
      case "movie":	
        args[i+1] = AC_AddExtension(args[i+1], ext);
        ret.embedAttrs["src"] = args[i+1];
        ret.params[srcParamName] = args[i+1];
        break;
      case "onafterupdate":
      case "onbeforeupdate":
      case "onblur":
      case "oncellchange":
      case "onclick":
      case "ondblClick":
      case "ondrag":
      case "ondragend":
      case "ondragenter":
      case "ondragleave":
      case "ondragover":
      case "ondrop":
      case "onfinish":
      case "onfocus":
      case "onhelp":
      case "onmousedown":
      case "onmouseup":
      case "onmouseover":
      case "onmousemove":
      case "onmouseout":
      case "onkeypress":
      case "onkeydown":
      case "onkeyup":
      case "onload":
      case "onlosecapture":
      case "onpropertychange":
      case "onreadystatechange":
      case "onrowsdelete":
      case "onrowenter":
      case "onrowexit":
      case "onrowsinserted":
      case "onstart":
      case "onscroll":
      case "onbeforeeditfocus":
      case "onactivate":
      case "onbeforedeactivate":
      case "ondeactivate":
      case "type":
      case "codebase":
        ret.objAttrs[args[i]] = args[i+1];
        break;
      case "width":
      case "height":
      case "align":
      case "vspace": 
      case "hspace":
      case "class":
      case "title":
      case "accesskey":
      case "name":
      case "id":
      case "tabindex":
        ret.embedAttrs[args[i]] = ret.objAttrs[args[i]] = args[i+1];
        break;
      default:
        ret.embedAttrs[args[i]] = ret.params[args[i]] = args[i+1];
    }
  }
  ret.objAttrs["classid"] = classid;
  if (mimeType) ret.embedAttrs["type"] = mimeType;
  return ret;
}

function MM_changeProp(objName,x,theProp,theValue,Elvalor) { //v6.0
  var obj = MM_findObj(objName);
  if (obj && (theProp.indexOf("style.")==-1 || obj.style)){
  //var objselect = MM_findObj(Elvalor);
  	theValue=valores1[x.options[x.selectedIndex].value];
    if (theValue == true || theValue == false)
      eval("obj."+theProp+"="+theValue);
    else eval("obj."+theProp+"='"+theValue+"'");
  }
}
function identificarse()
{
	var contenido=document.getElementById("registro");
	llamarasincrono("Tiendausuarioidentificacion.asp", contenido, '');
}
function suscribirse()
{
	var contenido=document.getElementById("registro");
	llamarasincrono("Tiendausuarioformulario.asp", contenido, '');
}
function identificarsedatos()
{
	var contenido=document.getElementById("registro");
	var parametros="PASSWORD="+document.getElementById("PASSWORD").value;
	parametros=parametros+"&USUARIO="+document.getElementById("USUARIO").value;
	llamarasincrono("Tiendausuarioformulario.asp", contenido, parametros);
}

function llamarasincrono(url, objcontenedor, parametros){
	//objcontenedor.innerHTML="pagina="+url+"parmetros="+parametros;
	if (objcontenedor.parentNode)
	{
		var pagina_requerida = false
		//Activamos el cargando en el objeto;
			objcontenedor.innerHTML="Cargando.... por favor espere" 
			//ponercargando(true, objcontenedor.parentNode.style.left,objcontenedor.parentNode.style.top);
			
		if (window.XMLHttpRequest) {// Si es Mozilla, Safari etc
			pagina_requerida = new XMLHttpRequest()
		}
		else if (window.ActiveXObject)
		{ // pero si es IE
			try {
					pagina_requerida = new ActiveXObject("Msxml2.XMLHTTP")
				} 
			catch (e){ // en caso que sea una versión antigua
						try{
							pagina_requerida = new ActiveXObject("Microsoft.XMLHTTP")
							}
						catch (e){}
					}
		}
		else return false
		
		pagina_requerida.onreadystatechange=function()
		{ // función de respuesta
		if (objcontenedor)
			cargarpagina(pagina_requerida, objcontenedor,url,parametros);
			
		}
		pagina_requerida.open('POST', url, true) // asignamos los métodos open y send
		pagina_requerida.setRequestHeader('Content-Type','application/x-www-form-urlencoded');
		pagina_requerida.send(parametros)
	}
} // Fin llamarasincrono

// todo es correcto y ha llegado el momento de poner la información requerida
// en su sitio en la pagina xhtml
function cargarpagina(pagina_requerida, objcontenedor, url, parametros){
	try{
		if ((pagina_requerida.readyState == 4) && (pagina_requerida.status==200 || window.location.href.indexOf("http")==-1))
		{
				objcontenedor.innerHTML=pagina_requerida.responseText;
				//ponercargando(false, 0,0);

			control=0;
		}
	}
	catch (e)
	{
		//alert("Error:"+e.description);
			if (control<3)
			{
				llamarasincrono(url, objcontenedor, parametros);
				control++;
			}
			else
			{
				//ponercargando(false, 0,0);
			}
	}

}
//Funcion de carga oculta o muestra en una posición el cargando.
function ponercargando(visible, posicionlef,posiciontop)
{
	var estadocargando=document.getElementById('cargando');

	if (visible)
	{
		estadocargando.style.display="block";
		estadocargando.style.left=posicionlef;
		estadocargando.style.top=posiciontop;
	}
	else
		estadocargando.style.display="none";
		//estadocargando.style.display="none";
}
function fullscreen(URL,Nombre,parametros) { //v2.0
  window.open(URL,Nombre,parametros);
} 
function controlarroba(usuario,dominio)
{
	document.write('<a href=\"mailto:'+usuario +'@'+dominio+'\">'+usuario +'@'+dominio+'</a>')
}
// funciones generales necesarias para el calendario
function $(element) 
	{
	  if (arguments.length > 1) {
		for (var i = 0, elements = [], length = arguments.length; i < length; i++)
		  elements.push($(arguments[i]));
		return elements;
	  }
	  else
	  {
		  if (typeof element == 'string') //Si es el id del elemento.
			element = document.getElementById(element);
		  else  //Si es el idevento del elemento.
			element = (element.target) ? element.target : ((element.srcElement) ? element.srcElement : null);	
		  return element;
	  }
	}
	//limpia un objeto dejandolo vacio
	function limpiarObj(objeto) {
		while (objeto.hasChildNodes())
		objeto.removeChild(objeto.firstChild);
	}
	//Borra un objeto
	function borrarObj(objeto) {
		if (objeto.parentNode)
		objeto.parentNode.removeChild(objeto);
	}
var Event={
	observe: function(elem, event, func) 
	{
	   if ((typeof elem == 'object') || (elem = $(elem)))
		{
			if (elem.addEventListener)  // W3C DOM
					elem.addEventListener(event,func, true);
			else if (elem.attachEvent) { // IE DOM
				if (event.indexOf('on')==0)				
				 	var r = elem.attachEvent(event, func);
				else
					var r = elem.attachEvent("on"+event, func);
			return r;
			}
			else throw 'No es posible insertar el evento';
		}
		//if(destino)moduloCalendario.inputDestino=destino;
	},
	//Funcion que nos elimina de un obejto  un  evento.
		/*	event - sera el evento que queramos esperar para dicho elemento.
			elem - Es el elemento al que se le asignara el evento.
			func - Es la funcion que queremos quitar al recibir el evento en nuestro elemento. 
		*/
	stopObserving: function(elem, event, func) {
		 if (typeof elem == 'string') elem = $(elem);
		if (elem.removeEventListener)  // W3C DOM
			elem.removeEventListener(event,func,false);
		else if (elem.detachEvent) { // IE DOM
			 var r = elem.detachEvent("on"+event, func);
		return r;
		}
		else throw 'No es posible eliminar evento';
	},
	// Funcion que evita que se ejecuten eventos adicionales
	anularEventos: function(event)
	{
		if(window.event)
		{
			window.event.cancelBubble=true;
			window.event.returnValue=false;
		} else event.preventDefault();
	},
	objetoEvento: function(event)
	{
		var event = (event) ? event : window.event ;
		return (event.target) ? event.target : event.srcElement;
	}
}
