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.