Perl en Español

  1. Home
  2. Tutoriales
  3. Foro
  4. Artículos
  5. Donativos
  6. Publicidad
 

Error al ejecutar query anidado

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Básico
Mensaje Mie Jul 09, 2008 11:15 am
teco000
Perlero Nuevo
Perlero Nuevo
Registrado: 29 May 2008
Mensajes: 33
Ubicación: Guatemala
Error al ejecutar query anidado Responder citando

Saludos, me pueden ayudar, estoy ejecutando un query, al momento de correrlo en la consola sí me funciona pero en el programa me da el siguiente error:

Código:
Can't locate object method "fetchrow" via package "select sum(diferencia)as diferencia from( select distinct flectura, contador,lecturant,lectura, lectura-lecturant as diferencia , fechasis from lectura where flectura ='20080701'order by fechasis desc) as general" (perhaps you forgot to load "select sum(diferencia)as diferencia from( select distinct flectura, contador,lecturant,lectura, lectura-lecturant as diferencia , fechasis from lectura where flectura ='20080701'order by fechasis desc) as general"?)


El query es el siguiente:

SQL:
SELECT sum(diferencia)AS diferencia FROM( SELECT DISTINCT flectura, contador,lecturant,lectura, lectura-lecturant AS diferencia , fechasis FROM lectura WHERE flectura ='20080701'ORDER BY fechasis DESC) AS general


¿En qué estoy cometiendo el error?
Mensaje Mie Jul 09, 2008 11:25 am
explorer
Moderador
Moderador
Registrado: 24 Jul 2005
Mensajes: 4140
Ubicación: Valladolid, España
Responder citando

¿Y dónde está la línea del código que hace esa consulta?

Por de pronto, veo que falta un espacio delante de 'ORDER', pero no creo que ese sea el error.
Mensaje Mie Jul 09, 2008 11:28 am
teco000
Perlero Nuevo
Perlero Nuevo
Registrado: 29 May 2008
Mensajes: 33
Ubicación: Guatemala
Responder citando

Perdón, mando el código.

Perl:
my $query2= "select sum(diferencia)as diferencia from( select distinct flectura, contador,lecturant,lectura, lectura-lecturant as diferencia , fechasis from lectura where flectura ='20080701'order by fechasis desc) as general";
my $sth = $db->prepare($query2) or die "ERROR prepare\n";
$sth->execute() or die ;
@row = $query2->fetchrow();     
$total_ingresados=$row[0];
Mensaje Mie Jul 09, 2008 11:53 am
explorer
Moderador
Moderador
Registrado: 24 Jul 2005
Mensajes: 4140
Ubicación: Valladolid, España
Responder citando

La línea
Perl:
@row = $query2->fetchrow();

debería ser
Perl:
@row = $sth->fetchrow();
Mensaje Mie Jul 09, 2008 12:03 pm
teco000
Perlero Nuevo
Perlero Nuevo
Registrado: 29 May 2008
Mensajes: 33
Ubicación: Guatemala
Responder citando

Gracias, explorer.
Publicar nuevo tema   Responder al tema    Foros de discusión -> Básico Todas las horas son GMT - 6 Horas
Página 1 de 1



Powered by phpBB © 2001, 2005 phpBB Group