Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re: Multiple records fetches issue using DBD::ODBC in Perl

by clueless newbie (Curate)
on Apr 18, 2020 at 22:04 UTC ( #11115751=note: print w/replies, xml ) Need Help??


in reply to Multiple records fetches issue using DBD::ODBC in Perl

Turn on tracing by setting DBI_TRACE via

set DBI_TRACE=1

then run the script and report the results.

Replies are listed 'Best First'.
Re^2: Multiple records fetches issue using DBD::ODBC in Perl
by maria80e (Novice) on Apr 20, 2020 at 06:14 UTC

    I enabled set DBI TRACE=1. Please find the below TRACE log.

    LOG:-

    DBI 1.636-ithread default trace level set to 0x0/1 (pid 11108 pi 7c2ff +4) at DBI.pm line 296 via test_dbi.pl line 2 Trying to connect -> DBI->connect(dbi:ODBC:DSN=sql_test, **, ****) -> DBI->install_driver(ODBC) for MSWin32 perl=5.024000 pid=11108 r +uid=0 euid =0 install_driver: DBD::ODBC version 1.52 loaded from C:/Perl/lib/ +DBD/ODBC.pm <- install_driver= DBI::dr=HASH(0x1d76c6c) !! The warn '0' was CLEARED by call to connect method <- connect('DSN=sql_test', '**', ...)= ( DBI::db=HASH(0x22ec33c) ) + [1 items] at DBI.pm line 684 info: '' '[Microsoft][ODBC SQL Server Driver][SQL Server]Change +d database context to 'master'. (SQL-01000) [Microsoft][ODBC SQL Server Driver][SQL Server]Changed language settin +g to us_english. (SQL-01000)' (err#0) <- STORE('PrintError', 1)= ( 1 ) [1 items] at DBI.pm line 736 info: '' '[Microsoft][ODBC SQL Server Driver][SQL Server]Change +d database context to 'master'. (SQL-01000) [Microsoft][ODBC SQL Server Driver][SQL Server]Changed language settin +g to us_english. (SQL-01000)' (err#0) <- STORE('AutoCommit', 1)= ( 1 ) [1 items] at DBI.pm line 736 info: '' '[Microsoft][ODBC SQL Server Driver][SQL Server]Change +d database context to 'master'. (SQL-01000) [Microsoft][ODBC SQL Server Driver][SQL Server]Changed language settin +g to us_en glish. (SQL-01000)' (err#0) <- STORE('Username', '**')= ( 1 ) [1 items] at DBI.pm line 739 info: '' '[Microsoft][ODBC SQL Server Driver][SQL Server]Change +d database context to 'master'. (SQL-01000) [Microsoft][ODBC SQL Server Driver][SQL Server]Changed language settin +g to us_english. (SQL-01000)' (err#0) <- connected('dbi:ODBC:DSN=sql_test', '**', ...)= ( undef ) [1 ite +ms] at DBI.pm line 746 <- connect= DBI::db=HASH(0x22ec33c) info: '' '[Microsoft][ODBC SQL Server Driver][SQL Server]Change +d database context to 'master'. (SQL-01000) [Microsoft][ODBC SQL Server Driver][SQL Server]Changed language settin +g to us_english. (SQL-01000)' (err#0) <- STORE('dbi_connect_closure', CODE(0x1d6e5ac))= ( 1 ) [1 items] +at DBI.pmline 755 !! The info '''' was CLEARED by call to prepare method <- prepare('Exec sp_listUsers '25329601','1'')= ( DBI::st=HASH(0x2 +2e969c) ) [1 items] at test_dbi.pl line 16 <- execute= ( -1 ) [1 items] at test_dbi.pl line 18 -1 <- DESTROY(DBI::st=HASH(0x22e9504))= ( undef ) [1 items] at test_d +bi.pl line 20 !! The info '''' was CLEARED by call to disconnect_all method <- disconnect_all= ( '' ) [1 items] at DBI.pm line 763 ()! <- DESTROY(DBI::dr=HASH(0x1d76c6c))= ( undef ) [1 items] during +global destruction ! <- DESTROY(DBI::db=HASH(0x22ec264))= ( undef ) [1 items] during gl +obal destruction

      This is the log resulting from Marshall's example, no? Perhaps we could see the log that results from running the code in your original post?

      Added

      That -1 (from "my $results = $sql->execute();") says that the $sql->execute() didn't "error out."

      Added

      The poster seems to have responded with this post on stackoverflow.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://11115751]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (5)
As of 2022-05-23 12:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (82 votes). Check out past polls.

    Notices?