Ver Tema

Otacon · 2011-12-18 17:19 @763

Cordial saludo.

Me pasa lo siguiente: hago una consulta de una base de datos y la imprimo en un div. Además le pongo una lista de checkbox para quitar y poner un registro de la consulta pero lo que quiero es que esa lista yo la pueda manejar con hash, y como llave, el primer parámetro de la lista y los datos los pueda manejar como una variable global porque no puedo manipular la base de datos si no en el script como tal.

En el div regional llamo todo la información en otras funciones de Ajax pero cuando entro a otra función se pierde la variable. Es como si se declarara como local o como si se reinicia la variable y volviera al inicio.

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

print $pjx->build_html( $cgi, \&mostrar_formulario );
#Imprime toda la página html
mostrar_formulario{
        my $html = "
        $form
        $textoPagina
 
        <BODY>
        <script language=\"JavaScript\" type=\"text/javascript\">
 
                function adicionarlista(){
                        var x;
                        var checkboxes = document.getElementById(\"formcsv\").checkbox;
                        document.form2.lista.value = '';
                        for (x=0; x < checkboxes.length; x++) {
                                if (checkboxes[x].checked) {
                                        document.form2.lista.value += checkboxes[x].value ;
                                        document.form2.lista.value += ',';
                                }
                        }
                        document.form2.lista.value = document.form2.lista.value.substring(0,document.form2.lista.value.length-1);
                }
                function cambiarnotificacion(){
                        var x;
                        oItems = document.getElementsByName(\"notificacion\");
                        
                        for (x=0; x < oItems.length; x++){
                            if(document.form2.chkinf.checked){
                                oItems[x].value = document.form2.notificaciones.value;
                            }
                            else{
                                oItems[x].value = '';
                            }
                            
                        }
                }
                function cargando(resultdiv){
                    
                    var div1 = document.getElementById(resultdiv);
                    div1.innerHTML =\"<center><img src = /imagenes/cargando.gif/></center>\";
                }
                function cambio_opcion(formulario){
                    formulario.opcion.value =\"2\";
                    formulario.submit();
                }
 
        </script>
        
        <form name=\"form2\" id =\"formcsv\" method=\"post\" action =\"nDesp_avantel.pl\"> 
                <table border =\"0\" align=\"center\" class=\"tabla\">
                        <tr>
                                <td>
                                        Compa&ntilde;ia :                       
                                    <select name=\"compania\"id=\"compania\"
                                    onChange =\"buscar_regional(['compania','rol','idUsuario'],['divregional']);\"
                                    onBlur =\"buscar_regional(['compania','rol','idUsuario'],['divregional']);\">
                                            <option value =  selected></option>\n
                                            <option value =  ></option>\n
                                    </select>
                                </td>                           
                                <td>
                                <input type=\"hidden\" name =\"rol\" id=\"rol\" value =\"$rol\">                                
                                <input type=\"hidden\" name =\"idUsuario\" id=\"idUsuario\" value =\"$idUsuario\">
                                </td>
                        </tr>";
 
                $html .= "<tr>
                            <td colspan =\"3\">
                                <div id=\"divregional\">
                            </td>
                        </tr>
                        
                        <tr>\n";
                        
 
                
        $html .= "                     
                                             
                        
                </tr>
                </table>
                
                <br>
            <div id = \"divdespachos\" ></div>";
        $html .= "      
        <br>
        ";
        $html .= "<div id=\"divnone\"></div>\n
        </form>
        </body>
        </html>";
        return $html;
}
sub buscar_regional{
 #consulto la base de datos
#guardo información con un hash con la llave de llave primaria de la consulta de la #base de datos
}
sub actualizar{
#modifico la información que se ha seleccionado con los checkbox de la función de #javascript de adicionarlista en la variable lista y lo cargo en el div de regional 
}
 

explorer · 2011-12-18 17:55 @788

Bienvenido a los foros de Perl en español, Otacon.

Quizás has definido la variable JavaScript dentro de una función. En ese caso, es local a esa función.

Si quieres que sea global, deberás declararla fuera de cualquier función (o, que es lo mismo, declarar una variable sin usar 'var').

Otacon · 2011-12-18 18:50 @826

Cordial saludo.

Gracias por tu pronta respuesta. Lo que pasa es que la declaro así,
y las librerías que utilizo son estas:

Syntax: [ Download ] [ Hide ]

Using perl Syntax Highlighting

use strict;
use CGI;
use CGI::Ajax;
use DBI;
my %lista;#esta es la variable que cuando actualizo una información no guarda la #información

¿O como me recomendarías para manejarlo un poco mejor, la información?

Saludos

explorer · 2011-12-19 07:53 @370

¡Ah! Lo había entendido mal. Creí que te referías al código JavaScript, del lado del cliente, y tu te refieres a una variable del lado del servidor.

El problema es que el servidor ejecuta, entrega el resultado al cliente y termina el proceso. Toda información de las variables, se pierde.

Una solución es la de volver a hacer las peticiones a la base de datos otra vez, cada vez que venga una petición del exterior.

Otra solución es la almacenar la información de las variables en el disco del servidor, para que sean recuperados en la siguiente ejecución. A eso se llama serialización.

En Perl hay muchas soluciones para eso. Uno de los más utilizados es el Cache::Cache, que permite almacenar la información junto con un tiempo de expiración, lo cual es ideal en ambientes web, como el que comentas.

Otacon · 2011-12-20 12:56 @580

Ok, gracias voy a implementarlo con un post con el llamado del mismo script y si algo utilizaré el paquete cache::cache.

Publicidad

Socializa