ruby-informix 0.5.0 → 0.5.1

data/informix.c

@@ -1,9 +1,9 @@
 #include <sqlhdr.h>
 #include <sqliapi.h>
 #line 1 "informix.ec"
-/* $Id: informix.ec,v 1.81 2006/12/27 20:57:39 santana Exp $ */
+/* $Id: informix.ec,v 1.81.2.2 2007/08/10 17:48:47 santana Exp $ */
 /*
-* Copyright (c) 2006, Gerardo Santana Gomez Garrido <gerardo.santana@gmail.com>
+* Copyright (c) 2006-2007, Gerardo Santana Gomez Garrido <gerardo.santana@gmail.com>
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
@@ -1882,47 +1882,48 @@ make_result(cursor_t *c, VALUE record)
 			break;
 		}
 		case SQLDTIME: {
-			register short qual;
+			register short qual, i;
 			short year, month, day, hour, minute, second;
 			int usec;
-			dtime_t *dt;
+			dtime_t dt;
 			register char *dgts;
 
 			month = day = 1;
 			year = hour = minute = second = usec = 0;
-			dt = (dtime_t *)var->sqldata;
-			dgts = dt->dt_dec.dec_dgts;
+			dt.dt_qual = TU_DTENCODE(TU_YEAR, TU_F5);
+			dtextend((dtime_t *)var->sqldata, &dt);
+			dgts = dt.dt_dec.dec_dgts;
 
-			qual = TU_START(dt->dt_qual);
-			for (; qual <= TU_END(dt->dt_qual); qual++) {
+			for (i = 0, qual = TU_YEAR;
+				 qual <= TU_F5 && i < dt.dt_dec.dec_ndgts; qual++) {
 				switch(qual) {
 				case TU_YEAR:
-					year = 100**dgts++;
-					year += *dgts++;
+					year = 100*dgts[i++];
+					year += dgts[i++];
 					break;
 				case TU_MONTH:
-					month = *dgts++;
+					month = dgts[i++];
 					break;
 				case TU_DAY:
-					day = *dgts++;
+					day = dgts[i++];
 					break;
 				case TU_HOUR:
-					hour = *dgts++;
+					hour = dgts[i++];
 					break;
 				case TU_MINUTE:
-					minute = *dgts++;
+					minute = dgts[i++];
 					break;
 				case TU_SECOND:
-					second = *dgts++;
+					second = dgts[i++];
 					break;
 				case TU_F1:
-					usec = 10000**dgts++;
+					usec = 10000*dgts[i++];
 					break;
 				case TU_F3:
-					usec += 100**dgts++;
+					usec += 100*dgts[i++];
 					break;
 				case TU_F5:
-					usec += *dgts++;
+					usec += dgts[i++];
 					break;
 				}
 			}
@@ -1932,11 +1933,6 @@ make_result(cursor_t *c, VALUE record)
 				INT2FIX(hour), INT2FIX(minute), INT2FIX(second),
 				INT2FIX(usec));
 
-			/* Clean the buffer for DATETIME columns because
-			 * ESQL/C leaves the previous content when a
-			 * a time field is zero.
-			 */
-			memset(dt, 0, sizeof(dtime_t));
 			break;
 		}
 		case SQLDECIMAL:
@@ -2035,24 +2031,24 @@ database_free(void *p)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 1792 "informix.ec"
-#line 1793 "informix.ec"
+#line 1788 "informix.ec"
+#line 1789 "informix.ec"
   char *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 1794 "informix.ec"
+#line 1790 "informix.ec"
 
 
 	did = p;
 /*
  * 	EXEC SQL disconnect :did;
  */
-#line 1797 "informix.ec"
+#line 1793 "informix.ec"
   {
-#line 1797 "informix.ec"
+#line 1793 "informix.ec"
   sqli_connect_close(0, did, 0, 0);
-#line 1797 "informix.ec"
+#line 1793 "informix.ec"
   }
 	xfree(p);
 }
@@ -2075,13 +2071,13 @@ rb_database_initialize(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 1816 "informix.ec"
-#line 1817 "informix.ec"
+#line 1812 "informix.ec"
+#line 1813 "informix.ec"
   char *dbname, *user = NULL, *pass = NULL, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 1818 "informix.ec"
+#line 1814 "informix.ec"
 
 
 	rb_scan_args(argc, argv, "12", &arg[0], &arg[1], &arg[2]);
@@ -2105,24 +2101,24 @@ rb_database_initialize(int argc, VALUE *argv, VALUE self)
  * 		EXEC SQL connect to :dbname as :did user :user
  * 			using :pass with concurrent transaction;
  */
-#line 1837 "informix.ec"
+#line 1833 "informix.ec"
   {
-#line 1838 "informix.ec"
+#line 1834 "informix.ec"
   ifx_conn_t      *_sqiconn;
   _sqiconn = (ifx_conn_t *)ifx_alloc_conn_user(user, pass);
   sqli_connect_open(ESQLINTVERSION, 0, dbname, did, _sqiconn, 1);
   ifx_free_conn_user(&_sqiconn);
-#line 1838 "informix.ec"
+#line 1834 "informix.ec"
   }
 	else
 /*
  * 		EXEC SQL connect to :dbname as :did with concurrent transaction;
  */
-#line 1840 "informix.ec"
+#line 1836 "informix.ec"
   {
-#line 1840 "informix.ec"
+#line 1836 "informix.ec"
   sqli_connect_open(ESQLINTVERSION, 0, dbname, did, (ifx_conn_t *)0, 1);
-#line 1840 "informix.ec"
+#line 1836 "informix.ec"
   }
 
 	if (SQLCODE < 0)
@@ -2172,13 +2168,13 @@ rb_database_close(VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 1886 "informix.ec"
-#line 1887 "informix.ec"
+#line 1882 "informix.ec"
+#line 1883 "informix.ec"
   char *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 1888 "informix.ec"
+#line 1884 "informix.ec"
 
 
 	Data_Get_Struct(self, char, did);
@@ -2187,21 +2183,21 @@ rb_database_close(VALUE self)
 /*
  * 		EXEC SQL free :did;
  */
-#line 1893 "informix.ec"
+#line 1889 "informix.ec"
   {
-#line 1893 "informix.ec"
+#line 1889 "informix.ec"
   sqli_curs_free(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, did, 258));
-#line 1893 "informix.ec"
+#line 1889 "informix.ec"
   }
 	did -= IDSIZE;
 /*
  * 	EXEC SQL disconnect :did;
  */
-#line 1895 "informix.ec"
+#line 1891 "informix.ec"
   {
-#line 1895 "informix.ec"
+#line 1891 "informix.ec"
   sqli_connect_close(0, did, 0, 0);
-#line 1895 "informix.ec"
+#line 1891 "informix.ec"
   }
 
 	return self;
@@ -2222,13 +2218,13 @@ rb_database_immediate(VALUE self, VALUE arg)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 1912 "informix.ec"
-#line 1913 "informix.ec"
+#line 1908 "informix.ec"
+#line 1909 "informix.ec"
   char *query, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 1914 "informix.ec"
+#line 1910 "informix.ec"
 
 
 	Data_Get_Struct(self, char, did);
@@ -2236,11 +2232,11 @@ rb_database_immediate(VALUE self, VALUE arg)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 1918 "informix.ec"
+#line 1914 "informix.ec"
   {
-#line 1918 "informix.ec"
+#line 1914 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 1918 "informix.ec"
+#line 1914 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2249,11 +2245,11 @@ rb_database_immediate(VALUE self, VALUE arg)
 /*
  * 	EXEC SQL execute immediate :query;
  */
-#line 1923 "informix.ec"
+#line 1919 "informix.ec"
   {
-#line 1923 "informix.ec"
+#line 1919 "informix.ec"
   sqli_exec_immed(query);
-#line 1923 "informix.ec"
+#line 1919 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2273,13 +2269,13 @@ rb_database_rollback(VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 1939 "informix.ec"
-#line 1940 "informix.ec"
+#line 1935 "informix.ec"
+#line 1936 "informix.ec"
   char *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 1941 "informix.ec"
+#line 1937 "informix.ec"
 
 
 	Data_Get_Struct(self, char, did);
@@ -2287,11 +2283,11 @@ rb_database_rollback(VALUE self)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 1945 "informix.ec"
+#line 1941 "informix.ec"
   {
-#line 1945 "informix.ec"
+#line 1941 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 1945 "informix.ec"
+#line 1941 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2299,11 +2295,11 @@ rb_database_rollback(VALUE self)
 /*
  * 	EXEC SQL rollback;
  */
-#line 1949 "informix.ec"
+#line 1945 "informix.ec"
   {
-#line 1949 "informix.ec"
+#line 1945 "informix.ec"
   sqli_trans_rollback();
-#line 1949 "informix.ec"
+#line 1945 "informix.ec"
   }
 	return self;
 }
@@ -2320,13 +2316,13 @@ rb_database_commit(VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 1962 "informix.ec"
-#line 1963 "informix.ec"
+#line 1958 "informix.ec"
+#line 1959 "informix.ec"
   char *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 1964 "informix.ec"
+#line 1960 "informix.ec"
 
 
 	Data_Get_Struct(self, char, did);
@@ -2334,11 +2330,11 @@ rb_database_commit(VALUE self)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 1968 "informix.ec"
+#line 1964 "informix.ec"
   {
-#line 1968 "informix.ec"
+#line 1964 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 1968 "informix.ec"
+#line 1964 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2346,11 +2342,11 @@ rb_database_commit(VALUE self)
 /*
  * 	EXEC SQL commit;
  */
-#line 1972 "informix.ec"
+#line 1968 "informix.ec"
   {
-#line 1972 "informix.ec"
+#line 1968 "informix.ec"
   sqli_trans_commit();
-#line 1972 "informix.ec"
+#line 1968 "informix.ec"
   }
 	return self;
 }
@@ -2379,13 +2375,13 @@ rb_database_transaction(VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 1997 "informix.ec"
-#line 1998 "informix.ec"
+#line 1993 "informix.ec"
+#line 1994 "informix.ec"
   char *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 1999 "informix.ec"
+#line 1995 "informix.ec"
 
 
 	Data_Get_Struct(self, char, did);
@@ -2393,11 +2389,11 @@ rb_database_transaction(VALUE self)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2003 "informix.ec"
+#line 1999 "informix.ec"
   {
-#line 2003 "informix.ec"
+#line 1999 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2003 "informix.ec"
+#line 1999 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2405,21 +2401,21 @@ rb_database_transaction(VALUE self)
 /*
  * 	EXEC SQL commit;
  */
-#line 2007 "informix.ec"
+#line 2003 "informix.ec"
   {
-#line 2007 "informix.ec"
+#line 2003 "informix.ec"
   sqli_trans_commit();
-#line 2007 "informix.ec"
+#line 2003 "informix.ec"
   }
 
 /*
  * 	EXEC SQL begin work;
  */
-#line 2009 "informix.ec"
+#line 2005 "informix.ec"
   {
-#line 2009 "informix.ec"
+#line 2005 "informix.ec"
   sqli_trans_begin2((mint)1);
-#line 2009 "informix.ec"
+#line 2005 "informix.ec"
   }
 	ret = rb_rescue(rb_yield, self, database_transfail, self);
 	if (ret == Qundef)
@@ -2427,11 +2423,11 @@ rb_database_transaction(VALUE self)
 /*
  * 	EXEC SQL commit;
  */
-#line 2013 "informix.ec"
+#line 2009 "informix.ec"
   {
-#line 2013 "informix.ec"
+#line 2009 "informix.ec"
   sqli_trans_commit();
-#line 2013 "informix.ec"
+#line 2009 "informix.ec"
   }
 	return self;
 }
@@ -2541,8 +2537,8 @@ rb_database_columns(VALUE self, VALUE tablename)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2119 "informix.ec"
-#line 2120 "informix.ec"
+#line 2115 "informix.ec"
+#line 2116 "informix.ec"
   char *did, *cid;
   char *tabname;
 int tabid, xid;
@@ -2553,7 +2549,7 @@ short coltype, collength;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2127 "informix.ec"
+#line 2123 "informix.ec"
 
 
 	Data_Get_Struct(self, char, did);
@@ -2561,11 +2557,11 @@ short coltype, collength;
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2131 "informix.ec"
+#line 2127 "informix.ec"
   {
-#line 2131 "informix.ec"
+#line 2127 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2131 "informix.ec"
+#line 2127 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2575,35 +2571,35 @@ short coltype, collength;
 /*
  * 	EXEC SQL select tabid into :tabid from systables where tabname = :tabname;
  */
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
   {
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
   static const char *sqlcmdtxt[] =
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
     {
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
     "select tabid from systables where tabname = ?",
     0
     };
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
 static ifx_cursor_t _SQ0 = {0};
   static ifx_sqlvar_t _sqibind[] = 
     {
       { 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
     };
   static ifx_sqlvar_t _sqobind[] = 
     {
       { 102, sizeof(tabid), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
     };
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
   _sqibind[0].sqldata = tabname;
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
   _sqobind[0].sqldata = (char *) &tabid;
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
   sqli_slct(ESQLINTVERSION, &_SQ0,sqlcmdtxt,1,_sqibind,1,_sqobind,0,(ifx_literal_t *)0,(ifx_namelist_t *)0,0);
-#line 2137 "informix.ec"
+#line 2133 "informix.ec"
   }
 
 	if (SQLCODE == SQLNOTFOUND)
@@ -2623,28 +2619,28 @@ static ifx_cursor_t _SQ0 = {0};
  * 				and c.colno = d.colno
  * 			order by c.colno;
  */
-#line 2147 "informix.ec"
+#line 2143 "informix.ec"
   {
-#line 2153 "informix.ec"
+#line 2149 "informix.ec"
   static const char *sqlcmdtxt[] =
-#line 2153 "informix.ec"
+#line 2149 "informix.ec"
     {
-#line 2153 "informix.ec"
+#line 2149 "informix.ec"
     "select colname , coltype , collength , extended_id , type , default , c . colno from syscolumns c , outer sysdefaults d where c . tabid = ? and c . tabid = d . tabid and c . colno = d . colno order by c . colno",
     0
     };
-#line 2153 "informix.ec"
+#line 2149 "informix.ec"
   static ifx_sqlvar_t _sqibind[] = 
     {
       { 102, sizeof(tabid), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
-#line 2153 "informix.ec"
+#line 2149 "informix.ec"
     };
   static ifx_sqlda_t _SD0 = { 1, _sqibind, {0}, 1, 0 };
-#line 2153 "informix.ec"
+#line 2149 "informix.ec"
   _sqibind[0].sqldata = (char *) &tabid;
-#line 2153 "informix.ec"
+#line 2149 "informix.ec"
 sqli_curs_decl_stat(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 0), cid, sqlcmdtxt, &_SD0, (ifx_sqlda_t *)0, 0, (ifx_literal_t *)0, (ifx_namelist_t *)0, 2, 0, 0);
-#line 2153 "informix.ec"
+#line 2149 "informix.ec"
   }
 		if (SQLCODE < 0) {
 			cid[0] = 0;
@@ -2655,11 +2651,11 @@ sqli_curs_decl_stat(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 0), ci
 /*
  * 	EXEC SQL open :cid;
  */
-#line 2160 "informix.ec"
+#line 2156 "informix.ec"
   {
-#line 2160 "informix.ec"
+#line 2156 "informix.ec"
   sqli_curs_open(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), (ifx_sqlda_t *)0, (char *)0, (struct value *)0, 0, 0);
-#line 2160 "informix.ec"
+#line 2156 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2669,9 +2665,9 @@ sqli_curs_decl_stat(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 0), ci
  * 		EXEC SQL fetch :cid into :colname, :coltype, :collength, :xid,
  * 			:deftype, :defvalue;
  */
-#line 2165 "informix.ec"
+#line 2161 "informix.ec"
   {
-#line 2166 "informix.ec"
+#line 2162 "informix.ec"
   static ifx_sqlvar_t _sqobind[] = 
     {
       { 114, 129, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
@@ -2680,24 +2676,24 @@ sqli_curs_decl_stat(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 0), ci
       { 102, sizeof(xid), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
       { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
       { 114, 257, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
-#line 2166 "informix.ec"
+#line 2162 "informix.ec"
     };
   static ifx_sqlda_t _SD0 = { 6, _sqobind, {0}, 6, 0 };
   static _FetchSpec _FS1 = { 0, 1, 0 };
-#line 2166 "informix.ec"
+#line 2162 "informix.ec"
   _sqobind[0].sqldata = colname;
-#line 2166 "informix.ec"
+#line 2162 "informix.ec"
   _sqobind[1].sqldata = (char *) &coltype;
-#line 2166 "informix.ec"
+#line 2162 "informix.ec"
   _sqobind[2].sqldata = (char *) &collength;
-#line 2166 "informix.ec"
+#line 2162 "informix.ec"
   _sqobind[3].sqldata = (char *) &xid;
-#line 2166 "informix.ec"
+#line 2162 "informix.ec"
   _sqobind[4].sqldata = deftype;
-#line 2166 "informix.ec"
+#line 2162 "informix.ec"
   _sqobind[5].sqldata = defvalue;
   sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), (ifx_sqlda_t *)0, &_SD0, (char *)0, &_FS1);
-#line 2166 "informix.ec"
+#line 2162 "informix.ec"
   }
 		if (SQLCODE < 0)
 			rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2795,11 +2791,11 @@ sqli_curs_decl_stat(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 0), ci
 /*
  * 	EXEC SQL close :cid;
  */
-#line 2260 "informix.ec"
+#line 2256 "informix.ec"
   {
-#line 2260 "informix.ec"
+#line 2256 "informix.ec"
   sqli_curs_close(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256));
-#line 2260 "informix.ec"
+#line 2256 "informix.ec"
   }
 
 	return result;
@@ -2825,13 +2821,13 @@ statement_free(void *p)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2282 "informix.ec"
-#line 2283 "informix.ec"
+#line 2278 "informix.ec"
+#line 2279 "informix.ec"
   char *sid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2284 "informix.ec"
+#line 2280 "informix.ec"
 
 
 	free_input_slots(p);
@@ -2841,22 +2837,22 @@ statement_free(void *p)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2290 "informix.ec"
+#line 2286 "informix.ec"
   {
-#line 2290 "informix.ec"
+#line 2286 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2290 "informix.ec"
+#line 2286 "informix.ec"
   }
 	if (SQLCODE >= 0) {
 		sid = ((cursor_t *)p)->stmt_id;
 /*
  * 		EXEC SQL free :sid;
  */
-#line 2293 "informix.ec"
+#line 2289 "informix.ec"
   {
-#line 2293 "informix.ec"
+#line 2289 "informix.ec"
   sqli_curs_free(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, sid, 258));
-#line 2293 "informix.ec"
+#line 2289 "informix.ec"
   }
 	}
 
@@ -2897,24 +2893,24 @@ statement_initialize(VALUE self, VALUE db, VALUE query)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2330 "informix.ec"
-#line 2331 "informix.ec"
+#line 2326 "informix.ec"
+#line 2327 "informix.ec"
   char *c_query, *sid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2332 "informix.ec"
+#line 2328 "informix.ec"
 
 
 	Data_Get_Struct(db, char, did);
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2335 "informix.ec"
+#line 2331 "informix.ec"
   {
-#line 2335 "informix.ec"
+#line 2331 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2335 "informix.ec"
+#line 2331 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2930,11 +2926,11 @@ statement_initialize(VALUE self, VALUE db, VALUE query)
 /*
  * 	EXEC SQL prepare :sid from :c_query;
  */
-#line 2347 "informix.ec"
+#line 2343 "informix.ec"
   {
-#line 2347 "informix.ec"
+#line 2343 "informix.ec"
   sqli_prep(ESQLINTVERSION, sid, c_query,(ifx_literal_t *)0, (ifx_namelist_t *)0, -1, 0, 0 ); 
-#line 2347 "informix.ec"
+#line 2343 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -2943,11 +2939,11 @@ statement_initialize(VALUE self, VALUE db, VALUE query)
 /*
  * 	EXEC SQL describe :sid into output;
  */
-#line 2352 "informix.ec"
+#line 2348 "informix.ec"
   {
-#line 2352 "informix.ec"
+#line 2348 "informix.ec"
   sqli_describe_stmt(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, sid, 257), &output, 0);
-#line 2352 "informix.ec"
+#line 2348 "informix.ec"
   }
 	c->daOutput = output;
 
@@ -3011,13 +3007,13 @@ statement_call(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2412 "informix.ec"
-#line 2413 "informix.ec"
+#line 2408 "informix.ec"
+#line 2409 "informix.ec"
   char *sid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2414 "informix.ec"
+#line 2410 "informix.ec"
 
 
 	Data_Get_Struct(self, cursor_t, c);
@@ -3026,11 +3022,11 @@ statement_call(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2419 "informix.ec"
+#line 2415 "informix.ec"
   {
-#line 2419 "informix.ec"
+#line 2415 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2419 "informix.ec"
+#line 2415 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -3050,11 +3046,11 @@ statement_call(int argc, VALUE *argv, VALUE self)
  * 			EXEC SQL execute :sid into descriptor output
  * 				using descriptor input;
  */
-#line 2434 "informix.ec"
+#line 2430 "informix.ec"
   {
-#line 2435 "informix.ec"
+#line 2431 "informix.ec"
   sqli_exec(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, sid, 257), input, (char *)0, (struct value *)0, output, (char *)0, (struct value *)0, 0);
-#line 2435 "informix.ec"
+#line 2431 "informix.ec"
   }
 			clean_input_slots(c);
 		}
@@ -3062,11 +3058,11 @@ statement_call(int argc, VALUE *argv, VALUE self)
 /*
  * 			EXEC SQL execute :sid into descriptor output;
  */
-#line 2439 "informix.ec"
+#line 2435 "informix.ec"
   {
-#line 2439 "informix.ec"
+#line 2435 "informix.ec"
   sqli_exec(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, sid, 257), (ifx_sqlda_t *)0, (char *)0, (struct value *)0, output, (char *)0, (struct value *)0, 0);
-#line 2439 "informix.ec"
+#line 2435 "informix.ec"
   }
 
 		if (SQLCODE < 0)
@@ -3082,11 +3078,11 @@ statement_call(int argc, VALUE *argv, VALUE self)
 /*
  * 			EXEC SQL execute :sid using descriptor input;
  */
-#line 2451 "informix.ec"
+#line 2447 "informix.ec"
   {
-#line 2451 "informix.ec"
+#line 2447 "informix.ec"
   sqli_exec(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, sid, 257), input, (char *)0, (struct value *)0, (ifx_sqlda_t *)0, (char *)0, (struct value *)0, 0);
-#line 2451 "informix.ec"
+#line 2447 "informix.ec"
   }
 			clean_input_slots(c);
 		}
@@ -3094,11 +3090,11 @@ statement_call(int argc, VALUE *argv, VALUE self)
 /*
  * 			EXEC SQL execute :sid;
  */
-#line 2455 "informix.ec"
+#line 2451 "informix.ec"
   {
-#line 2455 "informix.ec"
+#line 2451 "informix.ec"
   sqli_exec(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, sid, 257), (ifx_sqlda_t *)0, (char *)0, (struct value *)0, (ifx_sqlda_t *)0, (char *)0, (struct value *)0, 0);
-#line 2455 "informix.ec"
+#line 2451 "informix.ec"
   }
 	}
 	if (SQLCODE < 0)
@@ -3120,13 +3116,13 @@ statement_drop(VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2473 "informix.ec"
-#line 2474 "informix.ec"
+#line 2469 "informix.ec"
+#line 2470 "informix.ec"
   char *sid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2475 "informix.ec"
+#line 2471 "informix.ec"
 
 
 	Data_Get_Struct(self, cursor_t, c);
@@ -3137,11 +3133,11 @@ statement_drop(VALUE self)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2482 "informix.ec"
+#line 2478 "informix.ec"
   {
-#line 2482 "informix.ec"
+#line 2478 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2482 "informix.ec"
+#line 2478 "informix.ec"
   }
 	if (SQLCODE < 0)
 		return Qnil;
@@ -3149,11 +3145,11 @@ statement_drop(VALUE self)
 /*
  * 	EXEC SQL free :sid;
  */
-#line 2486 "informix.ec"
+#line 2482 "informix.ec"
   {
-#line 2486 "informix.ec"
+#line 2482 "informix.ec"
   sqli_curs_free(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, sid, 258));
-#line 2486 "informix.ec"
+#line 2482 "informix.ec"
   }
 
 	return Qnil;
@@ -3194,13 +3190,13 @@ fetch(VALUE self, VALUE type, int bang)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2523 "informix.ec"
-#line 2524 "informix.ec"
+#line 2519 "informix.ec"
+#line 2520 "informix.ec"
   char *cid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2525 "informix.ec"
+#line 2521 "informix.ec"
 
 	cursor_t *c;
 	struct sqlda *output;
@@ -3214,11 +3210,11 @@ fetch(VALUE self, VALUE type, int bang)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2535 "informix.ec"
+#line 2531 "informix.ec"
   {
-#line 2535 "informix.ec"
+#line 2531 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2535 "informix.ec"
+#line 2531 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -3229,12 +3225,12 @@ fetch(VALUE self, VALUE type, int bang)
 /*
  * 	EXEC SQL fetch :cid using descriptor output;
  */
-#line 2542 "informix.ec"
+#line 2538 "informix.ec"
   {
-#line 2542 "informix.ec"
+#line 2538 "informix.ec"
   static _FetchSpec _FS0 = { 0, 1, 0 };
   sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), (ifx_sqlda_t *)0, output, (char *)0, &_FS0);
-#line 2542 "informix.ec"
+#line 2538 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -3317,13 +3313,13 @@ fetch_many(VALUE self, VALUE n, VALUE type)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2621 "informix.ec"
-#line 2622 "informix.ec"
+#line 2617 "informix.ec"
+#line 2618 "informix.ec"
   char *cid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2623 "informix.ec"
+#line 2619 "informix.ec"
 
 	cursor_t *c;
 	struct sqlda *output;
@@ -3339,11 +3335,11 @@ fetch_many(VALUE self, VALUE n, VALUE type)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2635 "informix.ec"
+#line 2631 "informix.ec"
   {
-#line 2635 "informix.ec"
+#line 2631 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2635 "informix.ec"
+#line 2631 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -3363,12 +3359,12 @@ fetch_many(VALUE self, VALUE n, VALUE type)
 /*
  * 		EXEC SQL fetch :cid using descriptor output;
  */
-#line 2651 "informix.ec"
+#line 2647 "informix.ec"
   {
-#line 2651 "informix.ec"
+#line 2647 "informix.ec"
   static _FetchSpec _FS0 = { 0, 1, 0 };
   sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), (ifx_sqlda_t *)0, output, (char *)0, &_FS0);
-#line 2651 "informix.ec"
+#line 2647 "informix.ec"
   }
 		if (SQLCODE < 0)
 			rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -3447,13 +3443,13 @@ each(VALUE self, VALUE type, int bang)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2726 "informix.ec"
-#line 2727 "informix.ec"
+#line 2722 "informix.ec"
+#line 2723 "informix.ec"
   char *cid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2728 "informix.ec"
+#line 2724 "informix.ec"
 
 	struct sqlda *output;
 	VALUE record;
@@ -3466,11 +3462,11 @@ each(VALUE self, VALUE type, int bang)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2737 "informix.ec"
+#line 2733 "informix.ec"
   {
-#line 2737 "informix.ec"
+#line 2733 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2737 "informix.ec"
+#line 2733 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -3482,12 +3478,12 @@ each(VALUE self, VALUE type, int bang)
 /*
  * 		EXEC SQL fetch :cid using descriptor output;
  */
-#line 2745 "informix.ec"
+#line 2741 "informix.ec"
   {
-#line 2745 "informix.ec"
+#line 2741 "informix.ec"
   static _FetchSpec _FS0 = { 0, 1, 0 };
   sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), (ifx_sqlda_t *)0, output, (char *)0, &_FS0);
-#line 2745 "informix.ec"
+#line 2741 "informix.ec"
   }
 		if (SQLCODE < 0)
 			rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -3626,13 +3622,13 @@ inscur_put(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2880 "informix.ec"
-#line 2881 "informix.ec"
+#line 2876 "informix.ec"
+#line 2877 "informix.ec"
   char *cid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2882 "informix.ec"
+#line 2878 "informix.ec"
 
 
 	Data_Get_Struct(self, cursor_t, c);
@@ -3643,11 +3639,11 @@ inscur_put(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2889 "informix.ec"
+#line 2885 "informix.ec"
   {
-#line 2889 "informix.ec"
+#line 2885 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2889 "informix.ec"
+#line 2885 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -3663,11 +3659,11 @@ inscur_put(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL put :cid using descriptor input;
  */
-#line 2901 "informix.ec"
+#line 2897 "informix.ec"
   {
-#line 2901 "informix.ec"
+#line 2897 "informix.ec"
   sqli_curs_put(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), input, (char *)0);
-#line 2901 "informix.ec"
+#line 2897 "informix.ec"
   }
 	clean_input_slots(c);
 	if (SQLCODE < 0)
@@ -3692,13 +3688,13 @@ inscur_flush(VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2922 "informix.ec"
-#line 2923 "informix.ec"
+#line 2918 "informix.ec"
+#line 2919 "informix.ec"
   char *cid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2924 "informix.ec"
+#line 2920 "informix.ec"
 
 
 	Data_Get_Struct(self, cursor_t, c);
@@ -3709,11 +3705,11 @@ inscur_flush(VALUE self)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2931 "informix.ec"
+#line 2927 "informix.ec"
   {
-#line 2931 "informix.ec"
+#line 2927 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2931 "informix.ec"
+#line 2927 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -3722,11 +3718,11 @@ inscur_flush(VALUE self)
 /*
  * 	EXEC SQL flush :cid;
  */
-#line 2936 "informix.ec"
+#line 2932 "informix.ec"
   {
-#line 2936 "informix.ec"
+#line 2932 "informix.ec"
   sqli_curs_flush(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256));
-#line 2936 "informix.ec"
+#line 2932 "informix.ec"
   }
 	return self;
 }
@@ -3746,14 +3742,14 @@ scrollcur_entry(VALUE self, VALUE index, VALUE type, int bang)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2952 "informix.ec"
-#line 2953 "informix.ec"
+#line 2948 "informix.ec"
+#line 2949 "informix.ec"
   char *cid, *did;
 long pos;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2955 "informix.ec"
+#line 2951 "informix.ec"
 
 
 	Data_Get_Struct(self, cursor_t, c);
@@ -3764,11 +3760,11 @@ long pos;
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 2962 "informix.ec"
+#line 2958 "informix.ec"
   {
-#line 2962 "informix.ec"
+#line 2958 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 2962 "informix.ec"
+#line 2958 "informix.ec"
   }
 	if (SQLCODE < 0)
 		return Qnil;
@@ -3780,60 +3776,60 @@ long pos;
 /*
  * 		EXEC SQL fetch current :cid using descriptor output;
  */
-#line 2970 "informix.ec"
+#line 2966 "informix.ec"
   {
-#line 2970 "informix.ec"
+#line 2966 "informix.ec"
   static _FetchSpec _FS0 = { 0, 5, 0 };
   sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), (ifx_sqlda_t *)0, output, (char *)0, &_FS0);
-#line 2970 "informix.ec"
+#line 2966 "informix.ec"
   }
 	else if ((pos = NUM2LONG(index) + 1) > 0)
 /*
  * 		EXEC SQL fetch absolute :pos :cid using descriptor output;
  */
-#line 2972 "informix.ec"
+#line 2968 "informix.ec"
   {
-#line 2972 "informix.ec"
+#line 2968 "informix.ec"
   static ifx_sqlvar_t _sqibind[] = 
     {
       { 103, sizeof(pos), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
-#line 2972 "informix.ec"
+#line 2968 "informix.ec"
     };
   static ifx_sqlda_t _SD0 = { 1, _sqibind, {0}, 1, 0 };
   static _FetchSpec _FS1 = { 0, 6, 0 };
-#line 2972 "informix.ec"
+#line 2968 "informix.ec"
   _sqibind[0].sqldata = (char *) &pos;
   sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), &_SD0, output, (char *)0, &_FS1);
-#line 2972 "informix.ec"
+#line 2968 "informix.ec"
   }
 	else {
 /*
  * 		EXEC SQL fetch last :cid;
  */
-#line 2974 "informix.ec"
+#line 2970 "informix.ec"
   {
-#line 2974 "informix.ec"
+#line 2970 "informix.ec"
   static _FetchSpec _FS0 = { 0, 4, 0 };
   sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), (ifx_sqlda_t *)0, (ifx_sqlda_t *)0, (char *)0, &_FS0);
-#line 2974 "informix.ec"
+#line 2970 "informix.ec"
   }
 /*
  * 		EXEC SQL fetch relative :pos :cid using descriptor output;
  */
-#line 2975 "informix.ec"
+#line 2971 "informix.ec"
   {
-#line 2975 "informix.ec"
+#line 2971 "informix.ec"
   static ifx_sqlvar_t _sqibind[] = 
     {
       { 103, sizeof(pos), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
-#line 2975 "informix.ec"
+#line 2971 "informix.ec"
     };
   static ifx_sqlda_t _SD0 = { 1, _sqibind, {0}, 1, 0 };
   static _FetchSpec _FS1 = { 0, 7, 0 };
-#line 2975 "informix.ec"
+#line 2971 "informix.ec"
   _sqibind[0].sqldata = (char *) &pos;
   sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), &_SD0, output, (char *)0, &_FS1);
-#line 2975 "informix.ec"
+#line 2971 "informix.ec"
   }
 	}
 
@@ -3858,13 +3854,13 @@ scrollcur_subseq(VALUE self, VALUE start, VALUE length, VALUE type)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 2996 "informix.ec"
-#line 2997 "informix.ec"
+#line 2992 "informix.ec"
+#line 2993 "informix.ec"
 long pos;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 2998 "informix.ec"
+#line 2994 "informix.ec"
 
 
 	first = scrollcur_entry(self, start, type, 0);
@@ -3996,14 +3992,14 @@ scrollcur_rel(int argc, VALUE *argv, VALUE self, int dir, VALUE type, int bang)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 3126 "informix.ec"
-#line 3127 "informix.ec"
+#line 3122 "informix.ec"
+#line 3123 "informix.ec"
   char *cid, *did;
 long pos;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 3129 "informix.ec"
+#line 3125 "informix.ec"
 
 
 	Data_Get_Struct(self, cursor_t, c);
@@ -4014,11 +4010,11 @@ long pos;
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 3136 "informix.ec"
+#line 3132 "informix.ec"
   {
-#line 3136 "informix.ec"
+#line 3132 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 3136 "informix.ec"
+#line 3132 "informix.ec"
   }
 	if (SQLCODE < 0)
 		return Qnil;
@@ -4031,20 +4027,20 @@ long pos;
 /*
  * 	EXEC SQL fetch relative :pos :cid using descriptor output;
  */
-#line 3145 "informix.ec"
+#line 3141 "informix.ec"
   {
-#line 3145 "informix.ec"
+#line 3141 "informix.ec"
   static ifx_sqlvar_t _sqibind[] = 
     {
       { 103, sizeof(pos), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
-#line 3145 "informix.ec"
+#line 3141 "informix.ec"
     };
   static ifx_sqlda_t _SD0 = { 1, _sqibind, {0}, 1, 0 };
   static _FetchSpec _FS1 = { 0, 7, 0 };
-#line 3145 "informix.ec"
+#line 3141 "informix.ec"
   _sqibind[0].sqldata = (char *) &pos;
   sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), &_SD0, output, (char *)0, &_FS1);
-#line 3145 "informix.ec"
+#line 3141 "informix.ec"
   }
 
 	if (SQLCODE == SQLNOTFOUND)
@@ -4344,13 +4340,13 @@ cursor_close_or_free(cursor_t *c, short op)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 3441 "informix.ec"
-#line 3442 "informix.ec"
+#line 3437 "informix.ec"
+#line 3438 "informix.ec"
   char *cid, *sid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 3443 "informix.ec"
+#line 3439 "informix.ec"
 
 
 	if (op == 1 && !c->is_open)
@@ -4368,11 +4364,11 @@ cursor_close_or_free(cursor_t *c, short op)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 3457 "informix.ec"
+#line 3453 "informix.ec"
   {
-#line 3457 "informix.ec"
+#line 3453 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 3457 "informix.ec"
+#line 3453 "informix.ec"
   }
 	if (SQLCODE < 0)
 		return;
@@ -4381,11 +4377,11 @@ cursor_close_or_free(cursor_t *c, short op)
 /*
  * 	EXEC SQL close :cid;
  */
-#line 3462 "informix.ec"
+#line 3458 "informix.ec"
   {
-#line 3462 "informix.ec"
+#line 3458 "informix.ec"
   sqli_curs_close(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256));
-#line 3462 "informix.ec"
+#line 3458 "informix.ec"
   }
 
 	if (op == 2) {
@@ -4393,20 +4389,20 @@ cursor_close_or_free(cursor_t *c, short op)
 /*
  * 		EXEC SQL free :cid;
  */
-#line 3466 "informix.ec"
+#line 3462 "informix.ec"
   {
-#line 3466 "informix.ec"
+#line 3462 "informix.ec"
   sqli_curs_free(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 258));
-#line 3466 "informix.ec"
+#line 3462 "informix.ec"
   }
 /*
  *                       EXEC SQL free :sid;
  */
-#line 3466 "informix.ec"
+#line 3462 "informix.ec"
   {
-#line 3466 "informix.ec"
+#line 3462 "informix.ec"
   sqli_curs_free(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, sid, 258));
-#line 3466 "informix.ec"
+#line 3462 "informix.ec"
   }
 	}
 }
@@ -4462,14 +4458,14 @@ cursor_initialize(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 3518 "informix.ec"
-#line 3519 "informix.ec"
+#line 3514 "informix.ec"
+#line 3515 "informix.ec"
   char *c_query;
   char *cid, *sid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 3521 "informix.ec"
+#line 3517 "informix.ec"
 
 
 	rb_scan_args(argc, argv, "21", &db, &query, &options);
@@ -4478,11 +4474,11 @@ cursor_initialize(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 3526 "informix.ec"
+#line 3522 "informix.ec"
   {
-#line 3526 "informix.ec"
+#line 3522 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 3526 "informix.ec"
+#line 3522 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -4505,11 +4501,11 @@ cursor_initialize(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL prepare :sid from :c_query;
  */
-#line 3545 "informix.ec"
+#line 3541 "informix.ec"
   {
-#line 3545 "informix.ec"
+#line 3541 "informix.ec"
   sqli_prep(ESQLINTVERSION, sid, c_query,(ifx_literal_t *)0, (ifx_namelist_t *)0, -1, 0, 0 ); 
-#line 3545 "informix.ec"
+#line 3541 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -4518,41 +4514,41 @@ cursor_initialize(int argc, VALUE *argv, VALUE self)
 /*
  * 		EXEC SQL declare :cid scroll cursor with hold for :sid;
  */
-#line 3550 "informix.ec"
+#line 3546 "informix.ec"
   {
-#line 3550 "informix.ec"
+#line 3546 "informix.ec"
   sqli_curs_decl_dynm(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 0), cid, sqli_curs_locate(ESQLINTVERSION, sid, 1), 4128, 0);
-#line 3550 "informix.ec"
+#line 3546 "informix.ec"
   }
 	else if (RTEST(hold))
 /*
  * 		EXEC SQL declare :cid cursor with hold for :sid;
  */
-#line 3552 "informix.ec"
+#line 3548 "informix.ec"
   {
-#line 3552 "informix.ec"
+#line 3548 "informix.ec"
   sqli_curs_decl_dynm(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 0), cid, sqli_curs_locate(ESQLINTVERSION, sid, 1), 4096, 0);
-#line 3552 "informix.ec"
+#line 3548 "informix.ec"
   }
 	else if (RTEST(scroll))
 /*
  * 		EXEC SQL declare :cid scroll cursor for :sid;
  */
-#line 3554 "informix.ec"
+#line 3550 "informix.ec"
   {
-#line 3554 "informix.ec"
+#line 3550 "informix.ec"
   sqli_curs_decl_dynm(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 0), cid, sqli_curs_locate(ESQLINTVERSION, sid, 1), 32, 0);
-#line 3554 "informix.ec"
+#line 3550 "informix.ec"
   }
 	else
 /*
  * 		EXEC SQL declare :cid cursor for :sid;
  */
-#line 3556 "informix.ec"
+#line 3552 "informix.ec"
   {
-#line 3556 "informix.ec"
+#line 3552 "informix.ec"
   sqli_curs_decl_dynm(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 0), cid, sqli_curs_locate(ESQLINTVERSION, sid, 1), 0, 0);
-#line 3556 "informix.ec"
+#line 3552 "informix.ec"
   }
 
 	if (SQLCODE < 0)
@@ -4562,11 +4558,11 @@ cursor_initialize(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL describe :sid into output;
  */
-#line 3562 "informix.ec"
+#line 3558 "informix.ec"
   {
-#line 3562 "informix.ec"
+#line 3558 "informix.ec"
   sqli_describe_stmt(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, sid, 257), &output, 0);
-#line 3562 "informix.ec"
+#line 3558 "informix.ec"
   }
 	c->daOutput = output;
 
@@ -4665,13 +4661,13 @@ cursor_open(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL begin declare section;
  */
-#line 3657 "informix.ec"
-#line 3658 "informix.ec"
+#line 3653 "informix.ec"
+#line 3654 "informix.ec"
   char *cid, *did;
 /*
  * 	EXEC SQL end   declare section;
  */
-#line 3659 "informix.ec"
+#line 3655 "informix.ec"
 
 
 	Data_Get_Struct(self, cursor_t, c);
@@ -4683,11 +4679,11 @@ cursor_open(int argc, VALUE *argv, VALUE self)
 /*
  * 	EXEC SQL set connection :did;
  */
-#line 3667 "informix.ec"
+#line 3663 "informix.ec"
   {
-#line 3667 "informix.ec"
+#line 3663 "informix.ec"
   sqli_connect_set(0, did, 0);
-#line 3667 "informix.ec"
+#line 3663 "informix.ec"
   }
 	if (SQLCODE < 0)
 		rb_raise(rb_eRuntimeError, "Informix Error: %d", SQLCODE);
@@ -4706,11 +4702,11 @@ cursor_open(int argc, VALUE *argv, VALUE self)
  * 			EXEC SQL open :cid using descriptor input
  * 				with reoptimization;
  */
-#line 3681 "informix.ec"
+#line 3677 "informix.ec"
   {
-#line 3682 "informix.ec"
+#line 3678 "informix.ec"
   sqli_curs_open(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), input, (char *)0, (struct value *)0, 1, 1);
-#line 3682 "informix.ec"
+#line 3678 "informix.ec"
   }
 			clean_input_slots(c);
 		}
@@ -4718,22 +4714,22 @@ cursor_open(int argc, VALUE *argv, VALUE self)
 /*
  * 			EXEC SQL open :cid with reoptimization;
  */
-#line 3686 "informix.ec"
+#line 3682 "informix.ec"
   {
-#line 3686 "informix.ec"
+#line 3682 "informix.ec"
   sqli_curs_open(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), (ifx_sqlda_t *)0, (char *)0, (struct value *)0, 0, 1);
-#line 3686 "informix.ec"
+#line 3682 "informix.ec"
   }
 	}
 	else
 /*
  * 		EXEC SQL open :cid;
  */
-#line 3689 "informix.ec"
+#line 3685 "informix.ec"
   {
-#line 3689 "informix.ec"
+#line 3685 "informix.ec"
   sqli_curs_open(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, cid, 256), (ifx_sqlda_t *)0, (char *)0, (struct value *)0, 0, 0);
-#line 3689 "informix.ec"
+#line 3685 "informix.ec"
   }
 
 	if (SQLCODE < 0)
@@ -4993,4 +4989,4 @@ void Init_informix(void)
 	sym_params = ID2SYM(rb_intern("params"));
 }
 
-#line 3946 "informix.ec"
+#line 3942 "informix.ec"