@@ -58,7 +58,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
58
58
59
59
if (sqlca .sqlcode != 0 ) exit (1 );
60
60
61
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "create table test ( i int primary key , j int ) " , ECPGt_EOIT , ECPGt_EORT );
61
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "create table test ( i int primary key , j int ) " , ECPGt_EOIT , ECPGt_EORT );
62
62
#line 23 "test_informix.pgc"
63
63
64
64
if (sqlca .sqlcode < 0 ) dosqlprint ( );}
@@ -67,7 +67,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
67
67
68
68
/* this INSERT works */
69
69
rsetnull (CDECIMALTYPE , (char * )& j );
70
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "insert into test ( i , j ) values ( 7 , $1 ) " ,
70
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "insert into test ( i , j ) values ( 7 , $1 ) " ,
71
71
ECPGt_decimal ,& (j ),(long )1 ,(long )1 ,sizeof (decimal ),
72
72
ECPGt_NO_INDICATOR , NULL , 0L , 0L , 0L , ECPGt_EOIT , ECPGt_EORT );
73
73
#line 27 "test_informix.pgc"
@@ -83,7 +83,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
83
83
84
84
85
85
/* this INSERT should fail because i is a unique column */
86
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "insert into test ( i , j ) values ( 7 , 12 ) " , ECPGt_EOIT , ECPGt_EORT );
86
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "insert into test ( i , j ) values ( 7 , 12 ) " , ECPGt_EOIT , ECPGt_EORT );
87
87
#line 31 "test_informix.pgc"
88
88
89
89
if (sqlca .sqlcode < 0 ) dosqlprint ( );}
@@ -97,7 +97,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
97
97
#line 33 "test_informix.pgc"
98
98
99
99
100
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "insert into test ( i , j ) values ( $1 , 1 ) " ,
100
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "insert into test ( i , j ) values ( $1 , 1 ) " ,
101
101
ECPGt_int ,& (i ),(long )1 ,(long )1 ,sizeof (int ),
102
102
ECPGt_NO_INDICATOR , NULL , 0L , 0L , 0L , ECPGt_EOIT , ECPGt_EORT );
103
103
#line 35 "test_informix.pgc"
@@ -113,7 +113,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
113
113
114
114
115
115
/* this will fail (more than one row in subquery) */
116
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "select i from test where j = ( select j from test ) " , ECPGt_EOIT , ECPGt_EORT );
116
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "select i from test where j = ( select j from test ) " , ECPGt_EOIT , ECPGt_EORT );
117
117
#line 39 "test_informix.pgc"
118
118
119
119
if (sqlca .sqlcode < 0 ) dosqlprint ( );}
@@ -127,7 +127,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
127
127
128
128
129
129
/* this however should be ok */
130
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "select i from test where j = ( select j from test order by i limit 1 ) " , ECPGt_EOIT , ECPGt_EORT );
130
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "select i from test where j = ( select j from test order by i limit 1 ) " , ECPGt_EOIT , ECPGt_EORT );
131
131
#line 43 "test_informix.pgc"
132
132
133
133
if (sqlca .sqlcode < 0 ) dosqlprint ( );}
@@ -151,7 +151,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
151
151
152
152
while (1 )
153
153
{
154
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "fetch forward from c" , ECPGt_EOIT ,
154
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "fetch forward from c" , ECPGt_EOIT ,
155
155
ECPGt_int ,& (i ),(long )1 ,(long )1 ,sizeof (int ),
156
156
ECPGt_NO_INDICATOR , NULL , 0L , 0L , 0L ,
157
157
ECPGt_decimal ,& (j ),(long )1 ,(long )1 ,sizeof (decimal ),
@@ -178,7 +178,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
178
178
deccvint (7 , & j );
179
179
deccvint (14 , & m );
180
180
decadd (& j , & m , & n );
181
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "delete from test where i = $1 :: decimal " ,
181
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "delete from test where i = $1 :: decimal " ,
182
182
ECPGt_decimal ,& (n ),(long )1 ,(long )1 ,sizeof (decimal ),
183
183
ECPGt_NO_INDICATOR , NULL , 0L , 0L , 0L , ECPGt_EOIT , ECPGt_EORT );
184
184
#line 72 "test_informix.pgc"
@@ -188,15 +188,15 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
188
188
189
189
printf ("DELETE: %ld\n" , sqlca .sqlcode );
190
190
191
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "select 1 from test where i = 14 " , ECPGt_EOIT , ECPGt_EORT );
191
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "select 1 from test where i = 14 " , ECPGt_EOIT , ECPGt_EORT );
192
192
#line 75 "test_informix.pgc"
193
193
194
194
if (sqlca .sqlcode < 0 ) dosqlprint ( );}
195
195
#line 75 "test_informix.pgc"
196
196
197
197
printf ("Exists: %ld\n" , sqlca .sqlcode );
198
198
199
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "select 1 from test where i = 147 " , ECPGt_EOIT , ECPGt_EORT );
199
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "select 1 from test where i = 147 " , ECPGt_EOIT , ECPGt_EORT );
200
200
#line 78 "test_informix.pgc"
201
201
202
202
if (sqlca .sqlcode < 0 ) dosqlprint ( );}
@@ -210,7 +210,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
210
210
if (sqlca .sqlcode < 0 ) dosqlprint ( );}
211
211
#line 81 "test_informix.pgc"
212
212
213
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "drop table test " , ECPGt_EOIT , ECPGt_EORT );
213
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "drop table test " , ECPGt_EOIT , ECPGt_EORT );
214
214
#line 82 "test_informix.pgc"
215
215
216
216
if (sqlca .sqlcode < 0 ) dosqlprint ( );}
@@ -235,7 +235,7 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
235
235
236
236
static void openit (void )
237
237
{
238
- { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , 0 , "declare c cursor for select * from test where i <= $1 " ,
238
+ { ECPGdo (__LINE__ , 1 , 1 , NULL , 0 , ECPGst_normal , "declare c cursor for select * from test where i <= $1 " ,
239
239
ECPGt_int ,& (* ( int * )(ECPG_informix_get_var ( 0 ))),(long )1 ,(long )1 ,sizeof (int ),
240
240
ECPGt_NO_INDICATOR , NULL , 0L , 0L , 0L , ECPGt_EOIT , ECPGt_EORT );
241
241
#line 92 "test_informix.pgc"
0 commit comments