my @rs; #result set
do {
while( my $hr = $sth->fetchrow_hashref ){ push @rs, $hr; }
#process @rs (array of hashrefs in order the server returned them )
} while ( $sth->{odbc_more_results} );