[Cascavel-pm] Duvida STH->execute

[Marco Lima]

Salve !

...

my $sth = $dbh->prepare( qq{ SELECT campo1, campo2
                               FROM teste
                              WHERE datahora >= timestamp '2007-08-01 
00:00:00' - internal '6 hour'
                              ORDER BY datahora
                           } );
$sth->execute( );

my $array_ref = $sth->fetchall_arrayref();

$sth->finish( );

$sth= $dbh->prepare( qq{ UPDATE tabela1
                            SET teste='33333'
                          WHERE id= ?
                            AND datahora= ?
                       } );

foreach my $row ( @$array_ref ) { 
    $sth->execute ( @$row );
    warn "Problema ao processar os resultados", $sth->errstr( ), "\n" if 
$sth->err( );
}

$dbh->disconnect();


Patty Silva escreveu:
> Ola Pessoal..
> fiz um programa na seguinte estrutura:
>
>
> $sql=qq{SELECT * from teste where datahora>=timestamp '2007-08-01 
> 00:00:00' - interval '6 hour' order by datahora};
>             
> $sth = $dbh->prepare($sql) || die $DBI::errstr;
> $sth->execute || die $DBI::errstr;
>            
>
> while(@row = $sth->fetchrow_array()) 
> {
>
> $sql="UPDATE tabela1 set teste='33333' where id='$row[1]' and 
> datahora='$row[2]'";
> $sth = $dbh->prepare($sql) || die $DBI::errstr;
> $sth->execute || die $DBI::errstr;
>  warn "Problema ao processar os resultados", $sth->errstr( ), "\n" if 
> $sth->err( );
> $sth->finish();
>
> }
>  }
>            
>  warn "Problema ao processar os resultados", $sth->errstr( ), "\n" if 
> $sth->err( );
> $sth->finish();
>
>
>
> Eu faco dois execute, minha duvida é.. eu posso colocar os dois como 
> $sth.. pois se eu coloco os dois como $sth da esse erro:
>
> DBD::Pg::st fetchrow_array failed: no statement executing
> Problema ao processar os resultadosno statement executing
>
> Se eu coloco $sth2 nao da erro nenhum..
>
> Alguem pode me explicar??
>
> Obrigada
>
>
>
>
>
> Alertas do Yahoo! Mail em seu celular. Saiba mais 
> <http://br.mobile.yahoo.com/mailalertas/>.
>
> ------------------------------------------------------------------------
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm