@@ -208,19 +208,19 @@ if (sqlca.sqlcode < 0) exit (1);}
208
208
209
209
210
210
strcpy (msg ,"insert" );
211
- {ECPGdo (__LINE__ ,1 ,1 ,NULL ,0 ,ECPGst_normal ,"insert into t1 values ( 1 , 'a' , 1.0 , 1 , 'a' ) , ( 2 , null , null , null , null ) , (3 , '\"c\"' , - 3 , 'nan' :: float8 , 'c' ) , ( 4 , 'd' , 4.0 , 4 , 'd' )" ,ECPGt_EOIT ,ECPGt_EORT );
212
- #line 86 "sqlda.pgc"
211
+ {ECPGdo (__LINE__ ,1 ,1 ,NULL ,0 ,ECPGst_normal ,"insert into t1 values ( 1 , 'a' , 1.0 , 1 , 'a' ) , ( 2 , null , null , null , null ) , ( 4 , 'd' , 4.0 , 4 , 'd' )" ,ECPGt_EOIT ,ECPGt_EORT );
212
+ #line 85 "sqlda.pgc"
213
213
214
214
if (sqlca .sqlcode < 0 )exit (1 );}
215
- #line 86 "sqlda.pgc"
215
+ #line 85 "sqlda.pgc"
216
216
217
217
218
218
strcpy (msg ,"commit" );
219
219
{ECPGtrans (__LINE__ ,NULL ,"commit" );
220
- #line 89 "sqlda.pgc"
220
+ #line 88 "sqlda.pgc"
221
221
222
222
if (sqlca .sqlcode < 0 )exit (1 );}
223
- #line 89 "sqlda.pgc"
223
+ #line 88 "sqlda.pgc"
224
224
225
225
226
226
/* SQLDA test for getting all records from a table */
@@ -229,29 +229,29 @@ if (sqlca.sqlcode < 0) exit (1);}
229
229
230
230
strcpy (msg ,"prepare" );
231
231
{ECPGprepare (__LINE__ ,NULL ,0 ,"st_id1" ,stmt1 );
232
- #line 96 "sqlda.pgc"
232
+ #line 95 "sqlda.pgc"
233
233
234
234
if (sqlca .sqlcode < 0 )exit (1 );}
235
- #line 96 "sqlda.pgc"
235
+ #line 95 "sqlda.pgc"
236
236
237
237
238
238
strcpy (msg ,"declare" );
239
239
ECPG_informix_reset_sqlca ();/* declare mycur1 cursor for $1 */
240
- #line 99 "sqlda.pgc"
240
+ #line 98 "sqlda.pgc"
241
241
242
242
243
243
strcpy (msg ,"open" );
244
244
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,0 ,ECPGst_normal ,"declare mycur1 cursor for $1" ,
245
245
ECPGt_char_variable ,(ECPGprepared_statement (NULL ,"st_id1" ,__LINE__ )),(long )1 ,(long )1 ,(1 )* sizeof (char ),
246
246
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,ECPGt_EORT );
247
- #line 102 "sqlda.pgc"
247
+ #line 101 "sqlda.pgc"
248
248
249
249
if (sqlca .sqlcode < 0 )exit (1 );}
250
- #line 102 "sqlda.pgc"
250
+ #line 101 "sqlda.pgc"
251
251
252
252
253
253
/* exec sql whenever not found break ; */
254
- #line 104 "sqlda.pgc"
254
+ #line 103 "sqlda.pgc"
255
255
256
256
257
257
rec = 0 ;
@@ -261,37 +261,37 @@ if (sqlca.sqlcode < 0) exit (1);}
261
261
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,0 ,ECPGst_normal ,"fetch 1 from mycur1" ,ECPGt_EOIT ,
262
262
ECPGt_sqlda ,& outp_sqlda ,0L ,0L ,0L ,
263
263
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EORT );
264
- #line 110 "sqlda.pgc"
264
+ #line 109 "sqlda.pgc"
265
265
266
266
if (sqlca .sqlcode == ECPG_NOT_FOUND )break ;
267
- #line 110 "sqlda.pgc"
267
+ #line 109 "sqlda.pgc"
268
268
269
269
if (sqlca .sqlcode < 0 )exit (1 );}
270
- #line 110 "sqlda.pgc"
270
+ #line 109 "sqlda.pgc"
271
271
272
272
273
273
printf ("FETCH RECORD %d\n" ,++ rec );
274
274
dump_sqlda (outp_sqlda );
275
275
}
276
276
277
277
/* exec sql whenever not found continue ; */
278
- #line 116 "sqlda.pgc"
278
+ #line 115 "sqlda.pgc"
279
279
280
280
281
281
strcpy (msg ,"close" );
282
282
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,0 ,ECPGst_normal ,"close mycur1" ,ECPGt_EOIT ,ECPGt_EORT );
283
- #line 119 "sqlda.pgc"
283
+ #line 118 "sqlda.pgc"
284
284
285
285
if (sqlca .sqlcode < 0 )exit (1 );}
286
- #line 119 "sqlda.pgc"
286
+ #line 118 "sqlda.pgc"
287
287
288
288
289
289
strcpy (msg ,"deallocate" );
290
290
{ECPGdeallocate (__LINE__ ,1 ,NULL ,"st_id1" );
291
- #line 122 "sqlda.pgc"
291
+ #line 121 "sqlda.pgc"
292
292
293
293
if (sqlca .sqlcode < 0 )exit (1 );}
294
- #line 122 "sqlda.pgc"
294
+ #line 121 "sqlda.pgc"
295
295
296
296
297
297
free (outp_sqlda );
@@ -304,29 +304,29 @@ if (sqlca.sqlcode < 0) exit (1);}
304
304
305
305
strcpy (msg ,"prepare" );
306
306
{ECPGprepare (__LINE__ ,NULL ,0 ,"st_id2" ,stmt1 );
307
- #line 133 "sqlda.pgc"
307
+ #line 132 "sqlda.pgc"
308
308
309
309
if (sqlca .sqlcode < 0 )exit (1 );}
310
- #line 133 "sqlda.pgc"
310
+ #line 132 "sqlda.pgc"
311
311
312
312
313
313
strcpy (msg ,"declare" );
314
314
ECPG_informix_reset_sqlca ();/* declare mycur2 cursor for $1 */
315
- #line 136 "sqlda.pgc"
315
+ #line 135 "sqlda.pgc"
316
316
317
317
318
318
strcpy (msg ,"open" );
319
319
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,0 ,ECPGst_normal ,"declare mycur2 cursor for $1" ,
320
320
ECPGt_char_variable ,(ECPGprepared_statement (NULL ,"st_id2" ,__LINE__ )),(long )1 ,(long )1 ,(1 )* sizeof (char ),
321
321
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,ECPGt_EORT );
322
- #line 139 "sqlda.pgc"
322
+ #line 138 "sqlda.pgc"
323
323
324
324
if (sqlca .sqlcode < 0 )exit (1 );}
325
- #line 139 "sqlda.pgc"
325
+ #line 138 "sqlda.pgc"
326
326
327
327
328
328
/* exec sql whenever not found break ; */
329
- #line 141 "sqlda.pgc"
329
+ #line 140 "sqlda.pgc"
330
330
331
331
332
332
rec = 0 ;
@@ -336,37 +336,37 @@ if (sqlca.sqlcode < 0) exit (1);}
336
336
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,0 ,ECPGst_normal ,"fetch from mycur2" ,ECPGt_EOIT ,
337
337
ECPGt_sqlda ,& outp_sqlda ,0L ,0L ,0L ,
338
338
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EORT );
339
- #line 147 "sqlda.pgc"
339
+ #line 146 "sqlda.pgc"
340
340
341
341
if (sqlca .sqlcode == ECPG_NOT_FOUND )break ;
342
- #line 147 "sqlda.pgc"
342
+ #line 146 "sqlda.pgc"
343
343
344
344
if (sqlca .sqlcode < 0 )exit (1 );}
345
- #line 147 "sqlda.pgc"
345
+ #line 146 "sqlda.pgc"
346
346
347
347
348
348
printf ("FETCH RECORD %d\n" ,++ rec );
349
349
dump_sqlda (outp_sqlda );
350
350
}
351
351
352
352
/* exec sql whenever not found continue ; */
353
- #line 153 "sqlda.pgc"
353
+ #line 152 "sqlda.pgc"
354
354
355
355
356
356
strcpy (msg ,"close" );
357
357
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,0 ,ECPGst_normal ,"close mycur2" ,ECPGt_EOIT ,ECPGt_EORT );
358
- #line 156 "sqlda.pgc"
358
+ #line 155 "sqlda.pgc"
359
359
360
360
if (sqlca .sqlcode < 0 )exit (1 );}
361
- #line 156 "sqlda.pgc"
361
+ #line 155 "sqlda.pgc"
362
362
363
363
364
364
strcpy (msg ,"deallocate" );
365
365
{ECPGdeallocate (__LINE__ ,1 ,NULL ,"st_id2" );
366
- #line 159 "sqlda.pgc"
366
+ #line 158 "sqlda.pgc"
367
367
368
368
if (sqlca .sqlcode < 0 )exit (1 );}
369
- #line 159 "sqlda.pgc"
369
+ #line 158 "sqlda.pgc"
370
370
371
371
372
372
free (outp_sqlda );
@@ -391,10 +391,10 @@ if (sqlca.sqlcode < 0) exit (1);}
391
391
392
392
strcpy (msg ,"prepare" );
393
393
{ECPGprepare (__LINE__ ,NULL ,0 ,"st_id3" ,stmt2 );
394
- #line 182 "sqlda.pgc"
394
+ #line 181 "sqlda.pgc"
395
395
396
396
if (sqlca .sqlcode < 0 )exit (1 );}
397
- #line 182 "sqlda.pgc"
397
+ #line 181 "sqlda.pgc"
398
398
399
399
400
400
strcpy (msg ,"execute" );
@@ -403,20 +403,20 @@ if (sqlca.sqlcode < 0) exit (1);}
403
403
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,
404
404
ECPGt_sqlda ,& outp_sqlda ,0L ,0L ,0L ,
405
405
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EORT );
406
- #line 185 "sqlda.pgc"
406
+ #line 184 "sqlda.pgc"
407
407
408
408
if (sqlca .sqlcode < 0 )exit (1 );}
409
- #line 185 "sqlda.pgc"
409
+ #line 184 "sqlda.pgc"
410
410
411
411
412
412
dump_sqlda (outp_sqlda );
413
413
414
414
strcpy (msg ,"deallocate" );
415
415
{ECPGdeallocate (__LINE__ ,1 ,NULL ,"st_id3" );
416
- #line 190 "sqlda.pgc"
416
+ #line 189 "sqlda.pgc"
417
417
418
418
if (sqlca .sqlcode < 0 )exit (1 );}
419
- #line 190 "sqlda.pgc"
419
+ #line 189 "sqlda.pgc"
420
420
421
421
422
422
free (inp_sqlda -> sqlvar );
@@ -428,10 +428,10 @@ if (sqlca.sqlcode < 0) exit (1);}
428
428
*/
429
429
430
430
{ECPGconnect (__LINE__ ,1 ,"regress1" ,NULL ,NULL ,"con2" ,0 );
431
- #line 200 "sqlda.pgc"
431
+ #line 199 "sqlda.pgc"
432
432
433
433
if (sqlca .sqlcode < 0 )exit (1 );}
434
- #line 200 "sqlda.pgc"
434
+ #line 199 "sqlda.pgc"
435
435
436
436
437
437
/* Input sqlda has to be built manually */
@@ -452,10 +452,10 @@ if (sqlca.sqlcode < 0) exit (1);}
452
452
453
453
strcpy (msg ,"prepare" );
454
454
{ECPGprepare (__LINE__ ,"con2" ,0 ,"st_id4" ,stmt2 );
455
- #line 219 "sqlda.pgc"
455
+ #line 218 "sqlda.pgc"
456
456
457
457
if (sqlca .sqlcode < 0 )exit (1 );}
458
- #line 219 "sqlda.pgc"
458
+ #line 218 "sqlda.pgc"
459
459
460
460
461
461
strcpy (msg ,"execute" );
@@ -464,28 +464,28 @@ if (sqlca.sqlcode < 0) exit (1);}
464
464
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,
465
465
ECPGt_sqlda ,& outp_sqlda ,0L ,0L ,0L ,
466
466
ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EORT );
467
- #line 222 "sqlda.pgc"
467
+ #line 221 "sqlda.pgc"
468
468
469
469
if (sqlca .sqlcode < 0 )exit (1 );}
470
- #line 222 "sqlda.pgc"
470
+ #line 221 "sqlda.pgc"
471
471
472
472
473
473
dump_sqlda (outp_sqlda );
474
474
475
475
strcpy (msg ,"commit" );
476
476
{ECPGtrans (__LINE__ ,"con2" ,"commit" );
477
- #line 227 "sqlda.pgc"
477
+ #line 226 "sqlda.pgc"
478
478
479
479
if (sqlca .sqlcode < 0 )exit (1 );}
480
- #line 227 "sqlda.pgc"
480
+ #line 226 "sqlda.pgc"
481
481
482
482
483
483
strcpy (msg ,"deallocate" );
484
484
{ECPGdeallocate (__LINE__ ,1 ,NULL ,"st_id4" );
485
- #line 230 "sqlda.pgc"
485
+ #line 229 "sqlda.pgc"
486
486
487
487
if (sqlca .sqlcode < 0 )exit (1 );}
488
- #line 230 "sqlda.pgc"
488
+ #line 229 "sqlda.pgc"
489
489
490
490
491
491
free (inp_sqlda -> sqlvar );
@@ -494,36 +494,36 @@ if (sqlca.sqlcode < 0) exit (1);}
494
494
495
495
strcpy (msg ,"disconnect" );
496
496
{ECPGdisconnect (__LINE__ ,"con2" );
497
- #line 237 "sqlda.pgc"
497
+ #line 236 "sqlda.pgc"
498
498
499
499
if (sqlca .sqlcode < 0 )exit (1 );}
500
- #line 237 "sqlda.pgc"
500
+ #line 236 "sqlda.pgc"
501
501
502
502
503
503
/* End test */
504
504
505
505
strcpy (msg ,"drop" );
506
506
{ECPGdo (__LINE__ ,1 ,1 ,NULL ,0 ,ECPGst_normal ,"drop table t1" ,ECPGt_EOIT ,ECPGt_EORT );
507
- #line 242 "sqlda.pgc"
507
+ #line 241 "sqlda.pgc"
508
508
509
509
if (sqlca .sqlcode < 0 )exit (1 );}
510
- #line 242 "sqlda.pgc"
510
+ #line 241 "sqlda.pgc"
511
511
512
512
513
513
strcpy (msg ,"commit" );
514
514
{ECPGtrans (__LINE__ ,NULL ,"commit" );
515
- #line 245 "sqlda.pgc"
515
+ #line 244 "sqlda.pgc"
516
516
517
517
if (sqlca .sqlcode < 0 )exit (1 );}
518
- #line 245 "sqlda.pgc"
518
+ #line 244 "sqlda.pgc"
519
519
520
520
521
521
strcpy (msg ,"disconnect" );
522
522
{ECPGdisconnect (__LINE__ ,"CURRENT" );
523
- #line 248 "sqlda.pgc"
523
+ #line 247 "sqlda.pgc"
524
524
525
525
if (sqlca .sqlcode < 0 )exit (1 );}
526
- #line 248 "sqlda.pgc"
526
+ #line 247 "sqlda.pgc"
527
527
528
528
529
529
return (0 );