I'm having problems to fetch rows when the 'select' clause has a where
condition with 'date' types columns. Basically, it doen´t fetch anything
when a date value is passed in the execute method. Trying to figure out
where the problem is I wrote another program that obtains rows from a table
and then try to obtain the same values from the same table using the first
values. It didn´t work. I also tried to bind the params, but the following
message was displayed:
SQL type 9 for ":p3" is not fully supported, bound as SQL_VARCHAR2 instead
at./db2.pl line 49.
The line 49 of the program is: $sth2->bind_param(3,$c3,{TYPE=>SQL_DATE}) or
die "Error: bind\n";
But if I try with SQL_VARCHAR2 nothing is fetched.
The most weird thing is that the same script works fine against other
Oracle box (8.1.6 32bits).
Any idea where the problem can be?
Best regards and thanks in advance,
Marcelo
My enviroment is:
OS. AIX. 4.3.3
DBMS. Oracle 8.1.6, 64bits
Perl: 5.6.0
DBI-1.14
DBD-Oracle-1.06
The output of perl -V is:
Summary of my perl5 (revision 5.0 version 6 subversion 0) configuration:
Platform:
osname=aix, osvers=4.3.3.0, archname=aix-thread
uname='aix sp1n11i 3 4 000171304c00 '
config_args='-des -Dprefix=/net/local/perl560 -Dusethreads
-Duse5005threads'
hint=recommended, useposix=true, d_sigaction=define
usethreads=define use5005threads=define useithreads=undef
usemultiplicity=undef
useperlio=undef d_sfio=undef uselargefiles=define
use64bitint=undef use64bitall=undef uselongdouble=undef usesocks=undef
Compiler:
cc='cc_r', optimize='-O', gccversion=
cppflags='-D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE -qmaxmem=16384
-DNEED_PTHREAD_INIT'
ccflags ='-D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE -qmaxmem=16384
-DNEED_PTHREAD_INIT -q32 -D_LARGE_FILES -qlonglong'
stdchar='unsigned char', d_stdstdio=define, usevfork=false
intsize=4, longsize=4, ptrsize=4, doublesize=8
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=8
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=8
alignbytes=8, usemymalloc=n, prototype=define
Linker and Libraries:
ld='ld', ldflags =' -L/usr/local/lib -b32'
libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib
libs=-lbind -lnsl -ldbm -ldl -lld -lm -lC_r -lpthreads -lc -lcrypt
-lbsd -lPW -liconv
libc=/lib/libc.a, so=a, useshrplib=false, libperl=libperl.a
Dynamic Linking:
dlsrc=dl_aix.xs, dlext=so, d_dlsymun=undef, ccdlflags='
-bE:/net/local/perl560/lib/5.6.0/aix-thread/CORE/perl.exp'
cccdlflags=' ', lddlflags='-bhalt:4 -bM:SRE -bI:$(PERL_INC)/perl.exp
-bE:$(BASEEXT).exp -b noentry -lC_r -lpthreads -lc -L/usr/l
ocal/lib'
Characteristics of this binary (from libperl):
Compile-time options: USE_THREADS USE_LARGE_FILES PERL_IMPLICIT_CONTEXT
Built under aix
Compiled at Feb 8 2001 16:06:21
@INC:
/net/local/perl560/lib/5.6.0/aix-thread
/net/local/perl560/lib/5.6.0
/net/local/perl560/lib/site_perl/5.6.0/aix-thread
/net/local/perl560/lib/site_perl/5.6.0
/net/local/perl560/lib/site_perl
