while($sth->odbc_more_results) {
  print "Restore outputs $DBI:errstr \n";
}

##</code><code>##

my $sth = $db->prepare( $sql, { odbc_exec_direct => 1})