/* Función que se ejecuta cuando se solicita caducar un registro, envía la petición al server.*/
function f3() {
    if(document.getElementById('jspcode') == null) {
        cerrarWins();
        if(document.forms["fb"]["flagTypeForm"] && document.forms["fb"]["flagTypeForm"].value == "CON") {
            st("FORMULARIO NO PERMITE MANTENIMIENTO, SOLO CONSULTA", false, 1);
            return  true;
        }

        kc = 114; eval(ca); kc = 0;

        submit("Procesando Caducación", "FBSCA");
    } else if(document.isjsp != null) {
        document.getElementById('jspcode').contentWindow.mantenimiento();
    }
}

/* Función que se ejecuta cuando se presiona la tecla f7 realiza la petición al server con los parámetros de consulta */
function f7(paramPress) {
    if(document.getElementById('jspcode') == null) { 
        cerrarWins();
        if(document.forms["fb"]["flagTypeForm"] && document.forms["fb"]["flagTypeForm"].value == "UDL") {
            if(paramPress)
                st("FORMULARIO NO PERMITE CONSULTA", false, 1);
            return  true;
        }
        if(!validaOrden())  return;

        globalVars['cambio'] = "kc=118;eval(ca);kc=0;f7(true)";
        if(valCam(qvalMAN)) {
            kc = 118; eval(ca); kc = 0;
        }else  return;

        if(!validaPreF7())  return;
  
        if(crireq() && dk) {
            if(document.forms["fb"]["flagConEspecial"])
                document.forms["fb"]["flagConEspecial"].value = "TRUE";

            try { 
                qzBlq = parseInt(document.forms["fb"].qzBloqueActivo.value,10); 
            }catch (Exception) { 
                qzBlq = -1; 
            }
            if(paramPress) findElByName("qzPagina")[qzBlq<0 ? 0 : qzBlq].value = "1";

            submit("Procesando Consulta","FBSCO");
        }
    } else if(document.isjsp != null){
        document.getElementById('jspcode').contentWindow.consultar();
    }
}

/* Función que se ejecuta cuando se solicita la página anterior de una consulta, envía la petición al server.*/
function f8() {
    if(document.getElementById('jspcode') == null) { 
        cerrarWins();
        if(document.forms["fb"]["flagTypeForm"] && document.forms["fb"]["flagTypeForm"].value == "UDL") {
            st("FORMULARIO NO PERMITE CONSULTA", false, 1);
            return  true;
        }
        if(!validaOrden())  return;
  
        globalVars['cambio'] = "dk=true;f8()";
        if(!valCam(qvalMAN))  return;

        if(!validaPreF7())  return;
  
        if(crireq() && dk) {
            try { 
                qzBlq = parseInt(document.forms["fb"].qzBloqueActivo.value, 10); 
            }catch (Exception) { 
                qzBlq = -1; 
            }
    
            try {
                qzPag = parseInt(findElByName("qzPagina")[qzBlq < 0 ? 0 : qzBlq].value, 10); 
            }catch (Exception) { 
                qzPag = 1; 
            }
            if(qzPag>1) {
                findElByName("qzPagina")[qzBlq < 0 ? 0 : qzBlq].value = qzPag - 1;

                if(document.forms["fb"]["flagConEspecial"])
                    document.forms["fb"]["flagConEspecial"].value = "FALSE";
        
                if(qzBlq > -1 && objCampo.length > 1) {
                    for(var i=qzBlq; i<objCampo.length; i++) {
                        findElByName("qzRegistro")[i].value = "1";
                        if(i > qzBlq)  findElByName("qzPagina")[i].value = "1";
                    }
                }
                submit("Procesando Consulta Anterior", "FBSCO");
            } else {
                st("NO EXISTE UNA PAGINA ANTERIOR. &nbsp; ESTA ES LA PRIMERA PAGINA.!", false, -1);
            }
        }
    } else if(document.isjsp != null){
        document.getElementById('jspcode').contentWindow.prevPage();
    }
}

/* Función que se ejecuta cuando se solicita la página siguiente de una consulta, envía la petición al server.*/
function f9() {
    if(document.getElementById('jspcode') == null) {
        cerrarWins();
  
        if(document.forms["fb"]["flagTypeForm"] && document.forms["fb"]["flagTypeForm"].value == "UDL") {
            st("FORMULARIO NO PERMITE CONSULTA", false, 1);
            return;
        }
  
        if(flag["qPagDesh"]) {
            st("FORMULARIO CON PAGINACIÓN DESHABILITADA: &nbsp; NO ADMITE CONSULTA PROXIMA", false, 1);
            return;
        }

        if(document.getElementById("codEstatus") && document.getElementById("codEstatus").value == "111006") {
            st("NO EXISTE UNA PAGINA SIGUIENTE. &nbsp; ESTA ES LA ULTIMA PAGINA.!", false, -1);
            return;
        }
        if(!validaOrden())  return;
        globalVars['cambio'] = "dk=true;f9()";
        if(!valCam(qvalMAN))  return;
  
        if(!validaPreF7())  return;

        if(crireq() && dk) {
            try { 
                qzBlq = parseInt(document.forms["fb"].qzBloqueActivo.value, 10); 
            }catch (Exception) { 
                qzBlq = -1; 
            }
    
            try { 
                qzPag = parseInt(findElByName("qzPagina")[qzBlq < 0 ? 0 : qzBlq].value, 10); 
            }catch (Exception) { 
                qzPag = 0; 
            }
            if(qzPag < 0) qzPag = 0;
            findElByName("qzPagina")[qzBlq < 0 ? 0 : qzBlq].value = qzPag + 1;
    
            if(document.forms["fb"]["flagConEspecial"])
                document.forms["fb"]["flagConEspecial"].value = "FALSE";
        
            if(qzBlq > -1 && objCampo.length > 1) {
                for(var i=qzBlq; i<objCampo.length; i++) {
                    findElByName("qzRegistro")[i].value = "1";
                    if(i > qzBlq)  findElByName("qzPagina")[i].value = "1";
                }
            }
            submit("Procesando Consulta Pr&oacute;xima", "FBSCO");
        }
    } else if(document.isjsp != null){
        document.getElementById('jspcode').contentWindow.nextPage();
    }
}

/* Función que se ejecuta cuando se solicita mantenimiento, envía la petición al server.*/
function f12() {
    if(document.getElementById('jspcode') == null) {  
        cerrarWins();
        if(document.forms["fb"]["flagTypeForm"] && document.forms["fb"]["flagTypeForm"].value == "CON") {
            st("FORMULARIO NO PERMITE MANTENIMIENTO, SOLO CONSULTA", false, 1);
            return  true;
        }

        kc = 123; eval(ca); kc = 0; 
  
        try {
            var auxF12 = PreF12();
            if(!auxF12) { 
                st("FORMULARIO NO CUMPLE REQUERIMIENTOS DE MANTENIMIENTO: PRE-F12", false, 1);
                return; 
            }else if(auxF12.length > 1) { 
                st(auxF12, false, 1);
                return; 
            }    //publica mensaje enviado
        } catch (Exception) { }

        if(camreq() && dk) {
            if(qF7a == "CON")  qF7a = "GO";
            f7aWin();
            globalVars['F12'] = '1';
            if(qzPF12)  globalVars["postMAN"] = true;
    
            submit("Procesando Mantenimiento", "FBSMA");
        }
    } else if(document.isjsp != null){
        document.getElementById('jspcode').contentWindow.mantenimiento();
    }
}

function fin() {
    if(dk) {
        st("Generando Formulario", true, 0);
        try { document.getElementById("pt").focus(); } catch(e) {}
        parametros = "";
        for(var i=0; i<document.forms["fb"].length; i++) {
            parametros += document.forms["fb"][i].name + "=" + document.forms["fb"][i].value + "&";
        }
        parametros = "FBSGF?" + parametros;
        st("FORMULARIO GENERADO", false, 0);
        ventana = window.open(parametros, "FBSGF", "width=563,height=400,status,scrollbars,resizable,menubar");
        self.onfocus = ventana.focus;
    }
}

function upload() {
    if(dk){
        //submit("Subiendo Formulario", "FBSUP");
        document.forms["fb"].action = "FBSUP" + obtieneSesion();
        document.forms["fb"].target = "fi";
        document.forms["fb"].submit();
        cargaDate();
        callGclock();
        try { document.getElementById("pt").focus(); } catch(e) { }
    }
}

function submit(a, b, c) {
    st(a, true);
    document.forms["fb"].action = b+obtieneSesion();
    document.forms["fb"].target = c ? c : "fi";
    //document.forms["fb"].onsubmit = "return true;";
    /*document.forms["fb"].submit();*/
    new Ajax.Request(
        b + obtieneSesion(),
        {
            method: 'post',
            parameters: Form.serialize(document.forms["fb"]),
            onComplete: mo
        }
        );
    //document.forms["fb"].onsubmit = "return false;";
    cargaDate();
    callGclock();
    try { document.getElementById("pt").focus(); } catch(e) { }
}

/*
 * Función que efectua la llamada a forma que recibe parametros para reportes pdf.
 * Parametro 1 Bloque, el bloque en donde se encuentra la fila a clonar
 * Parametro 2 Fila del bloque que se clonará, debe ser la ultima de la de multiregistro
 */
function paramsPdf(bloque,fila) {
    window.open("FBSPDFPA?bloque=" + bloque + "&fila=" + fila, "", "width=300,height=170,top=50,left=50");   
}

function validaPreF7() {
    try {
        var auxF7 = PreF7();
        if(!auxF7) {
            st("FORMULARIO NO CUMPLE REQUERIMIENTOS DE CONSULTA", false, 1);
            return false;
        }else if(auxF7.length > 1) {
            st(auxF7, false, 1);    //publica mensaje enviado
            return  false;
        }
    } catch(Exception) { }
    return  true;
}

function validaPreF12() {
    try {
        var auxF12 = PreF12();
        if(!auxF12) {
            st("FORMULARIO NO CUMPLE REQUERIMIENTOS DE MANTENIMIENTO", false, 1);
            return  false;
        }else if(auxF12.length > 1) {
            st(auxF12, false, 1);    //publica mensaje enviado
            return  false;
        }
    } catch(Exception) { }
    return  true;
}

function validaOrden() {
    try {
        if(qGruposOrden != null && qGruposOrden != "") {
            var ordenGrupo = split(qGruposOrden, "|");
            var auxCO = "";
            for(var i=0; i<ordenGrupo.length; i++) {
                auxCO = checkOrden(ordenGrupo[i]);
                if(auxCO.length > 1) {
                    st(auxCO, false, 1);    //Publica Error en campos de Orden
                    return  false;
                }
            }
        }
    }catch(Exception) { }
    return  true;
}

// Alias de teclas para tener nombres genéricos

consultar = function(pagina) {
    switch(pagina) {
        case -1:  f8();  break;
        case  0:  f7();  break;
        case  1:  f9();  break;
    }
};
mantener = function() { f12() };
limpiar  = function() { f2()  };