Hello,
I have not used DBD::ODBC, but i have done quite a bit of work with ither DBD drivers. In looking at the trace info provided, it appears that the fetchrow_array() call returns SQLFetch rc of 0 once, and returns data :

-> fetchrow_array for DBD::ODBC::st (DBI::st=HASH(0x1cabf7c)~0x1cabf34
+)
SQLFetch rc 0
dbih_setup_fbav for 3 fields => 0x1cabef8
fetch num_fields=3
<- fetchrow_array= ( '89959' '11097840' '1237' ) 3 items at tkttest.pl
+ line 24.
[download]

But, the next call gets a SQLFetch rc of 100 (an error of some sort), which exists the whil loop and calls the standard DESTROY method because $sth is no longer referenced. Assuming this is just an unlucky circumstance in DBD::ODBC's xs code (which is what i would guess), adding $sth->finish() after the while loop may cause explisit object destruction and fix the error ... just a guess.

---

Calm begets calm