@@ -149,6 +149,14 @@ dump_sqlda(sqlda_t *sqlda)
149149case ECPGt_int :
150150printf ("name sqlda descriptor: '%s' value %d\n" ,sqlda -> sqlvar [i ].sqlname .data ,* (int * )sqlda -> sqlvar [i ].sqldata );
151151break ;
152+ case ECPGt_long :
153+ printf ("name sqlda descriptor: '%s' value %ld\n" ,sqlda -> sqlvar [i ].sqlname .data ,* (longint * )sqlda -> sqlvar [i ].sqldata );
154+ break ;
155+ #ifdef HAVE_LONG_LONG_INT
156+ case ECPGt_long_long :
157+ printf ("name sqlda descriptor: '%s' value %lld\n" ,sqlda -> sqlvar [i ].sqlname .data ,* (long longint * )sqlda -> sqlvar [i ].sqldata );
158+ break ;
159+ #endif
152160case ECPGt_double :
153161printf ("name sqlda descriptor: '%s' value %lf\n" ,sqlda -> sqlvar [i ].sqlname .data ,* (double * )sqlda -> sqlvar [i ].sqldata );
154162break ;
@@ -174,19 +182,19 @@ main (void)
174182
175183
176184
177- #line 59 "sqlda.pgc"
185+ #line 67 "sqlda.pgc"
178186char * stmt1 = "SELECT * FROM t1" ;
179187
180- #line 60 "sqlda.pgc"
188+ #line 68 "sqlda.pgc"
181189char * stmt2 = "SELECT * FROM t1 WHERE id = ?" ;
182190
183- #line 61 "sqlda.pgc"
191+ #line 69 "sqlda.pgc"
184192int rec ;
185193
186- #line 62 "sqlda.pgc"
194+ #line 70 "sqlda.pgc"
187195int id ;
188196/* exec sql end declare section */
189- #line 63 "sqlda.pgc"
197+ #line 71 "sqlda.pgc"
190198
191199
192200char msg [128 ];
@@ -195,42 +203,42 @@ main (void)
195203
196204strcpy (msg ,"connect" );
197205{ECPGconnect (__LINE__ ,0 ,"ecpg1_regression" ,NULL ,NULL ,"regress1" ,0 );
198- #line 70 "sqlda.pgc"
206+ #line 78 "sqlda.pgc"
199207
200208if (sqlca .sqlcode < 0 )exit (1 );}
201- #line 70 "sqlda.pgc"
209+ #line 78 "sqlda.pgc"
202210
203211
204212strcpy (msg ,"set" );
205213{ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"set datestyle to iso" ,ECPGt_EOIT ,ECPGt_EORT );
206- #line 73 "sqlda.pgc"
214+ #line 81 "sqlda.pgc"
207215
208216if (sqlca .sqlcode < 0 )exit (1 );}
209- #line 73 "sqlda.pgc"
217+ #line 81 "sqlda.pgc"
210218
211219
212220strcpy (msg ,"create" );
213- {ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"create table t1 ( id integer , t text , d1 numeric , d2 float8 , c char ( 10 ) )" ,ECPGt_EOIT ,ECPGt_EORT );
214- #line 81 "sqlda.pgc"
221+ {ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"create table t1 ( id integer , t text , d1 numeric , d2 float8 , c char ( 10 ), big bigint )" ,ECPGt_EOIT ,ECPGt_EORT );
222+ #line 91 "sqlda.pgc"
215223
216224if (sqlca .sqlcode < 0 )exit (1 );}
217- #line 81 "sqlda.pgc"
225+ #line 91 "sqlda.pgc"
218226
219227
220228strcpy (msg ,"insert" );
221- {ECPGdo (__LINE__ ,0 ,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 );
222- #line 87 "sqlda.pgc"
229+ {ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"insert into t1 values ( 1 , 'a' , 1.0 , 1 , 'a', 1111111111111111111 ) , ( 2 , null , null , null , null, null ) , ( 4 , 'd' , 4.0 , 4 , 'd' , 4444444444444444444 )" ,ECPGt_EOIT ,ECPGt_EORT );
230+ #line 97 "sqlda.pgc"
223231
224232if (sqlca .sqlcode < 0 )exit (1 );}
225- #line 87 "sqlda.pgc"
233+ #line 97 "sqlda.pgc"
226234
227235
228236strcpy (msg ,"commit" );
229237{ECPGtrans (__LINE__ ,NULL ,"commit" );
230- #line 90 "sqlda.pgc"
238+ #line 100 "sqlda.pgc"
231239
232240if (sqlca .sqlcode < 0 )exit (1 );}
233- #line 90 "sqlda.pgc"
241+ #line 100 "sqlda.pgc"
234242
235243
236244/* SQLDA test for getting all records from a table */
@@ -239,29 +247,29 @@ if (sqlca.sqlcode < 0) exit (1);}
239247
240248strcpy (msg ,"prepare" );
241249{ECPGprepare (__LINE__ ,NULL ,0 ,"st_id1" ,stmt1 );
242- #line 97 "sqlda.pgc"
250+ #line 107 "sqlda.pgc"
243251
244252if (sqlca .sqlcode < 0 )exit (1 );}
245- #line 97 "sqlda.pgc"
253+ #line 107 "sqlda.pgc"
246254
247255
248256strcpy (msg ,"declare" );
249257/* declare mycur1 cursor for $1 */
250- #line 100 "sqlda.pgc"
258+ #line 110 "sqlda.pgc"
251259
252260
253261strcpy (msg ,"open" );
254262{ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"declare mycur1 cursor for $1" ,
255263ECPGt_char_variable ,(ECPGprepared_statement (NULL ,"st_id1" ,__LINE__ )),(long )1 ,(long )1 ,(1 )* sizeof (char ),
256264ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,ECPGt_EORT );
257- #line 103 "sqlda.pgc"
265+ #line 113 "sqlda.pgc"
258266
259267if (sqlca .sqlcode < 0 )exit (1 );}
260- #line 103 "sqlda.pgc"
268+ #line 113 "sqlda.pgc"
261269
262270
263271/* exec sql whenever not found break ; */
264- #line 105 "sqlda.pgc"
272+ #line 115 "sqlda.pgc"
265273
266274
267275rec = 0 ;
@@ -271,37 +279,37 @@ if (sqlca.sqlcode < 0) exit (1);}
271279{ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"fetch 1 from mycur1" ,ECPGt_EOIT ,
272280ECPGt_sqlda ,& outp_sqlda ,0L ,0L ,0L ,
273281ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EORT );
274- #line 111 "sqlda.pgc"
282+ #line 121 "sqlda.pgc"
275283
276284if (sqlca .sqlcode == ECPG_NOT_FOUND )break ;
277- #line 111 "sqlda.pgc"
285+ #line 121 "sqlda.pgc"
278286
279287if (sqlca .sqlcode < 0 )exit (1 );}
280- #line 111 "sqlda.pgc"
288+ #line 121 "sqlda.pgc"
281289
282290
283291printf ("FETCH RECORD %d\n" ,++ rec );
284292dump_sqlda (outp_sqlda );
285293}
286294
287295/* exec sql whenever not found continue ; */
288- #line 117 "sqlda.pgc"
296+ #line 127 "sqlda.pgc"
289297
290298
291299strcpy (msg ,"close" );
292300{ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"close mycur1" ,ECPGt_EOIT ,ECPGt_EORT );
293- #line 120 "sqlda.pgc"
301+ #line 130 "sqlda.pgc"
294302
295303if (sqlca .sqlcode < 0 )exit (1 );}
296- #line 120 "sqlda.pgc"
304+ #line 130 "sqlda.pgc"
297305
298306
299307strcpy (msg ,"deallocate" );
300308{ECPGdeallocate (__LINE__ ,0 ,NULL ,"st_id1" );
301- #line 123 "sqlda.pgc"
309+ #line 133 "sqlda.pgc"
302310
303311if (sqlca .sqlcode < 0 )exit (1 );}
304- #line 123 "sqlda.pgc"
312+ #line 133 "sqlda.pgc"
305313
306314
307315free (outp_sqlda );
@@ -312,35 +320,35 @@ if (sqlca.sqlcode < 0) exit (1);}
312320
313321strcpy (msg ,"prepare" );
314322{ECPGprepare (__LINE__ ,NULL ,0 ,"st_id2" ,stmt1 );
315- #line 132 "sqlda.pgc"
323+ #line 142 "sqlda.pgc"
316324
317325if (sqlca .sqlcode < 0 )exit (1 );}
318- #line 132 "sqlda.pgc"
326+ #line 142 "sqlda.pgc"
319327
320328
321329strcpy (msg ,"declare" );
322330/* declare mycur2 cursor for $1 */
323- #line 135 "sqlda.pgc"
331+ #line 145 "sqlda.pgc"
324332
325333
326334strcpy (msg ,"open" );
327335{ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"declare mycur2 cursor for $1" ,
328336ECPGt_char_variable ,(ECPGprepared_statement (NULL ,"st_id2" ,__LINE__ )),(long )1 ,(long )1 ,(1 )* sizeof (char ),
329337ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,ECPGt_EORT );
330- #line 138 "sqlda.pgc"
338+ #line 148 "sqlda.pgc"
331339
332340if (sqlca .sqlcode < 0 )exit (1 );}
333- #line 138 "sqlda.pgc"
341+ #line 148 "sqlda.pgc"
334342
335343
336344strcpy (msg ,"fetch" );
337345{ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"fetch all from mycur2" ,ECPGt_EOIT ,
338346ECPGt_sqlda ,& outp_sqlda ,0L ,0L ,0L ,
339347ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EORT );
340- #line 141 "sqlda.pgc"
348+ #line 151 "sqlda.pgc"
341349
342350if (sqlca .sqlcode < 0 )exit (1 );}
343- #line 141 "sqlda.pgc"
351+ #line 151 "sqlda.pgc"
344352
345353
346354outp_sqlda1 = outp_sqlda ;
@@ -358,18 +366,18 @@ if (sqlca.sqlcode < 0) exit (1);}
358366
359367strcpy (msg ,"close" );
360368{ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"close mycur2" ,ECPGt_EOIT ,ECPGt_EORT );
361- #line 157 "sqlda.pgc"
369+ #line 167 "sqlda.pgc"
362370
363371if (sqlca .sqlcode < 0 )exit (1 );}
364- #line 157 "sqlda.pgc"
372+ #line 167 "sqlda.pgc"
365373
366374
367375strcpy (msg ,"deallocate" );
368376{ECPGdeallocate (__LINE__ ,0 ,NULL ,"st_id2" );
369- #line 160 "sqlda.pgc"
377+ #line 170 "sqlda.pgc"
370378
371379if (sqlca .sqlcode < 0 )exit (1 );}
372- #line 160 "sqlda.pgc"
380+ #line 170 "sqlda.pgc"
373381
374382
375383/* SQLDA test for getting one record using an input descriptor */
@@ -393,10 +401,10 @@ if (sqlca.sqlcode < 0) exit (1);}
393401
394402strcpy (msg ,"prepare" );
395403{ECPGprepare (__LINE__ ,NULL ,0 ,"st_id3" ,stmt2 );
396- #line 182 "sqlda.pgc"
404+ #line 192 "sqlda.pgc"
397405
398406if (sqlca .sqlcode < 0 )exit (1 );}
399- #line 182 "sqlda.pgc"
407+ #line 192 "sqlda.pgc"
400408
401409
402410strcpy (msg ,"execute" );
@@ -405,20 +413,20 @@ if (sqlca.sqlcode < 0) exit (1);}
405413ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,
406414ECPGt_sqlda ,& outp_sqlda ,0L ,0L ,0L ,
407415ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EORT );
408- #line 185 "sqlda.pgc"
416+ #line 195 "sqlda.pgc"
409417
410418if (sqlca .sqlcode < 0 )exit (1 );}
411- #line 185 "sqlda.pgc"
419+ #line 195 "sqlda.pgc"
412420
413421
414422dump_sqlda (outp_sqlda );
415423
416424strcpy (msg ,"deallocate" );
417425{ECPGdeallocate (__LINE__ ,0 ,NULL ,"st_id3" );
418- #line 190 "sqlda.pgc"
426+ #line 200 "sqlda.pgc"
419427
420428if (sqlca .sqlcode < 0 )exit (1 );}
421- #line 190 "sqlda.pgc"
429+ #line 200 "sqlda.pgc"
422430
423431
424432free (inp_sqlda );
@@ -429,10 +437,10 @@ if (sqlca.sqlcode < 0) exit (1);}
429437 */
430438
431439{ECPGconnect (__LINE__ ,0 ,"ecpg1_regression" ,NULL ,NULL ,"con2" ,0 );
432- #line 199 "sqlda.pgc"
440+ #line 209 "sqlda.pgc"
433441
434442if (sqlca .sqlcode < 0 )exit (1 );}
435- #line 199 "sqlda.pgc"
443+ #line 209 "sqlda.pgc"
436444
437445
438446/*
@@ -454,10 +462,10 @@ if (sqlca.sqlcode < 0) exit (1);}
454462
455463strcpy (msg ,"prepare" );
456464{ECPGprepare (__LINE__ ,"con2" ,0 ,"st_id4" ,stmt2 );
457- #line 219 "sqlda.pgc"
465+ #line 229 "sqlda.pgc"
458466
459467if (sqlca .sqlcode < 0 )exit (1 );}
460- #line 219 "sqlda.pgc"
468+ #line 229 "sqlda.pgc"
461469
462470
463471strcpy (msg ,"execute" );
@@ -466,65 +474,65 @@ if (sqlca.sqlcode < 0) exit (1);}
466474ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EOIT ,
467475ECPGt_sqlda ,& outp_sqlda ,0L ,0L ,0L ,
468476ECPGt_NO_INDICATOR ,NULL ,0L ,0L ,0L ,ECPGt_EORT );
469- #line 222 "sqlda.pgc"
477+ #line 232 "sqlda.pgc"
470478
471479if (sqlca .sqlcode < 0 )exit (1 );}
472- #line 222 "sqlda.pgc"
480+ #line 232 "sqlda.pgc"
473481
474482
475483dump_sqlda (outp_sqlda );
476484
477485strcpy (msg ,"commit" );
478486{ECPGtrans (__LINE__ ,"con2" ,"commit" );
479- #line 227 "sqlda.pgc"
487+ #line 237 "sqlda.pgc"
480488
481489if (sqlca .sqlcode < 0 )exit (1 );}
482- #line 227 "sqlda.pgc"
490+ #line 237 "sqlda.pgc"
483491
484492
485493strcpy (msg ,"deallocate" );
486494{ECPGdeallocate (__LINE__ ,0 ,NULL ,"st_id4" );
487- #line 230 "sqlda.pgc"
495+ #line 240 "sqlda.pgc"
488496
489497if (sqlca .sqlcode < 0 )exit (1 );}
490- #line 230 "sqlda.pgc"
498+ #line 240 "sqlda.pgc"
491499
492500
493501free (inp_sqlda );
494502free (outp_sqlda );
495503
496504strcpy (msg ,"disconnect" );
497505{ECPGdisconnect (__LINE__ ,"con2" );
498- #line 236 "sqlda.pgc"
506+ #line 246 "sqlda.pgc"
499507
500508if (sqlca .sqlcode < 0 )exit (1 );}
501- #line 236 "sqlda.pgc"
509+ #line 246 "sqlda.pgc"
502510
503511
504512/* End test */
505513
506514strcpy (msg ,"drop" );
507515{ECPGdo (__LINE__ ,0 ,1 ,NULL ,0 ,ECPGst_normal ,"drop table t1" ,ECPGt_EOIT ,ECPGt_EORT );
508- #line 241 "sqlda.pgc"
516+ #line 251 "sqlda.pgc"
509517
510518if (sqlca .sqlcode < 0 )exit (1 );}
511- #line 241 "sqlda.pgc"
519+ #line 251 "sqlda.pgc"
512520
513521
514522strcpy (msg ,"commit" );
515523{ECPGtrans (__LINE__ ,NULL ,"commit" );
516- #line 244 "sqlda.pgc"
524+ #line 254 "sqlda.pgc"
517525
518526if (sqlca .sqlcode < 0 )exit (1 );}
519- #line 244 "sqlda.pgc"
527+ #line 254 "sqlda.pgc"
520528
521529
522530strcpy (msg ,"disconnect" );
523531{ECPGdisconnect (__LINE__ ,"CURRENT" );
524- #line 247 "sqlda.pgc"
532+ #line 257 "sqlda.pgc"
525533
526534if (sqlca .sqlcode < 0 )exit (1 );}
527- #line 247 "sqlda.pgc"
535+ #line 257 "sqlda.pgc"
528536
529537
530538return (0 );