function EsNumero (vVariable){		// True (0 / 23 / 12.5 / "23") Este si acepta el cero y negativos
	if (isNaN(parseInt(vVariable))) return (false) 	//v2.00 Para espacios y vacios
	return !(isNaN(vVariable));				// False ("" / "eew" / 12,3)
}
function setSelectValues(select,valores,vacio){
    setSelectNValues(select,valores,vacio,[1],0,2);
}
function setSelectNValues(select,valores,vacio,posicionesTexto,posicionValor,nArray){
    var z = valores.length;
    var j = 0;
    if (vacio){
        select.length = (z/nArray)+1;
        select[0].text = "";
        select[0].value = "";
	j = 1;
    }else{
	select.length = (z/nArray);
    }
    for (var i = 0;i < z;i=i+nArray){
	var zp = posicionesTexto.length;
	var texto = "";
	for (var f=0;f<zp;f++){
	    if (f!=0) texto += " - ";
	    texto += valores[i+posicionesTexto[f]];
	}
	select[j].text = texto;
        select[j].value = valores[i+posicionValor];
        j++;
    }
}
function addSelect(select,par,noRepetir){
    if (noRepetir!=undefined && noRepetir)
	par = eliminarRepetidos(select,par);
    for (var i = 0;i<par.length;i=i+2){
	var opcion = new Option();
	opcion.text = par[i+1];
	opcion.value = par[i];
	select.options.add(opcion,0);
    }
}
function eliminarRepetidos(select,par){
    var z = select.length;
    var zp = par.length;
    var res = [];
    var x = 0;
    var esRepetido;
    for (var j = 0;j<zp;j=j+2){
	esRepetido = false;
        for (var i = 0;i<z;i++){
	    if (select[i].value==par[j]){
		esRepetido = true;
		break;
	    }
	}
	if (!esRepetido){
	    res[x] = par[j];
	    res[x+1] = par[j+1];
	    x=x+2;
	}
    }
    return res;
}
function editSelect(select,par){
    var z = select.length;
    for (var i = 0;i < z;i++){
	if (select[i].value==par[0]){
	    select[i].text = par[1];
	    break;
	}
    }
}
function getPosicion(select,cod){
    var z = select.length;
    for (var i = 0;i < z;i++){
	if (select[i].value==cod){
	    return i;
	}
    }
}
function deleteSelectArray(select){
    var z = select.length;
    var tmp = [];
    var j = 0;
    var n = 0;
    for (var i = 0;i<z;i++){
	if (!select[i].selected){
	    tmp[j+1] = select[i].text;
	    tmp[j] = select[i].value;
	    j = j+2;
	}else{
	    n++;
	}
    }
    select.length = z-n;
    j = 0;
    z = tmp.length;
    for (var i = 0;i < z;i=i+2){
        select[j].text = tmp[i+1];
        select[j].value = tmp[i];
        j++;
    }
}

function deleteSelect(select,cod){
    var z = select.length;
    var tmp = [];
    var j = 0;
    for (var i = 0;i<z;i++){
	if (select[i].value!=cod){
	    tmp[j+1] = select[i].text;
	    tmp[j] = select[i].value;
	    j = j+2;
	}
    }
    select.length = z-1;
    j = 0;
    z = tmp.length;
    for (var i = 0;i < z;i=i+2){
        select[j].text = tmp[i+1];
        select[j].value = tmp[i];
        j++;
    }
}
function setPosicionSelect(select,valor,cod){
    var z = select.length;
    var posicion = getPosicion(select,cod);
    if ((posicion+valor)<z && (posicion+valor)>=0){
	var tmp = [];
	var j = 0;
	for (var i = 0;i<z;i++){
	    if (i==posicion+valor){
		tmp[j] = select[posicion].value;
		tmp[j+1] = select[posicion].text;
	    }else if (i==posicion){
		tmp[j] = select[i+valor].value;
		tmp[j+1] = select[i+valor].text;
	    }else{
		tmp[j] = select[i].value;
		tmp[j+1] = select[i].text;
	    }
	    j = j+2;
	}
	j = 0;
	z = tmp.length;
	for (var i = 0;i < z;i=i+2){
	    select[j].text = tmp[i+1];
	    select[j].value = tmp[i];
	    if (j==(posicion+valor)) select[j].selected = true;
	    else select[j].selected = false;
	    j++;
	}
    }
}
function rellenaCampos(campos,valores,num){
    var z = campos.length;
    var zv = valores.length;
    if (z!=zv){
	alert("El array de campos no tiene la misma dimensión que el de valores");
    }else{
		for (var i = 0;i<z;i++){
		    eval("var elemento = document.forms["+num+"]."+campos[i]);
		    if (elemento != undefined){
		    	if (elemento.type=="checkbox"){
					if (valores[i]=="1") elemento.checked = true;		    	
		    	}else if (elemento.length>1 && elemento.type!="select-one"){
		    		for (var e = 0;e<elemento.length;e++){
		    			if (elemento[e].value==valores[i]){
		    				elemento[e].checked = true;
		    			}
		    		}
		    	}else if (elemento.type=="file"){
		   			eval("elemento = document.forms["+num+"]."+campos[i]+"old");
		   			if (elemento==undefined){
		    			eval("elemento = document.forms["+num+"]."+campos[i]);
		   			}
		   			var capamensaje = document.getElementById(campos[i]+"msg");
		   			if (capamensaje!=undefined && valores[i]!=""){
		   				var fichero = valores[i].split("/");
		   				capamensaje.innerHTML = "[Campo ya rellenado: "+fichero[fichero.length-1]+"]";
		   			}
					elemento.value = valores[i];
		    	}else{
					elemento.value = valores[i];		    	
		    	}
		    }
		}
    }
}
function multiFill(multiple,valores){
    var opciones = multiple.options;
    for (var i = 0;i<opciones.length;i++){
	if (estaEn(opciones[i].value,valores)){
	    opciones[i].selected = true;
	}
    }
}
function rellenaCamposPlantilla(campos,valores){
    var z = campos.length;
    var zv = valores.length;
    if (z!=zv){
	alert("El array de campos no tiene la misma dimensión que el de valores");
    }else{
	for (var i = 0;i<z;i++){
	    campos[i] = campos[i].replace(" ","");
	    eval("var elemento = document.forms[0]._n"+campos[i]+"_antiguo");
	    if (elemento==undefined)
		eval("elemento = document.forms[0]._n"+campos[i]);
	    if (elemento==undefined)
		eval("elemento = document.forms[0]._o"+campos[i]+"_antiguo");
	    if (elemento==undefined)
		eval("elemento = document.forms[0]._o"+campos[i]);
	    if (campos[i]!="" && elemento==undefined)
		eval("elemento = document.forms[0]."+campos[i]);
	    if (valores[i]!="" && elemento!=undefined){
		if (elemento.type=="select-multiple"){
		    eval ("var valoresLocal = "+valores[i]);
		    var zp = valoresLocal.length;
		    if (zp==undefined){
    			elemento.length = 1;
			elemento[0].text = valores[i];
			elemento[0].value = valores[i];
		    }else{
			elemento.length = zp;
			for (var j = 0;j < zp;j++){
			    elemento[j].text = valoresLocal[j];
			    elemento[j].value = valoresLocal[j];
			}
		    }
		}else if (elemento.type=="hidden"){
		    elemento.value = valores[i];
		    if (document.getElementById("_n"+campos[i]+"_capa")!=undefined){
			document.getElementById("_n"+campos[i]+"_capa").innerHTML = "<a href='../../contenidos/"+valores[i]+"/index' class='enlace' target='new'>../../contenidos/"+valores[i]+"/vistazo</a>";
		    }else if (document.getElementById("_o"+campos[i]+"_capa")!=undefined){
			document.getElementById("_o"+campos[i]+"_capa").innerHTML = "<a href='../../contenidos/"+valores[i]+"/index' class='enlace' target='new'>../../contenidos/"+valores[i]+"/vistazo</a>";
		    }
		}else if (elemento.type=="radio"){
		    elemento.checked=true;
		}else if (elemento.type=="textarea"){
		    elemento.value = toHTML(unescape(valores[i]));
		}else if (elemento.length==4){
		    eval ("var valoresLocal = "+valores[i]);
		    var zp = valoresLocal.length;
		    elemento[0].value = valoresLocal[0];
		    if (zp>1){
			if (!EsNumero(valoresLocal[1])){
			    elemento[1].value = valoresLocal[1];
			    if (zp>2){
				elemento[2].value = valoresLocal[2];
				if (zp>3){
				    elemento[3].value = valoresLocal[3];
				}
			    }
			}else{
			    elemento[2].value = valoresLocal[1];
			    if (zp>2){
				elemento[3].value = valoresLocal[2];
			    }
			}
		    }
		}else{
		    elemento.value = toHTML(valores[i]);
		}
	    }
	}
    }
}
function getValorArray(campo,campos,valores){
    var z = campos.length;
    var zv = valores.length;
    if (z!=zv){
	alert("El array de campos no tiene la misma dimensión que el de valores");
    }else{
	for (var i = 0;i<z;i++){
	    campos[i] = campos[i].replace(/\s/g,"");
	    if (campos[i]==campo && valores[i]!=""){
		return valores[i];
	    }
	}
    }
    return undefined;
}
function replaceAll(cadena,sale,entra) {
    cadena = cadena.replace(/sale/g,entra);
    return cadena;
}
function escapa(cadena) {
    if (cadena == null)
        return cadena;
      // Nota: el orden de los reemplazos es importante: la \ se debe reemplazar antes que la ' y la "
        cadena = cadena.replace(/&/g, "&amp;");
        cadena = cadena.replace(/</g,"&lt;");
        cadena = cadena.replace(/>/g,"&gt;");
        cadena = cadena.replace(/\\/g,"\\\\");
        cadena = cadena.replace(/\"/g, "\\\"");
        cadena = cadena.replace(/\'/g, "\\\'");
        cadena = cadena.replace(/\n/g, "\\\\n");
        cadena = cadena.replace(/\r/g, "\\\\r");
        cadena = cadena.replace(/\t/g, "\\\\t");
    return cadena;
}
function toHTML(cadena){
    if (cadena == null)
        return cadena;
      // Nota: el orden de los reemplazos es importante: la \ se debe reemplazar antes que la ' y la "
        cadena = cadena.replace(/&gt;/g,">");
        cadena = cadena.replace(/&lt;/g, "<");
    return cadena;
}
function activaCampos () {
    var z = document.forms[0].length;
    for (var i = 0;i<z;i++){
	var elemento = document.forms[0].elements[i];
	if (elemento.type!="button")
	elemento.disabled = false;
    }
}
function desactivaCampos () {
    var z = document.forms[0].length;
    for (var i = 0;i<z;i++){
	var elemento = document.forms[0].elements[i];
	if (elemento.type!="button")
	elemento.disabled = true;
    }
}