Update of /cvsroot/informixdb/informixdb/ext
In directory sc8-pr-cvs2.sourceforge.net:/tmp/cvs-serv17281
Modified Files:
_informixdb.ec
Log Message:
Fix bogus results from reading DATETIME HOUR TO SECOND columns with leading
double-zeroes. Thanks to rad...@us... for reporting
this issue.
Index: _informixdb.ec
===================================================================
RCS file: /cvsroot/informixdb/informixdb/ext/_informixdb.ec,v
retrieving revision 1.87
retrieving revision 1.88
diff -C2 -d -r1.87 -r1.88
*** _informixdb.ec 29 Dec 2006 03:43:36 -0000 1.87
--- _informixdb.ec 22 Mar 2007 21:06:54 -0000 1.88
***************
*** 2194,2197 ****
--- 2194,2203 ----
int year=1,month=1,day=1,hour=0,minute=0,second=0,usec=0;
dtime_t* dt = (dtime_t*)data;
+ exec sql begin declare section;
+ datetime year to fraction(5) dt_extended;
+ exec sql end declare section;
+
+ dtextend(dt, &dt_extended);
+ dt = &dt_extended;
for (pos = 0, i = TU_START(dt->dt_qual);
i <= TU_END(dt->dt_qual) && pos < dt->dt_dec.dec_ndgts;
|
