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_showHideLayers() { //v6.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; }
}
function GP_popupConfirmMsg(msg) { //v1.0
  document.MM_returnValue = confirm(msg);
}

function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}

function setDelay(p_func, p_segs) { //v1.0
  setTimeout(p_func, p_segs);
}

var pm_fecha = new Array(2,2,4);
var pm_miles = new Array(3,3,3,3,3,3);
function mascara(d,sep,pat,nums){

if(d.valant != d.value){
	val = d.value;
	largo = val.length;
	val = val.split(sep);
	val2 = '';
	for(r=0;r<val.length;r++){
		val2 += val[r];
	}
	if(nums){
		for(z=0;z<val2.length;z++){
			if(isNaN(val2.charAt(z))){
				letra = new RegExp(val2.charAt(z),"g");
				val2 = val2.replace(letra,"");
			}
		}
	}
	val = '';
	val3 = new Array();
	for(s=0; s<pat.length; s++){
		val3[s] = val2.substring(0,pat[s]);
		val2 = val2.substr(pat[s]);
	}
	for(q=0;q<val3.length; q++){
		if(q ==0){
			val = val3[q];
		}
		else{
			if(val3[q] != ""){
				val += sep + val3[q];
				}
		}
	}
	d.value = val;
	d.valant = val;
	}
}

function validMail(str) {
	var at="@";
	var dot=".";
	var lat=str.indexOf(at);
	var lstr=str.length;
	var ldot=str.indexOf(dot);
	if ((str.indexOf(at)==-1) ||
	((str.indexOf(at)==-1 || str.indexOf(at)==0 || str.indexOf(at)==lstr)) ||
	((str.indexOf(dot)==-1 || str.indexOf(dot)==0 || str.indexOf(dot)==lstr)) ||
	(str.indexOf(at,(lat+1))!=-1) ||
	((str.substring(lat-1,lat)==dot || str.substring(lat+1,lat+2)==dot)) ||
	(str.indexOf(dot,(lat+2))==-1) ||
	(str.indexOf(" ")!=-1)) {
		return false;
	} else {
		return true;
	}
}
function limpiarCampo(b,c) { //v2.0
	eval("document."+b+"."+c+".value='';");
}
function getProductoEspec(b) { //v2.0
	var c = b;
	var winname = 'OP'+c+'D';
	MM_openBrWindow('http://www.regalodelcielo.com/pop_producto_detalles.php?id='+c+'',winname,'status=yes,scrollbars=yes,resizable=yes,width=600,height=520');
}

function agregarFavoritos(dir,tit) {
	var navegador = navigator.appName;
	if (navegador == "Microsoft Internet Explorer")  {
		window.external.AddFavorite(dir, tit)
	} else {
		window.sidebar.addPanel(tit, dir, ''); 
	}
}

function restricChar(p_form, p_cual, p_donde, p_limit) {
	var CAR = eval("document."+p_form+"."+p_cual+".value;");

	if(CAR.length <= p_limit) {
		eval("document."+p_form+"."+p_donde+".value=CAR.length;");
		return true;
	} else {
		CAR = CAR.substring(0, p_limit);
		eval("document."+p_form+"."+p_cual+".value=CAR;");

		return true;
	}
}

function validFecha(Cadena, Sep){  
    var Fecha= new String(Cadena)   //Crea un string  
    var RealFecha= new Date()   //Para sacar la fecha de hoy  
    //Cadena Año  
    var Ano= new String(Fecha.substring(Fecha.lastIndexOf(Sep)+1,Fecha.length))  
    //Cadena Mes  
    var Mes= new String(Fecha.substring(Fecha.indexOf(Sep)+1,Fecha.lastIndexOf(Sep)))  
    //Cadena Día  
    var Dia= new String(Fecha.substring(0,Fecha.indexOf(Sep)))  
  
    //Valido el año  
    if (isNaN(Ano) || Ano.length<4 || parseFloat(Ano)<1900){  
            //alert('Año inválido')  
        return false  
    }  
    //Valido el Mes  
    if (isNaN(Mes) || parseFloat(Mes)<1 || parseFloat(Mes)>12){  
        //alert('Mes inválido')  
        return false  
    }  
    //Valido el Dia  
    if (isNaN(Dia) || parseInt(Dia, 10)<1 || parseInt(Dia, 10)>31){  
        //alert('Día inválido')  
        return false  
    }  
    if (Mes==4 || Mes==6 || Mes==9 || Mes==11 || Mes==2) {  
        if (Mes==2 && Dia > 28 || Dia>30) {  
            //alert('Día inválido')  
            return false  
        }  
    }  
      
  return true
}  

function validNormalChar(ca) {
	var Cadena = "AÁBCDEÉFGHIÍJKLMNÑOÓPQRSTUÚVWXYZaábcdeéfghiíjklmnñoópqrstuúvwxyz0123456789_- ";
	la = ca.length;
	vcar = true;
	for(c=0; c<la; c++) {
		subca = "";
		subca = ca.charAt(c);
		if(subca.indexOf(Cadena) < 0) {
			vcar = false;
			break;
		}
	}
return vcar;
}

function tiene_numeros(texto,c){
	var numeros = "0123456789"+c;
	var a=false;
	for(i=0; i<texto.length; i++){
		if (numeros.indexOf(texto.charAt(i),0)!=-1){
			a=true;
		} else {
			a=false;
			break;
		}
	}
	return a;
}

function validRadioBut(radiobuton) {
	var PLN_si = false;
	for(i=0; i<radiobuton.length; i++) {
		if(radiobuton[i].checked) {
			//remov += PLN_cheq[i].value;
			PLN_si=true;
			break;
		}
	} 
	return PLN_si;
}
function cambiarColor(celda, color){
   celda.style.background=color;
}
function limpiarCapa(Capa) { //v2.0
	document.getElementById(Capa).innerHTML = '';
}
function limpiarCampo(b,c) { //v2.0
	eval("document."+b+"."+c+".value='';");
}