fetch error after DB2 query

Marco Avvisano <[email protected]>
Newsgroups gmane.comp.lang.perl.modules.dbi.general
Message-ID <[email protected]>
Hi,

I'm migrating to redhat Red Hat Enterprise Linux Server release 6.1 
(Santiago) (64).
On my old server i have a perl script that using DBI queries a DB2 
database to read the occupation of the dataspace.
The query is done correctly but the values continues to fetch until it 
finds an empty table.

On the new server i get this message:

fbh 6: 'maxsize' NULLable, type -5,  20, dsize 19, p0 s18965564
    out: ftype 1, indp 0, bufl 81, rlen 81
<- prepare= ( DBI::st=HASH(0xba2c30) ) [1 items] at Hobbit_fd_lib.pm 
line 1089 via  at dbcheck.pl line 1356
     -> execute for DBD::DB2::st (DBI::st=HASH(0xba2c30)~0x107fd20)
<- execute= ( -1 ) [1 items] at Hobbit_fd_lib.pm line 1093 via  at 
Hobbit_fd_lib.pm line 1090
     -> fetchall_arrayref in DBD::_::st for DBD::DB2::st 
(DBI::st=HASH(0xba2c30)~0x107fd20 HASH(0x1080260))
2 <- FETCH= ( [ 'name' 'size' 'free' 'used' 'usedpct' 'autoextend' 
'maxsize' ] ) [1 items] at DBI.pm line 2043 via  at Hobbit_fd_lib.pm 
line 1099
     dbd_st_fetch 7 fields
         0: rc=0 'SYSCATSPACE'
         1: rc=0 '745013248'
         2: rc=0 '142999552'
         3: rc=0 '602013696'
         4: rc=0 '80.80'
         5: rc=0 '1'
         6: rc=0 '-1'

(..)


2 <> FETCH= ( [ 'name' 'size' 'free' 'used' 'usedpct' 'autoextend' 
'maxsize' ] ) [1 items] ('NAME' from cache) at DBI.pm li
ne 2043 via  at Hobbit_fd_lib.pm line 1099
     !! info: '' '[IBM][CLI Driver][DB2/AIX64] SQL0100W  No row was 
found for FETCH, UPDATE or DELETE; or the result of a quer
y is an empty table.  SQLSTATE=02000
' (err#0)

---------------
Summary of my perl5 (revision 5 version 12 subversion 4) configuration:

   Platform:
     osname=linux, osvers=2.6.32-131.6.1.el6.x86_64, archname=x86_64-linux
     uname='linux my.server 2.6.32-131.6.1.el6.x86_64 #1 smp mon jun 20 
14:15:38 edt 2011 x86_64 x86_64 x86_64 gnulinux '
     config_args='-de -Dcc=gcc -Dprefix=/opt/perl5'
     hint=recommended, useposix=true, d_sigaction=define
     useithreads=undef, usemultiplicity=undef
     useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
     use64bitint=define, use64bitall=define, uselongdouble=undef
     usemymalloc=n, bincompat5005=undef
   Compiler:
     cc='gcc', ccflags ='-fno-strict-aliasing -pipe -fstack-protector 
-I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
     optimize='-O2',
     cppflags='-fno-strict-aliasing -pipe -fstack-protector 
-I/usr/local/include'
     ccversion='', gccversion='4.4.5 20110214 (Red Hat 4.4.5-6)', 
gccosandvers=''
     intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678
     d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
     ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', 
lseeksize=8
     alignbytes=8, prototype=define
   Linker and Libraries:
     ld='gcc', ldflags =' -fstack-protector -L/usr/local/lib'
     libpth=/usr/local/lib /lib/../lib64 /usr/lib/../lib64 /lib /usr/lib 
/lib64 /usr/lib64 /usr/local/lib64
     libs=-lnsl -ldb -ldl -lm -lcrypt -lutil -lc
     perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc
     libc=/lib/libc-2.12.so, so=so, useshrplib=false, libperl=libperl.a
     gnulibc_version='2.12'
   Dynamic Linking:
     dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
     cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib 
-fstack-protector'


Characteristics of this binary (from libperl):
   Compile-time options: PERL_DONT_CREATE_GVSV PERL_MALLOC_WRAP 
USE_64_BIT_ALL
                         USE_64_BIT_INT USE_LARGE_FILES USE_PERLIO
                         USE_PERL_ATOF
   Built under linux
   Compiled at Sep 15 2011 10:39:35
   @INC:
     /opt/perl5/lib/site_perl/5.12.4/x86_64-linux
     /opt/perl5/lib/site_perl/5.12.4
     /opt/perl5/lib/5.12.4/x86_64-linux
     /opt/perl5/lib/5.12.4
----------------------

Program Information
         dbcheck.pl version 1.08
         Hobbit_fd_lib.pm version 1.15

OS Information
         Linux my.server 2.6.32-131.6.1.el6.x86_64 #1 SMP Mon Jun 20 
14:15:38 EDT 2011 x86_64 x86_64 x86_64 GNU/Linux
         Perl version is v5.12.4

Module Information
         FindBin 1.50
         POSIX 1.19
         Text::Wrap 2009.0305
         Sys::SigAction 0.15
         Config::IniFiles 2.68
         DBI 1.616
         DBD::DB2 1.81
         DBD::DBM 0.06
         DBD::ExampleP 12.014310
         DBD::File 0.40
         DBD::Gofer 0.014282
         DBD::SQLite 1.33
         DBD::Sponge 12.010002
         DBD::mysql 4.020

-----------------
Thanks in advance for your help

Marco
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.