-> prepare for DBD::Sybase::db (DBI::db=HASH(0x80a2974)~0x80a28e4 'declare @skiprows int, @getrows int; select @skiprows = 0; select @getrows = 10000; set rowcount @skiprows; select * into #debt from debt order by debt_id, debt_no asc; set rowcount @getrows;select * from debt where (debt_id NOT IN ( select * from #debt ) ) ORDER BY debt_id, debt_no ASC') thr#804d1a0
    syb_st_prepare() -> inUse = 0
    syb_st_prepare() -> set inUse
    <- prepare= ( DBI::st=HASH(0x80b2884) ) [1 items] at export_debt.pl line 52
    -> errstr in DBD::_::common for DBD::Sybase::db (DBI::db=HASH(0x80a2974)~0x80a28e4) thr#804d1a0
    <- errstr= ( '' ) [1 items] at export_debt.pl line 63
err
$VAR1 = '';
    -> FIRSTKEY in DBD::_::common for DBD::Sybase::st (DBI::st=HASH(0x80a2a24)~INNER) thr#804d1a0
    <- FIRSTKEY= ( undef ) [1 items] at Dumper.pm line 232 via  at Dumper.pm line 604

##</code><code>##

 my $getrows = 10000;
 my $skiprows = 0;
 my $i = 0;


$db->{dbh}->trace(3);

 my $query = $db->{dbh}->prepare( "declare \@skiprows int, \@getrows int;     " .
"select \@skiprows = $skiprows; " .
 "select \@getrows = $getrows; " .
 "set rowcount \@skiprows; " .
 "select * into #debt from debt " .
 "order by debt_id, debt_no asc; " .
 "set rowcount \@getrows;" .
 "select * from debt where " .
 "(debt_id NOT IN ( select * from #debt ) ) " .
 "ORDER BY debt_id, debt_no ASC" );

print STDERR "err\n", Dumper( $db->{dbh}->errstr );
print STDERR "query\n", Dumper($query);