10
10
11
11
#line 1 "test_informix.pgc"
12
12
#include "sqltypes.h"
13
-
13
+ #include <stdlib.h>
14
+ #
14
15
15
16
#line 1 "./../regression.h"
16
17
19
20
20
21
21
22
22
- #line 3 "test_informix.pgc"
23
+ #line 4 "test_informix.pgc"
23
24
24
25
25
26
@@ -31,111 +32,111 @@ static void dosqlprint(void) {
31
32
int main (void )
32
33
{
33
34
34
- #line 13 "test_informix.pgc"
35
+ #line 14 "test_informix.pgc"
35
36
int i = 14 ;
36
37
37
- #line 13 "test_informix.pgc"
38
+ #line 14 "test_informix.pgc"
38
39
39
40
40
- #line 14 "test_informix.pgc"
41
+ #line 15 "test_informix.pgc"
41
42
decimal j ,m ,n ;
42
43
43
- #line 14 "test_informix.pgc"
44
+ #line 15 "test_informix.pgc"
44
45
45
46
46
47
ECPGdebug (1 ,stderr );
47
48
/* exec sql whenever sqlerror do dosqlprint ( ) ; */
48
- #line 17 "test_informix.pgc"
49
+ #line 18 "test_informix.pgc"
49
50
50
51
51
52
{ECPGconnect (__LINE__ ,1 ,"regress1" ,NULL ,NULL ,NULL ,0 );
52
- #line 19 "test_informix.pgc"
53
+ #line 20 "test_informix.pgc"
53
54
54
55
if (sqlca .sqlcode < 0 )dosqlprint ( );}
55
- #line 19 "test_informix.pgc"
56
+ #line 20 "test_informix.pgc"
56
57
57
58
if (sqlca .sqlcode != 0 )exit (1 );
58
59
59
60
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"create table test ( i int primary key , j int ) " ,ECPGt_EOIT ,ECPGt_EORT );
60
- #line 22 "test_informix.pgc"
61
+ #line 23 "test_informix.pgc"
61
62
62
63
if (sqlca .sqlcode < 0 )dosqlprint ( );}
63
- #line 22 "test_informix.pgc"
64
+ #line 23 "test_informix.pgc"
64
65
65
66
66
67
/* this INSERT works */
67
68
rsetnull (CDECIMALTYPE , (char * )& j );
68
69
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"insert into test ( i , j ) values( 7 , ? )" ,
69
70
ECPGt_decimal ,& (j ),(long )1 ,(long )1 ,sizeof (decimal ),
70
71
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,ECPGt_EORT );
71
- #line 26 "test_informix.pgc"
72
+ #line 27 "test_informix.pgc"
72
73
73
74
if (sqlca .sqlcode < 0 )dosqlprint ( );}
74
- #line 26 "test_informix.pgc"
75
+ #line 27 "test_informix.pgc"
75
76
76
77
{ECPGtrans (__LINE__ ,NULL ,"commit" );
77
- #line 27 "test_informix.pgc"
78
+ #line 28 "test_informix.pgc"
78
79
79
80
if (sqlca .sqlcode < 0 )dosqlprint ( );}
80
- #line 27 "test_informix.pgc"
81
+ #line 28 "test_informix.pgc"
81
82
82
83
83
84
/* this INSERT should fail because i is a unique column */
84
85
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"insert into test ( i , j ) values( 7 , 12 )" ,ECPGt_EOIT ,ECPGt_EORT );
85
- #line 30 "test_informix.pgc"
86
+ #line 31 "test_informix.pgc"
86
87
87
88
if (sqlca .sqlcode < 0 )dosqlprint ( );}
88
- #line 30 "test_informix.pgc"
89
+ #line 31 "test_informix.pgc"
89
90
90
91
printf ("INSERT: %ld=%s\n" ,sqlca .sqlcode ,sqlca .sqlerrm .sqlerrmc );
91
92
if (sqlca .sqlcode != 0 ) {ECPGtrans (__LINE__ ,NULL ,"rollback" );
92
- #line 32 "test_informix.pgc"
93
+ #line 33 "test_informix.pgc"
93
94
94
95
if (sqlca .sqlcode < 0 )dosqlprint ( );}
95
- #line 32 "test_informix.pgc"
96
+ #line 33 "test_informix.pgc"
96
97
97
98
98
99
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"insert into test ( i , j ) values( ? , 1 )" ,
99
100
ECPGt_int ,& (i ),(long )1 ,(long )1 ,sizeof (int ),
100
101
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,ECPGt_EORT );
101
- #line 34 "test_informix.pgc"
102
+ #line 35 "test_informix.pgc"
102
103
103
104
if (sqlca .sqlcode < 0 )dosqlprint ( );}
104
- #line 34 "test_informix.pgc"
105
+ #line 35 "test_informix.pgc"
105
106
106
107
{ECPGtrans (__LINE__ ,NULL ,"commit" );
107
- #line 35 "test_informix.pgc"
108
+ #line 36 "test_informix.pgc"
108
109
109
110
if (sqlca .sqlcode < 0 )dosqlprint ( );}
110
- #line 35 "test_informix.pgc"
111
+ #line 36 "test_informix.pgc"
111
112
112
113
113
114
/* this will fail (more than one row in subquery) */
114
115
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"select i from test where j = ( select j from test ) " ,ECPGt_EOIT ,ECPGt_EORT );
115
- #line 38 "test_informix.pgc"
116
+ #line 39 "test_informix.pgc"
116
117
117
118
if (sqlca .sqlcode < 0 )dosqlprint ( );}
118
- #line 38 "test_informix.pgc"
119
+ #line 39 "test_informix.pgc"
119
120
120
121
121
122
/* this however should be ok */
122
123
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"select i from test where j = ( select j from test limit 1 ) " ,ECPGt_EOIT ,ECPGt_EORT );
123
- #line 41 "test_informix.pgc"
124
+ #line 42 "test_informix.pgc"
124
125
125
126
if (sqlca .sqlcode < 0 )dosqlprint ( );}
126
- #line 41 "test_informix.pgc"
127
+ #line 42 "test_informix.pgc"
127
128
128
129
printf ("SELECT: %ld=%s\n" ,sqlca .sqlcode ,sqlca .sqlerrm .sqlerrmc );
129
130
if (sqlca .sqlcode != 0 ) {ECPGtrans (__LINE__ ,NULL ,"rollback" );
130
- #line 43 "test_informix.pgc"
131
+ #line 44 "test_informix.pgc"
131
132
132
133
if (sqlca .sqlcode < 0 )dosqlprint ( );}
133
- #line 43 "test_informix.pgc"
134
+ #line 44 "test_informix.pgc"
134
135
135
136
136
137
ECPG_informix_set_var (0 ,& (i ),__LINE__ );\
137
138
/* declare c cursor for select * from test where i <= ? */
138
- #line 45 "test_informix.pgc"
139
+ #line 46 "test_informix.pgc"
139
140
140
141
openit ();
141
142
@@ -148,10 +149,10 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
148
149
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,
149
150
ECPGt_decimal ,& (j ),(long )1 ,(long )1 ,sizeof (decimal ),
150
151
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EORT );
151
- #line 52 "test_informix.pgc"
152
+ #line 53 "test_informix.pgc"
152
153
153
154
if (sqlca .sqlcode < 0 )dosqlprint ( );}
154
- #line 52 "test_informix.pgc"
155
+ #line 53 "test_informix.pgc"
155
156
156
157
if (sqlca .sqlcode == 100 )break ;
157
158
else if (sqlca .sqlcode != 0 )printf ("Error: %ld\n" ,sqlca .sqlcode );
@@ -173,53 +174,53 @@ if (sqlca.sqlcode < 0) dosqlprint ( );}
173
174
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"delete from test where i = ?" ,
174
175
ECPGt_decimal ,& (n ),(long )1 ,(long )1 ,sizeof (decimal ),
175
176
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,ECPGt_EORT );
176
- #line 70 "test_informix.pgc"
177
+ #line 71 "test_informix.pgc"
177
178
178
179
if (sqlca .sqlcode < 0 )dosqlprint ( );}
179
- #line 70 "test_informix.pgc"
180
+ #line 71 "test_informix.pgc"
180
181
181
182
printf ("DELETE: %ld\n" ,sqlca .sqlcode );
182
183
183
184
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"select 1 from test where i = 14 " ,ECPGt_EOIT ,ECPGt_EORT );
184
- #line 73 "test_informix.pgc"
185
+ #line 74 "test_informix.pgc"
185
186
186
187
if (sqlca .sqlcode < 0 )dosqlprint ( );}
187
- #line 73 "test_informix.pgc"
188
+ #line 74 "test_informix.pgc"
188
189
189
190
printf ("Exists: %ld\n" ,sqlca .sqlcode );
190
191
191
192
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"select 1 from test where i = 147 " ,ECPGt_EOIT ,ECPGt_EORT );
192
- #line 76 "test_informix.pgc"
193
+ #line 77 "test_informix.pgc"
193
194
194
195
if (sqlca .sqlcode < 0 )dosqlprint ( );}
195
- #line 76 "test_informix.pgc"
196
+ #line 77 "test_informix.pgc"
196
197
197
198
printf ("Does not exist: %ld\n" ,sqlca .sqlcode );
198
199
199
200
{ECPGtrans (__LINE__ ,NULL ,"commit" );
200
- #line 79 "test_informix.pgc"
201
+ #line 80 "test_informix.pgc"
201
202
202
203
if (sqlca .sqlcode < 0 )dosqlprint ( );}
203
- #line 79 "test_informix.pgc"
204
+ #line 80 "test_informix.pgc"
204
205
205
206
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"drop table test " ,ECPGt_EOIT ,ECPGt_EORT );
206
- #line 80 "test_informix.pgc"
207
+ #line 81 "test_informix.pgc"
207
208
208
209
if (sqlca .sqlcode < 0 )dosqlprint ( );}
209
- #line 80 "test_informix.pgc"
210
+ #line 81 "test_informix.pgc"
210
211
211
212
{ECPGtrans (__LINE__ ,NULL ,"commit" );
212
- #line 81 "test_informix.pgc"
213
+ #line 82 "test_informix.pgc"
213
214
214
215
if (sqlca .sqlcode < 0 )dosqlprint ( );}
215
- #line 81 "test_informix.pgc"
216
+ #line 82 "test_informix.pgc"
216
217
217
218
218
219
{ECPGdisconnect (__LINE__ ,"CURRENT" );
219
- #line 83 "test_informix.pgc"
220
+ #line 84 "test_informix.pgc"
220
221
221
222
if (sqlca .sqlcode < 0 )dosqlprint ( );}
222
- #line 83 "test_informix.pgc"
223
+ #line 84 "test_informix.pgc"
223
224
224
225
225
226
return 0 ;
@@ -230,10 +231,10 @@ static void openit(void)
230
231
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,"declare c cursor for select * from test where i <= ? " ,
231
232
ECPGt_int ,& (* (int * )(ECPG_informix_get_var (0 ))),(long )1 ,(long )1 ,sizeof (int ),
232
233
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,ECPGt_EORT );
233
- #line 90 "test_informix.pgc"
234
+ #line 91 "test_informix.pgc"
234
235
235
236
if (sqlca .sqlcode < 0 )dosqlprint ( );}
236
- #line 90 "test_informix.pgc"
237
+ #line 91 "test_informix.pgc"
237
238
238
239
}
239
240