function marcar (lug) {


        if (lug == 1) {
                for (var K = 1; K <= document.form.cck.value; K++) {
                        eval ("document.form.ck"+K+".checked=(document.form.ck.checked==true)?true:false;");
                }
        } else if (lug == 2) {
                document.form.ck.checked = false;
                pass = 0;
                for (var K = 1; K <= document.form.cck.value; K++) {
                        if ((eval ("document.form.ck"+K+".checked") !== true) || (pass == 1)) {
                                eval ("document.form.ck"+K+".checked=false;");
                                pass = 1;
                        }
                }

        } else {
                document.form.ck.checked = false;
        }
}

function mostrarU (txt, display) {
        try { document.getElementById (txt).style.display = display; }
        catch (e) { }
}

function mostrar (obj) {
        var id = new String (obj.value);
        var display = (obj.checked) ? "block" : "none" ;

        desactivar (document.form, 1);

	try { document.getElementById (id).style.display = display; }
	catch (e) { }
//	catch (e) { alert ("No se encuentra el elemento ["+id+"]"); }
}

function mostrarB (obj) {
        var id = new String (obj.value);
        var display = (obj.checked) ? "block" : "none" ;

        desactivar (document.form, 6);

        try { document.getElementById (id).style.display = display; }
	catch (e) { }
//        catch (e) { alert ("No se encuentra el elemento ["+id+"]"); }
}

function mostrar_ck (obj) {
        var id = new String (obj.value);
        var display = (obj.checked) ? "block" : "none" ;

        desactivar (document.form, 5);

        try { document.getElementById (id).style.display = display; }
	catch (e) { }
//        catch (e) { alert ("No se encuentra el elemento ["+id+"]"); }
}

function mostrar_gratis (obj) {
        var top = 6;
        var gratis = obj.options [obj.selectedIndex].text.search(/^Gratis/gi);
        var independiente = obj.options [obj.selectedIndex].text.search(/Individuales/gi);

	desactivar (document.form, 2);
        desactivar (document.form, 4);

        if (gratis != -1) for (var K = 0; K <= top; K++) document.getElementById ("gratis"+K).style.display = "none";
        else for (var K = 0; K <= top; K++) document.getElementById ("gratis"+K).style.display = "block";

        if (independiente != -1) document.getElementById ("independiente").style.display = "block";
        else document.getElementById ("independiente").style.display = "none";
}

function mostrar_radio (obj) {
        desactivar (document.form, 3);

        if (obj.value == 't') document.getElementById ("noticias").style.display = "block";
        else document.getElementById ("noticias").style.display = "none";
}

function mostrar_todos (obj, lug) {
        for (var K = 0; K < obj.length; K++) {
	    if (lug == 1) { if (obj.elements[K].name.search (/^ck_/gi) != -1) mostrar_ck (obj.elements[K]);
	    } else if (lug == 0) {
		if (obj.elements[K].name.search (/id_usuario_empresa/gi) != -1) mostrar_gratis (obj.elements[K]);
		if (obj.elements[K].name.search (/CK\|TMP|id_usuario_servicio/gi) != -1) mostrar (obj.elements[K]);
		if (obj.elements[K].name.search (/permitir_correo/gi) != -1) mostrar_radio (obj.elements[K]);
	    } else if (lug == 2) {
		if (obj.elements[K].name.search (/^ck\|tmp/gi) != -1) mostrarB (obj.elements[K]);
	    }
        }
}
function desactivar (obj, lug) {
    try {
        var flag = flag1 = false;

        for (var K = 0; K < obj.length; K++) {
            if (lug == 1 && (obj.elements[K].name.search (/CK\|TMP/gi) != -1 || flag)) {
                if (obj.elements[K].type == 'text') obj.elements[K].disabled = !obj.elements[K-1].checked;
                flag = !flag;
            } else if (lug == 2) {
                if (obj.elements[K].name.search (/id_usuario_empresa/gi) != -1) {
                    var gratis = obj.elements[K].options [obj.elements[K].selectedIndex].text.search(/^Gratis/gi);
                    var independiente = obj.elements[K].options [obj.elements[K].selectedIndex].text.search(/Individuales/gi);
                    if (gratis != -1) flag1 = true ;
                    if (!flag1 && independiente != -1) flag1 = true;
                }
                if (gratis != -1) {
                    if (obj.elements[K].name.search (/ck_fecha_vence/gi) != -1 || flag) {
                        obj.elements[K].disabled = flag1;
                        flag = true;
                    }
                } else if (independiente != -1) { if (obj.elements[K].name.search (/-INDEPENDIENTE/gi) != -1) obj.elements[K].disabled = !flag1;
                } else {
                    if (obj.elements[K].name.search (/-INDEPENDIENTE/gi) != -1) obj.elements[K].disabled = true;
                    else obj.elements[K].disabled = flag1;
                }
            } else if (lug == 3) {
                if (obj.elements[K].name.search (/permitir_correo/gi) != -1 && !flag) {
                    flag1 = (obj.elements[K].value == 't' && obj.elements[K].checked) ? false : true ;
                    flag = true;
                }
                if (obj.elements[K].name.search (/perfil/gi) != -1) obj.elements [K].disabled = flag1;
            } else if (lug == 5) {
		if (obj.elements[K].type == 'checkbox' && obj.elements[K+1].type.search (/submit|button|checkbox/gi) == -1)
		    obj.elements[K+1].disabled = !obj.elements[K].checked;
	    }
        }

        if (lug == 4) {
            for (var K = 0; K < obj.length; K++) {
                if (obj.elements[K].name.search (/id_usuario_servicio/gi) != -1) {
                    if (obj.elements[K].value == 0) var conexion = !obj.elements[K].checked;
                    else if (obj.elements[K].value == 2) var correo = !obj.elements[K].checked;
                    else if (obj.elements[K].value == 1) var fondos1 = !obj.elements[K].checked;
                    else if (obj.elements[K].value == 6) var fondos2 = !obj.elements[K].checked;
                    else if (obj.elements[K].value == 3) var navegacion = !obj.elements[K].checked;
                    else if (obj.elements[K].value == 4) var chat = !obj.elements[K].checked;
                    else if (obj.elements[K].value == 7) var tarjeta = !obj.elements[K].checked;
                }
            }
            for (var K = 0; K < obj.length; K++) {
                if (obj.elements[K].name.search (/emisor|limite-0/gi) != -1) obj.elements[K].disabled = conexion;
		else if (obj.elements[K].name.search (/conexion/gi) != -1 && conexion) obj.elements[K].disabled = conexion;
                else if (obj.elements[K].name.search (/fecha_venc-1|limite-1/gi) != -1) obj.elements[K].disabled = fondos1;
                else if (obj.elements[K].name.search (/fecha_venc-2|limite-6/gi) != -1) obj.elements[K].disabled = fondos2;
                else if (obj.elements[K].name.search (/id_usuario_acceso/gi) != -1) obj.elements[K].disabled = navegacion;
                else if (obj.elements[K].name.search (/permitir_correo|perfil/gi) != -1) obj.elements[K].disabled = correo;
                else if (obj.elements[K].name.search (/-CHAT/gi) != -1) obj.elements[K].disabled = chat;
                else if (obj.elements[K].name.search (/tarjeta/gi) != -1) obj.elements[K].disabled = tarjeta;
            }
        } else if (lug == 6) {
	    var name = " ";
	    for (var K = 0; K < obj.length; K++) {
		if (eval ("obj.elements["+K+"].name.search (/"+name+"/gi)") != -1) obj.elements[K].disabled = !check;
		if (obj.elements[K].name.search (/^ck\|tmp/gi) != -1) {
		    name = obj.elements[K].name.replace(/ck\|tmp\|ck_/gi,"");
		    check = obj.elements[K].checked;
		}
	    }
	}
    } catch (e) {
	//alert (e);
    }
}



function Buscaclave(FormBusqueda, desde) {
	//busca la palabra clave en el array de palabras clave
	//devuelve -1 si no hay coincidencias
	var index = -1

	//recorre el array en busca de la palabra clave (en cualquier parte)
	for (x = desde; x < longitud; x++) {
		if ( (BaseDatos[x].search(clave1) != -1) || (BaseDatos[x].search(clave2) != -1) ) {
			index = x
			break
		}
	}

	return index
}


function buscar_select (b, obj, flag) {
    var idx = (flag) ? obj.selectedIndex + 1 : 0 ;
    for (var K = 0; K < obj.length; K++) obj.options[K].selected = true;

    for (var K = idx; K < obj.length; K++) {
	if (eval("obj.options["+K+"].text.search (/"+b+"/gi)") != -1) {
	     obj.options[K].selected = obj.options[K].index;
	     break;
  	}
	if (K == obj.length-1) alert ("Fin de la busqueda");
    }

}



function FormSubmit (evento) {
    if (navigator.platform.search (/win/gi) != -1 && evento == 1) {
        document.form.method = "post";
        document.form.submit();
    } else if (navigator.platform.search (/win/gi) == -1 && evento == 0) document.form.submit();
}

//Funcion que sirve para mostrar un texto cuando el puntero este por encima de algun control
function mostrarTexto(current_event,this_link,tip_text){
        var my_tooltip = document.getElementById("tooltip");

        var cursor_position_x;
        var cursor_position_y;

        if(document.all) {
                cursor_position_x = event.clientX;
                cursor_position_y = event.clientY;
        } else if(document.getElementById) {
                cursor_position_x = current_event.pageX;
                cursor_position_y = current_event.pageY;
        }

        var text_tooltip = "<div style='font-size:10pt; color:#FFFFFF; solid;padding:1px; padding: 10px;'>"+tip_text+"</div>";

        with (my_tooltip) {
                innerHTML = text_tooltip;
                style.left = cursor_position_x;
                style.top = cursor_position_y + 15;
                style.backgroundColor ="#003399";
                style.visibility = "visible";
/*
		style.borderRadius = "8px"; // Opera, Chrome, Safari, Explorer 9
		style.webkitBorderRadius = "8px";
		style.mozBorderRadius = "8px"; // Mozilla
*/
        }

        this_link.onmouseout = hide_tooltip
}

//Oculta el text
function hide_tooltip(){
        document.getElementById("tooltip").style.visibility="hidden";
}

function mostrar_tablas (lug) {
    try {
        var display = (document.getElementById (lug).style.display == "block") ? "none" : "block" ;
        var divs = document.getElementById ("tablas").getElementsByTagName ("TABLE");
        for (var K = 0; K < divs.length; K++)
            if (divs[K].id != "tablas") divs[K].style.display = "none";

        document.getElementById (lug).style.display = display;
    } catch (e) {}
}