Hi,
Please see the output with trace level 9 and using the function fetchrow().
Thanks
Abi.

output.err
==========
    DBI 1.20-nothread dispatch trace level set to 9
    Note: perl is running without the recommended perl -w option
install_method DBI::db::errstr  , flags 0x4
install_method DBI::db::debug       usage: min 1, max 2, '[$debug_level]', tl 
0
, flags 0x5
install_method DBI::db::CLEAR   , flags 0x4
install_method DBI::db::err     , flags 0x4
install_method DBI::db::disconnect          usage: min 1, max 1, '', tl 0
, flags 0x1
install_method DBI::db::get_info            usage: min 2, max 2, '', tl 0
, flags 0x1
install_method DBI::db::primary_key         usage: min 4, max 5, '$catalog, 
$schema, $table [, \%attr ]', tl 0
, flags 0x1
install_method DBI::db::STORE   , flags 0x10
install_method DBI::db::quote       usage: min 2, max 3, '$string [, 
$data_type ]', tl 0
, flags 0x31
install_method DBI::db::FIRSTKEY        , flags 0x4
install_method DBI::db::table_info          usage: min 1, max 6, '$catalog, 
$schema, $table, $type [, \%attr ]', tl 0
, flags 0x1
install_method DBI::db::selectrow_arrayref          usage: min 2, max 0, 
'$statement [, \%attr [, @bind_params ] ]', tl 0
, flags 0x1
install_method DBI::db::do          usage: min 2, max 0, '$statement [, \%attr [, 
@bind_params ] ]', tl 0
, flags 0x1
install_method DBI::db::private_data        usage: min 1, max 1, '', tl 0
, flags 0x5
install_method DBI::db::trace_msg           usage: min 2, max 3, '$message_text [, 
$min_level ]', tl 8
, flags 0x5
install_method DBI::db::selectrow_hashref           usage: min 2, max 0, 
'$statement [, \%attr [, @bind_params ] ]', tl 0
, flags 0x1
install_method DBI::db::selectall_hashref           usage: min 2, max 0, 
'$statement [, \%attr [, @bind_params ] ]', tl 0
, flags 0x1
install_method DBI::db::tables      usage: min 1, max 6, '$catalog, $schema, 
$table, $type [, \%attr ]', tl 0
, flags 0x1
install_method DBI::db::handler     usage: min 2, max 2, '\&handler', tl 0
, flags 0x1
install_method DBI::db::EXISTS  , flags 0x4
install_method DBI::db::state       usage: min 1, max 1, '', tl 0
, flags 0x5
install_method DBI::db::_not_impl
install_method DBI::db::event       usage: min 2, max 0, '$type, @args', tl 0
, flags 0x5
install_method DBI::db::type_info_all       usage: min 1, max 1, '', tl 0
, flags 0x1
install_method DBI::db::prepare_cached      usage: min 2, max 4, '$statement 
[, \%attr [, $allow_active ] ]', tl 0
, flags 0x1
install_method DBI::db::begin_work          usage: min 1, max 2, '[ \%attr ]', tl 
0
, flags 0x1
install_method DBI::db::NEXTKEY , flags 0x4
install_method DBI::db::commit      usage: min 1, max 1, '', tl 0
, flags 0x81
install_method DBI::db::FETCH   , flags 0x4
install_method DBI::db::DESTROY
install_method DBI::db::rollback            usage: min 1, max 1, '', tl 0
, flags 0x81
install_method DBI::db::rows    , flags 0x4
install_method DBI::db::func    , flags 0x6
install_method DBI::db::type_info           usage: min 1, max 2, '', tl 0
, flags 0x1
install_method DBI::db::ping        usage: min 1, max 1, '', tl 0
, flags 0x1
install_method DBI::db::prepare     usage: min 2, max 3, '$statement [, 
\%attr]', tl 0
, flags 0x1
install_method DBI::db::trace       usage: min 1, max 3, '[$trace_level, 
[$filename]]', tl 0
, flags 0x5
install_method DBI::db::selectall_arrayref          usage: min 2, max 0, 
'$statement [, \%attr [, @bind_params ] ]', tl 0
, flags 0x1
install_method DBI::db::selectrow_array     usage: min 2, max 0, '$statement 
[, \%attr [, @bind_params ] ]', tl 0
, flags 0x1
install_method DBI::db::primary_key_info            usage: min 4, max 5, '$catalog, 
$schema, $table [, \%attr ]', tl 0
, flags 0x1
install_method DBI::db::selectcol_arrayref          usage: min 2, max 0, 
'$statement [, \%attr [, @bind_params ] ]', tl 0
, flags 0x1
install_method DBI::dr::connect_cached      usage: min 1, max 5, '[$db 
[,$user [,$passwd [,\%attr]]]]', tl 0
, flags 0x1
install_method DBI::dr::errstr  , flags 0x4
install_method DBI::dr::disconnect_all      usage: min 1, max 1, '', tl 0
, flags 0x1
install_method DBI::dr::debug       usage: min 1, max 2, '[$debug_level]', tl 
0
, flags 0x5
install_method DBI::dr::CLEAR   , flags 0x4
install_method DBI::dr::err     , flags 0x4
install_method DBI::dr::STORE   , flags 0x10
install_method DBI::dr::FIRSTKEY        , flags 0x4
install_method DBI::dr::private_data        usage: min 1, max 1, '', tl 0
, flags 0x5
install_method DBI::dr::trace_msg           usage: min 2, max 3, '$message_text [, 
$min_level ]', tl 8
, flags 0x5
install_method DBI::dr::data_sources        usage: min 1, max 2, '[\%attr]', tl 
0
, flags 0x1
install_method DBI::dr::EXISTS  , flags 0x4
install_method DBI::dr::state       usage: min 1, max 1, '', tl 0
, flags 0x5
install_method DBI::dr::_not_impl
install_method DBI::dr::event       usage: min 2, max 0, '$type, @args', tl 0
, flags 0x5
install_method DBI::dr::default_user        usage: min 3, max 4, '$user, $pass 
[, \%attr]', tl 0
, flags 0x1
install_method DBI::dr::NEXTKEY , flags 0x4
install_method DBI::dr::FETCH   , flags 0x4
install_method DBI::dr::DESTROY
install_method DBI::dr::connect     usage: min 1, max 5, '[$db [,$user 
[,$passwd [,\%attr]]]]', tl 0
, flags 0x1
install_method DBI::dr::func    , flags 0x6
install_method DBI::dr::trace       usage: min 1, max 3, '[$trace_level, 
[$filename]]', tl 0
, flags 0x5
install_method DBI::st::fetchrow_array
install_method DBI::st::errstr  , flags 0x4
install_method DBI::st::fetchrow
install_method DBI::st::debug       usage: min 1, max 2, '[$debug_level]', tl 
0
, flags 0x5
install_method DBI::st::CLEAR   , flags 0x4
install_method DBI::st::err     , flags 0x4
install_method DBI::st::fetch
install_method DBI::st::STORE   , flags 0x10
install_method DBI::st::FIRSTKEY        , flags 0x4
install_method DBI::st::execute     usage: min 1, max 0, '[@args]', tl 0
, flags 0x41
install_method DBI::st::private_data        usage: min 1, max 1, '', tl 0
, flags 0x5
install_method DBI::st::trace_msg           usage: min 2, max 3, '$message_text [, 
$min_level ]', tl 8
, flags 0x5
install_method DBI::st::blob_copy_to_file           usage: min 3, max 3, '$field, 
$filename_or_handleref', tl 0
, flags 0x1
install_method DBI::st::bind_columns        usage: min 2, max 0, '\$var1 [, 
\$var2, ...]', tl 0
, flags 0x1
install_method DBI::st::fetchrow_arrayref
install_method DBI::st::_get_fbav
install_method DBI::st::EXISTS  , flags 0x4
install_method DBI::st::_not_impl
install_method DBI::st::state       usage: min 1, max 1, '', tl 0
, flags 0x5
install_method DBI::st::finish      usage: min 1, max 1, '', tl 0
, flags 0x1
install_method DBI::st::fetchrow_hashref
install_method DBI::st::event       usage: min 2, max 0, '$type, @args', tl 0
, flags 0x5
install_method DBI::st::fetchall_hashref            usage: min 2, max 2, '', tl 0
, flags 0x1
install_method DBI::st::more_results        usage: min 1, max 1, '', tl 0
, flags 0x1
install_method DBI::st::cancel      usage: min 1, max 1, '', tl 0
, flags 0x1
install_method DBI::st::dump_results        usage: min 1, max 5, '$maxfieldlen, 
$linesep, $fieldsep, $filehandle', tl 0
, flags 0x1
install_method DBI::st::NEXTKEY , flags 0x4
install_method DBI::st::_set_fbav       , flags 0x0
install_method DBI::st::DESTROY
install_method DBI::st::FETCH   , flags 0x4
install_method DBI::st::rows    , flags 0x4
install_method DBI::st::func    , flags 0x6
install_method DBI::st::bind_param          usage: min 3, max 4, '$parameter, 
$var [, \%attr]', tl 0
, flags 0x1
install_method DBI::st::trace       usage: min 1, max 3, '[$trace_level, 
[$filename]]', tl 0
, flags 0x5
install_method DBI::st::blob_read           usage: min 4, max 5, '$field, $offset, 
$len [, \$buf [, $bufoffset]]', tl 0
, flags 0x1
install_method DBI::st::bind_col            usage: min 3, max 4, '$column, \$var [, 
\%attr]', tl 0
, flags 0x1
install_method DBI::st::bind_param_inout            usage: min 4, max 5, 
'$parameter, \$var, $maxlen, [, \%attr]', tl 0
, flags 0x1
install_method DBI::st::fetchall_arrayref           usage: min 1, max 2, '', tl 0
, flags 0x1
    -> 
DBI->connect(dbi:ODBC:DSN=TESTDB;Database=xxxxx;uid=usrxxxxx;pwd=xxxxx, , 
****, HASH(0x14f2b4))
    -> DBI->install_driver(ODBC) for solaris perl=5.00404 pid=2733 ruid=1007 
euid=1007
       install_driver: DBD::ODBC version 0.31 loaded from 
blib/lib/DBD/ODBC.pm
    New DBI::dr (for DBD::ODBC::dr, parent=, id=)
    dbih_setup_handle(DBI::dr=HASH(0x177594)=>DBI::dr=HASH(0x1d31b8), 
DBD::ODBC::dr, 0, Null!)
    dbih_make_com(Null!, DBD::ODBC::dr, 92)
    dbih_setup_attrib(DBI::dr=HASH(0x1d31b8), Err, Null!) SCALAR(0x149fbc) 
(already defined)
    dbih_setup_attrib(DBI::dr=HASH(0x1d31b8), State, Null!) SCALAR(0x149f74) 
(already defined)
    dbih_setup_attrib(DBI::dr=HASH(0x1d31b8), Errstr, Null!) 
SCALAR(0x149f98) (already defined)
    dbih_setup_attrib(DBI::dr=HASH(0x1d31b8), Handlers, Null!) 
ARRAY(0x1d30ec) (already defined)
    dbih_setup_attrib(DBI::dr=HASH(0x1d31b8), Debug, Null!) 0 (already 
defined)
    dbih_setup_attrib(DBI::dr=HASH(0x1d31b8), FetchHashKeyName, Null!) 
'NAME' (already defined)
    <- install_driver= DBI::dr=HASH(0x177594)
    >> default_user DISPATCH (DBI::dr=HASH(0x177594) rc1/3 @4 g1 a1c4d28) at 
/export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 422
    -> default_user in DBD::_::dr for DBD::ODBC::dr 
(DBI::dr=HASH(0x177594)~0x1d31b8 undef undef HASH(0x14f260))
    <- default_user= ( undef undef ) [2 items] at 
/export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 422
    >> connect     DISPATCH (DBI::dr=HASH(0x177594) rc1/3 @5 g0 a1c4e68) at 
/export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 425
    -> connect for DBD::ODBC::dr (DBI::dr=HASH(0x177594)~0x1d31b8 
'DSN=TESTDB;Database=xxxxx;uid=usrxxxxx;pwd=xxxxx' undef **** 
HASH(0x14f260))
    New DBI::db (for DBD::ODBC::db, parent=DBI::dr=HASH(0x1d31b8), id=)
    dbih_setup_handle(DBI::db=HASH(0x1d311c)=>DBI::db=HASH(0x1d3098), 
DBD::ODBC::db, 1773a4, Null!)
    dbih_make_com(DBI::dr=HASH(0x1d31b8), DBD::ODBC::db, 116)
    dbih_setup_attrib(DBI::db=HASH(0x1d3098), Err, DBI::dr=HASH(0x1d31b8)) 
SCALAR(0x149fbc) (already defined)
    dbih_setup_attrib(DBI::db=HASH(0x1d3098), State, DBI::dr=HASH(0x1d31b8)) 
SCALAR(0x149f74) (already defined)
    dbih_setup_attrib(DBI::db=HASH(0x1d3098), Errstr, 
DBI::dr=HASH(0x1d31b8)) SCALAR(0x149f98) (already defined)
    dbih_setup_attrib(DBI::db=HASH(0x1d3098), Handlers, 
DBI::dr=HASH(0x1d31b8)) ARRAY(0x1d30ec) (already defined)
    dbih_setup_attrib(DBI::db=HASH(0x1d3098), Debug, DBI::dr=HASH(0x1d31b8)) 
0 (already defined)
    dbih_setup_attrib(DBI::db=HASH(0x1d3098), FetchHashKeyName, 
DBI::dr=HASH(0x1d31b8)) 'NAME' (already defined)
Driver connect 'DSN=TESTDB;Database=xxxxx;uid=usrxxxxx;pwd=xxxxx', '', ''
    <- connect= DBI::db=HASH(0x1d311c) at 
/export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 425
    >> STORE       DISPATCH (DBI::db=HASH(0x1d3098) rc2/1 @3 g0 a1bfbe8) at 
/export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 450
    -> STORE for DBD::ODBC::db (DBI::db=HASH(0x1d3098)~INNER 'RaiseError' 1)
    STORE DBI::db=HASH(0x1d3098) 'RaiseError' => 1
    <- STORE= 1 at /export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 450
    >> STORE       DISPATCH (DBI::db=HASH(0x1d3098) rc2/1 @3 g0 a1bfbe8) at 
/export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 450
    -> STORE for DBD::ODBC::db (DBI::db=HASH(0x1d3098)~INNER 'PrintError' 1)
    STORE DBI::db=HASH(0x1d3098) 'PrintError' => 1
    <- STORE= 1 at /export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 450
    >> STORE       DISPATCH (DBI::db=HASH(0x1d3098) rc2/1 @3 g0 a1bfbe8) at 
/export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 450
    -> STORE for DBD::ODBC::db (DBI::db=HASH(0x1d3098)~INNER 'AutoCommit' 1)
    <- STORE= 1 at /export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 450
    <- connect= DBI::db=HASH(0x1d311c)
    >> prepare     DISPATCH (DBI::db=HASH(0x1d311c) rc1/1 @2 g1 a1c1648) at 
x.pl line 15
    -> prepare for DBD::ODBC::db (DBI::db=HASH(0x1d311c)~0x1d3098 'select 
emp_id, emp_name, address1, address2 from employee where emp_id = 2
           select emp_id from employee where emp_id = 2')
    New DBI::st (for DBD::ODBC::st, parent=DBI::db=HASH(0x1d3098), id=)
    dbih_setup_handle(DBI::st=HASH(0x1d3158)=>DBI::st=HASH(0x14f260), 
DBD::ODBC::st, 1d3164, Null!)
    dbih_make_com(DBI::db=HASH(0x1d3098), DBD::ODBC::st, 196)
    dbih_setup_attrib(DBI::st=HASH(0x14f260), Err, DBI::db=HASH(0x1d3098)) 
SCALAR(0x149fbc) (already defined)
    dbih_setup_attrib(DBI::st=HASH(0x14f260), State, DBI::db=HASH(0x1d3098)) 
SCALAR(0x149f74) (already defined)
    dbih_setup_attrib(DBI::st=HASH(0x14f260), Errstr, 
DBI::db=HASH(0x1d3098)) SCALAR(0x149f98) (already defined)
    dbih_setup_attrib(DBI::st=HASH(0x14f260), Handlers, 
DBI::db=HASH(0x1d3098)) ARRAY(0x1d30ec) (already defined)
    dbih_setup_attrib(DBI::st=HASH(0x14f260), Debug, DBI::db=HASH(0x1d3098)) 
0 (already defined)
    dbih_setup_attrib(DBI::st=HASH(0x14f260), FetchHashKeyName, 
DBI::db=HASH(0x1d3098)) 'NAME' (already defined)
    ignore named placeholders = 0
    dbd_st_prepare'd sql f1918600
        select emp_id, emp_name, address1, address2 from employee where emp_id = 2
           select emp_id from employee where emp_id = 2
    <- prepare= ( DBI::st=HASH(0x1d3158) ) [1 items] at x.pl line 15
    >> execute     DISPATCH (DBI::st=HASH(0x1d3158) rc1/1 @1 g0 a1c7368) at 
x.pl line 16
    -> execute for DBD::ODBC::st (DBI::st=HASH(0x1d3158)~0x14f260)
    dbd_st_execute (outparams = 0)...
    dbd_st_execute (for hstmt 1918600 before)...
    dbd_st_execute (for hstmt 1918600 after)...
    dbd_describe sql 1918600: num_fields=4
      col  1: INTEGER  len=  4 disp= 12, prec= 10 scale=0
      col  2: VARCHAR  len= 36 disp= 36, prec= 35 scale=0
      col  3: VARCHAR  len= 36 disp= 36, prec= 35 scale=0
      col  4: VARCHAR  len= 36 disp= 36, prec= 35 scale=0
      col  1: 'emp_id' sqltype=INTEGER, ctype=SQL_C_CHAR, maxlen=12
      col  2: 'emp_name' sqltype=VARCHAR, ctype=SQL_C_CHAR, maxlen=36
      col  3: 'address1' sqltype=VARCHAR, ctype=SQL_C_CHAR, maxlen=36
      col  4: 'address2' sqltype=VARCHAR, ctype=SQL_C_CHAR, maxlen=36
    <- execute= -1 at x.pl line 16
    >> errstr      DISPATCH (DBI::st=HASH(0x1d3158) rc1/1 @1 g0 a1c7108) at 
x.pl line 17
    -> errstr in DBD::_::common for DBD::ODBC::st 
(DBI::st=HASH(0x1d3158)~0x14f260)
    <- errstr= undef at x.pl line 17
    >> fetchrow    DISPATCH (DBI::st=HASH(0x1d3158) rc1/1 @1 g1 a0) at x.pl 
line 23
    -> fetchrow for DBD::ODBC::st (DBI::st=HASH(0x1d3158)~0x14f260)
       SQLFetch rc 0
    dbih_setup_fbav for 4 fields => 0x1d308c
fetch num_fields=4
fetch col#0 emp_id datalen=1 displ=12
fetch col#1 emp_name datalen=13 displ=36
fetch col#2 address1 datalen=11 displ=36
fetch col#3 address2 datalen=13 displ=36
    <- fetchrow= ( '2' 'Albert Ringer' 'New & Brews' '577 First St.' ) [4 
items] row1 at x.pl line 23
    >> fetchrow    DISPATCH (DBI::st=HASH(0x1d3158) rc1/1 @1 g1 a0) at x.pl 
line 24
    -> fetchrow for DBD::ODBC::st (DBI::st=HASH(0x1d3158)~0x14f260)
       SQLFetch rc 100
       SQLGetFunctions - supported: 1
    dbd_describe sql 1918600: num_fields=1
      col  1: INTEGER  len=  4 disp= 12, prec= 10 scale=0
      col  1: 'emp_id' sqltype=INTEGER, ctype=SQL_C_CHAR, maxlen=12
    <- fetchrow= ( ) [0 items] row1 at x.pl line 24
    >> FETCH       DISPATCH (DBI::st=HASH(0x14f260) rc2/1 @2 g0 a1c9b08) at 
x.pl line 23
    -> FETCH for DBD::ODBC::st (DBI::st=HASH(0x14f260)~INNER 
'odbc_more_results')
    <- FETCH= 1 at x.pl line 23
    >> fetchrow    DISPATCH (DBI::st=HASH(0x1d3158) rc1/1 @1 g1 a0) at x.pl 
line 23
    -> fetchrow for DBD::ODBC::st (DBI::st=HASH(0x1d3158)~0x14f260)
       SQLFetch rc -1
dbd_error: err_rc=-1 rc=0 s/d/e: 1918600/1917576/1385416
dbd_error: SQL-S1002 (native 0): [OpenLink][ODBC][Driver]Invalid column 
number (SQL-S1002)
dbd_error: err_rc=-1 rc=0 s/d/e: 0/1917576/1385416
dbd_error: err_rc=-1 rc=0 s/d/e: 0/0/1385416
    ERROR EVENT -1 '[OpenLink][ODBC][Driver]Invalid column number 
(SQL-S1002)(DBD: st_fetch/SQLFetch err=-1)' on DBI::st=HASH(0x14f260)
st_fetch/SQLFetch error -1 recorded: [OpenLink][ODBC][Driver]Invalid column 
number (SQL-S1002)(DBD: st_fetch/SQLFetch err=-1)
    !! ERROR: -1 '[OpenLink][ODBC][Driver]Invalid column number 
(SQL-S1002)(DBD: st_fetch/SQLFetch err=-1)'
    <- fetchrow= ( ) [0 items] row1 at x.pl line 23
DBD::ODBC::st fetchrow failed: [OpenLink][ODBC][Driver]Invalid column number 
(SQL-S1002)(DBD: st_fetch/SQLFetch err=-1) at x.pl line 23.
DBD::ODBC::st fetchrow failed: [OpenLink][ODBC][Driver]Invalid column number 
(SQL-S1002)(DBD: st_fetch/SQLFetch err=-1) at x.pl line 23.
    >> DESTROY     DISPATCH (DBI::st=HASH(0x1d3158) rc1/1 @1 g0 a0)
    <> DESTROY ignored for outer handle DBI::st=HASH(0x1d3158) (inner 
DBI::st=HASH(0x14f260))
    >> DESTROY     DISPATCH (DBI::st=HASH(0x14f260) rc1/1 @1 g0 a0)
    -> DESTROY for DBD::ODBC::st (DBI::st=HASH(0x14f260)~INNER)
    <- DESTROY= undef
    dbih_clearcom (h 0x1d3158, com 0x1d9808):
       FLAGS 0x191: COMSET Warn RaiseError PrintError
       TYPE 3
       PARENT DBI::db=HASH(0x1d3098)
       KIDS 0 (0 active)
       IMP_DATA undef in 'DBD::ODBC::st'
       NUM_OF_FIELDS 1
       NUM_OF_PARAMS 0
    dbih_clearcom 0x1d3158 (com 0x1d9808, type 3) done.

    >> DESTROY     DISPATCH (DBI::db=HASH(0x1d311c) rc1/1 @1 g0 a0)
    <> DESTROY ignored for outer handle DBI::db=HASH(0x1d311c) (inner 
DBI::db=HASH(0x1d3098))
    >> DESTROY     DISPATCH (DBI::db=HASH(0x1d3098) rc1/1 @1 g0 a0)
    -> DESTROY for DBD::ODBC::db (DBI::db=HASH(0x1d3098)~INNER)
    <- DESTROY= undef
    dbih_clearcom (h 0x1d311c, com 0x1d4188):
       FLAGS 0x391: COMSET Warn RaiseError PrintError AutoCommit
       TYPE 2
       PARENT DBI::dr=HASH(0x1d31b8)
       KIDS 0 (0 active)
       IMP_DATA undef in 'DBD::ODBC::db'
    dbih_clearcom 0x1d311c (com 0x1d4188, type 2) done.

    -- DBI::END
    >> disconnect_all DISPATCH (DBI::dr=HASH(0x177594) rc1/3 @1 g0 a1b9fe8) 
at /export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 467
    -> disconnect_all for DBD::ODBC::dr (DBI::dr=HASH(0x177594)~0x1d31b8)
    <- disconnect_all= '' at /export/cwd/tmp/odbc/DBI-1.20/DBI.pm line 467
    >> DESTROY     DISPATCH (DBI::dr=HASH(0x1d31b8) rc1/1 @1 g0 a0) during 
global destruction
    -> DESTROY in DBD::_::common for DBD::ODBC::dr 
(DBI::dr=HASH(0x1d31b8)~INNER)
    <- DESTROY= undef during global destruction
    dbih_clearcom (h 0x177594, com 0x131788):
       FLAGS 0x215: COMSET Active Warn AutoCommit
       TYPE 1
       PARENT undef
       KIDS 0 (0 active)
       IMP_DATA undef in 'DBD::ODBC::dr'
    dbih_clearcom 0x177594 (com 0x131788, type 1) done.

    >> DESTROY     DISPATCH (DBI::dr=HASH(0x177594) rc1/1 @1 g0 a0) during 
global destruction
    <> DESTROY for DBI::dr=HASH(0x177594) ignored (inner handle gone)



>From: "Jeff Urlwin" <[EMAIL PROTECTED]>
>To: "Abi Pothen" <[EMAIL PROTECTED]>, <[EMAIL PROTECTED]>, 
><[EMAIL PROTECTED]>
>CC: <[EMAIL PROTECTED]>, <[EMAIL PROTECTED]>
>Subject: RE: Multiple Results in DBD::ODBC 0.31
>Date: Tue, 29 Jan 2002 11:20:40 -0500
>
>Just a thought.
>
>Can you try changing the fetchrow_arrayref to a fetchrow() returning an
>array (and send me the logs)?  Please also set tracing to 9.  
>Unfortunately,
>I don't have a SQL server of any flavor running any more.  I need to set 
>one
>up again...
>
>Thanks,
>
>Jeff
>
> > -----Original Message-----
> > From: Abi Pothen [mailto:[EMAIL PROTECTED]]
> > Sent: Tuesday, January 29, 2002 3:49 PM
> > To: [EMAIL PROTECTED]; [EMAIL PROTECTED]
> > Cc: [EMAIL PROTECTED]; [EMAIL PROTECTED]
> > Subject: RE: Multiple Results in DBD::ODBC 0.31
> >
> >
> > Jeff,
> > Thank you for the reply. I am attaching herewith 3 files.
> > output.err, output.txt, program.pl
> > Thanks,
> > Abi.
> >
> >
> > output.err
> > ==========
> >     DBI 1.20-nothread dispatch trace level set to 4
> >     Note: perl is running without the recommended perl -w option
> >     ->
> > DBI->connect(dbi:ODBC:DSN=TESTDB;Database=xxxxx;uid=usrxxxxx;pwd=xxxxx, 
>,
> > ****, HASH(0x14b6d8))
> >     -> DBI->install_driver(ODBC) for solaris perl=5.00404 pid=29412
> > ruid=1007 euid=1007
> >        install_driver: DBD::ODBC version 0.31 loaded from
> > blib/lib/DBD/ODBC.pm
> >     New DBI::dr (for DBD::ODBC::dr, parent=, id=)
> >     dbih_setup_handle(DBI::dr=HASH(0x17b194)=>DBI::dr=HASH(0x1d1594),
> > DBD::ODBC::dr, 0, Null!)
> >     dbih_make_com(Null!, DBD::ODBC::dr, 92)
> >     <- install_driver= DBI::dr=HASH(0x17b194)
> >     -> default_user in DBD::_::dr for DBD::ODBC::dr
> > (DBI::dr=HASH(0x17b194)~0x1d1594 undef undef HASH(0x14b690))
> >     <- default_user= ( undef undef ) [2 items] at DBI.pm line 422
> >     -> connect for DBD::ODBC::dr (DBI::dr=HASH(0x17b194)~0x1d1594
> > 'DSN=TESTDB;Database=xxxxx;uid=usrxxxxx;pwd=xxxxx' undef ****
> > HASH(0x14b690))
> >     New DBI::db (for DBD::ODBC::db, parent=DBI::dr=HASH(0x1d1594), id=)
> >     dbih_setup_handle(DBI::db=HASH(0x1d14f8)=>DBI::db=HASH(0x1d1480),
> > DBD::ODBC::db, 172fa4, Null!)
> >     dbih_make_com(DBI::dr=HASH(0x1d1594), DBD::ODBC::db, 116)
> > Driver connect 'DSN=TESTDB;Database=xxxxx;uid=usrxxxxx;pwd=xxxxx', '', 
>''
> >     <- connect= DBI::db=HASH(0x1d14f8) at DBI.pm line 425
> >     -> STORE for DBD::ODBC::db (DBI::db=HASH(0x1d1480)~INNER
> > 'RaiseError' 1)
> >     STORE DBI::db=HASH(0x1d1480) 'RaiseError' => 1
> >     <- STORE= 1 at DBI.pm line 450
> >     -> STORE for DBD::ODBC::db (DBI::db=HASH(0x1d1480)~INNER
> > 'PrintError' 1)
> >     STORE DBI::db=HASH(0x1d1480) 'PrintError' => 1
> >     <- STORE= 1 at DBI.pm line 450
> >     -> STORE for DBD::ODBC::db (DBI::db=HASH(0x1d1480)~INNER
> > 'AutoCommit' 1)
> >     <- STORE= 1 at DBI.pm line 450
> >     <- connect= DBI::db=HASH(0x1d14f8)
> >     -> prepare for DBD::ODBC::db (DBI::db=HASH(0x1d14f8)~0x1d1480 
>'select
> > emp_id, emp_name, address1, address2 from employee where emp_id = 2
> >            select emp_id from employee where emp_id = 2')
> >     New DBI::st (for DBD::ODBC::st, parent=DBI::db=HASH(0x1d1480), id=)
> >     dbih_setup_handle(DBI::st=HASH(0x1d1504)=>DBI::st=HASH(0x14b6cc),
> > DBD::ODBC::st, 1d1510, Null!)
> >     dbih_make_com(DBI::db=HASH(0x1d1480), DBD::ODBC::st, 196)
> >     dbd_st_prepare'd sql f1913992
> >     select emp_id, emp_name, address1, address2 from employee
> > where emp_id = 2
> >            select emp_id from employee where emp_id = 2
> >     <- prepare= ( DBI::st=HASH(0x1d1504) ) [1 items] at x.pl line 15
> >     -> execute for DBD::ODBC::st (DBI::st=HASH(0x1d1504)~0x14b6cc)
> >     dbd_st_execute (outparams = 0)...
> >     dbd_st_execute (for hstmt 1913992 before)...
> >     dbd_describe sql 1913992: num_fields=4
> >       col  1: INTEGER  len=  4 disp= 12, prec= 10 scale=0
> >       col  2: VARCHAR  len= 36 disp= 36, prec= 35 scale=0
> >       col  3: VARCHAR  len= 36 disp= 36, prec= 35 scale=0
> >       col  4: VARCHAR  len= 36 disp= 36, prec= 35 scale=0
> >       col  1: 'emp_id' sqltype=INTEGER, ctype=SQL_C_CHAR, maxlen=12
> >       col  2: 'emp_name' sqltype=VARCHAR, ctype=SQL_C_CHAR, maxlen=36
> >       col  3: 'address1' sqltype=VARCHAR, ctype=SQL_C_CHAR, maxlen=36
> >       col  4: 'address2' sqltype=VARCHAR, ctype=SQL_C_CHAR, maxlen=36
> >     <- execute= -1 at x.pl line 16
> >     -> errstr in DBD::_::common for DBD::ODBC::st
> > (DBI::st=HASH(0x1d1504)~0x14b6cc)
> >     <- errstr= undef at x.pl line 17
> >     -> fetchrow_arrayref for DBD::ODBC::st
> > (DBI::st=HASH(0x1d1504)~0x14b6cc)
> >        SQLFetch rc 0
> >     dbih_setup_fbav for 4 fields => 0x1d151c
> > fetch num_fields=4
> > fetch col#0 emp_id datalen=1 displ=12
> > fetch col#1 emp_name datalen=13 displ=36
> > fetch col#2 address1 datalen=11 displ=36
> > fetch col#3 address2 datalen=13 displ=36
> >     <- fetchrow_arrayref= [ '2' 'Albert Ringer' 'New & Brews' '577 First
> > St.' ] row1 at x.pl line 22
> >     -> fetchrow_arrayref for DBD::ODBC::st
> > (DBI::st=HASH(0x1d1504)~0x14b6cc)
> >        SQLFetch rc 100
> >        SQLGetFunctions - supported: 1
> >     dbd_describe sql 1913992: num_fields=1
> >       col  1: INTEGER  len=  4 disp= 12, prec= 10 scale=0
> >       col  1: 'emp_id' sqltype=INTEGER, ctype=SQL_C_CHAR, maxlen=12
> >     <- fetchrow_arrayref= undef row1 at x.pl line 23
> >     -> FETCH for DBD::ODBC::st (DBI::st=HASH(0x14b6cc)~INNER
> > 'odbc_more_results')
> >     <- FETCH= 1 at x.pl line 22
> >     -> fetchrow_arrayref for DBD::ODBC::st
> > (DBI::st=HASH(0x1d1504)~0x14b6cc)
> >        SQLFetch rc -1
> > dbd_error: err_rc=-1 rc=0 s/d/e: 1913992/1912968/1385480
> > dbd_error: SQL-S1002 (native 0): [OpenLink][ODBC][Driver]Invalid column
> > number (SQL-S1002)
> > dbd_error: err_rc=-1 rc=0 s/d/e: 0/1912968/1385480
> > dbd_error: err_rc=-1 rc=0 s/d/e: 0/0/1385480
> >     ERROR EVENT -1 '[OpenLink][ODBC][Driver]Invalid column number
> > (SQL-S1002)(DBD: st_fetch/SQLFetch err=-1)' on DBI::st=HASH(0x14b6cc)
> > st_fetch/SQLFetch error -1 recorded:
> > [OpenLink][ODBC][Driver]Invalid column
> > number (SQL-S1002)(DBD: st_fetch/SQLFetch err=-1)
> >     !! ERROR: -1 '[OpenLink][ODBC][Driver]Invalid column number
> > (SQL-S1002)(DBD: st_fetch/SQLFetch err=-1)'
> >     <- fetchrow_arrayref= undef row1 at x.pl line 22
> > DBD::ODBC::st fetchrow_arrayref failed: [OpenLink][ODBC][Driver]Invalid
> > column number (SQL-S1002)(DBD: st_fetch/SQLFetch err=-1) at x.pl line 
>22.
> > DBD::ODBC::st fetchrow_arrayref failed: [OpenLink][ODBC][Driver]Invalid
> > column number (SQL-S1002)(DBD: st_fetch/SQLFetch err=-1) at x.pl line 
>22.
> >     <> DESTROY ignored for outer handle DBI::st=HASH(0x1d1504) (inner
> > DBI::st=HASH(0x14b6cc))
> >     -> DESTROY for DBD::ODBC::st (DBI::st=HASH(0x14b6cc)~INNER)
> >     <- DESTROY= undef
> >     dbih_clearcom 0x1d1504 (com 0x1d9008, type 3) done.
> >
> >     <> DESTROY ignored for outer handle DBI::db=HASH(0x1d14f8) (inner
> > DBI::db=HASH(0x1d1480))
> >     -> DESTROY for DBD::ODBC::db (DBI::db=HASH(0x1d1480)~INNER)
> >     <- DESTROY= undef
> >     dbih_clearcom 0x1d14f8 (com 0x1d2788, type 2) done.
> >
> >     -- DBI::END
> >     -> disconnect_all for DBD::ODBC::dr 
>(DBI::dr=HASH(0x17b194)~0x1d1594)
> >     <- disconnect_all= '' at DBI.pm line 467
> >     -> DESTROY in DBD::_::common for DBD::ODBC::dr
> > (DBI::dr=HASH(0x1d1594)~INNER)
> >     <- DESTROY= undef during global destruction
> >     dbih_clearcom 0x17b194 (com 0x182d08, type 1) done.
> >
> >     <> DESTROY for DBI::dr=HASH(0x17b194) ignored (inner handle gone)
> >
> >
> > >From: "Jeff Urlwin" <[EMAIL PROTECTED]>
> > >To: "Abi Pothen" <[EMAIL PROTECTED]>, <[EMAIL PROTECTED]>
> > >CC: <[EMAIL PROTECTED]>, <[EMAIL PROTECTED]>
> > >Subject: RE: Multiple Results in DBD::ODBC 0.31
> > >Date: Tue, 29 Jan 2002 03:21:03 -0500
> > >
> > >Can you please turn on tracing and send me the trace file for the
> > >statement(s) that fail?
> > >
> > >Thanks,
> > >
> > >Jeff
> > >
> > > > -----Original Message-----
> > > > From: Abi Pothen [mailto:[EMAIL PROTECTED]]
> > > > Sent: Monday, January 28, 2002 8:02 PM
> > > > To: [EMAIL PROTECTED]
> > > > Cc: [EMAIL PROTECTED]; [EMAIL PROTECTED]
> > > > Subject: Multiple Results in DBD::ODBC 0.31
> > > >
> > > >
> > > > Hi,
> > > >   I am having a problem with DBD::ODBC (version 0.31) that
> > has fixes to
> > > > handle multiple result set. This fix is working fine only when
> > > > the number of
> > > > columns of the previous result set is equal to or greater than
> > > > the number of
> > > > columns of the following result set. If the number of columns of
> > > > the result
> > > > set of the previous result set is greater than the following, 
>SQLFetch
> > > > function call is failing and returning -1.
> > > >
> > > > Error message is:
> > > > DBD::ODBC::st fetchrow_arrayref failed:
> > [OpenLink][ODBC][Driver]Invalid
> > > > column number (SQL-S1002)(DBD: st_fetch/SQLFetch err=-1)
> > > >
> > > > Can somebody please suggest a solution for this problem ?
> > > >
> > > > Your help will be greatly appreciated.
> > > >
> > > > Sample sql statements used:
> > > >
> > > >
> > > > a.  "select emp_name, address1, address2 from employee where
> > > > emp_id   = 2 "
> > > >       select emp_id from employee where  emp_id   = 2"
> > -- Failing
> > > > with message ( SQLFetch = -1 )
> > > >
> > > >
> > > > b.   " select emp_id from employee where  emp_id   = 2
> > > >        select emp_name, address1, address2 from employee where
> > > > emp_id   =
> > > > 2" -- Executes succefully
> > > >
> > > >
> > > >
> > > >
> > > >
> > > > _________________________________________________________________
> > > > Join the world�s largest e-mail service with MSN Hotmail.
> > > > http://www.hotmail.com
> > > >
> > > >
> > >
> >
> >
> > _________________________________________________________________
> > Join the world�s largest e-mail service with MSN Hotmail.
> > http://www.hotmail.com
> >
>


_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp.

Reply via email to