+ my $statement;
+ if ( driver_name() eq 'Pg' ) {
+ $statement = "DECLARE ".$self->{id}." CURSOR FOR ".$q->{statement};
+ } elsif ( driver_name() eq 'mysql' ) {
+ # build a cursor from scratch
+ $statement = "CREATE TEMPORARY TABLE $self->{id}
+ (rownum INT AUTO_INCREMENT, PRIMARY KEY (rownum))
+ $q->{statement}";
+ }
+
+ my $sth = $dbh->prepare($statement)
+ or die $dbh->errstr;
+ my $bind = 1;