| /* Processed by ecpg (regression mode) */ |
| /* These include files are added by the preprocessor */ |
| #include <ecpglib.h> |
| #include <ecpgerrno.h> |
| #include <sqlca.h> |
| /* End of automatic include section */ |
| #define ECPGdebug(X,Y) ECPGdebug((X)+100,(Y)) |
| |
| #line 1 "define.pgc" |
| #include <stdlib.h> |
| #include <string.h> |
| #include <stdlib.h> |
| #include <stdio.h> |
| |
| |
| #line 1 "regression.h" |
| |
| |
| |
| |
| |
| |
| #line 6 "define.pgc" |
| |
| |
| /* exec sql whenever sqlerror sqlprint ; */ |
| #line 8 "define.pgc" |
| |
| |
| |
| |
| |
| /* exec sql type intarray is int [ 6 ] */ |
| #line 13 "define.pgc" |
| |
| typedef int intarray[ 6]; |
| |
| int |
| main(void) |
| { |
| /* exec sql begin declare section */ |
| |
| typedef char string [ 8 ]; |
| |
| #line 21 "define.pgc" |
| |
| |
| |
| |
| |
| #line 22 "define.pgc" |
| intarray amount ; |
| |
| #line 23 "define.pgc" |
| char name [ 6 ] [ 8 ] ; |
| |
| #line 24 "define.pgc" |
| char letter [ 6 ] [ 1 ] ; |
| |
| #if 0 |
| |
| #line 26 "define.pgc" |
| int not_used ; |
| |
| #endif |
| /* exec sql end declare section */ |
| #line 29 "define.pgc" |
| |
| int i,j; |
| |
| ECPGdebug(1, stderr); |
| |
| { ECPGconnect(__LINE__, 0, "regress1" , NULL, NULL , NULL, 0); |
| #line 34 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 34 "define.pgc" |
| |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "create table test ( name char ( 8 ) , amount int , letter char ( 1 ) )", ECPGt_EOIT, ECPGt_EORT); |
| #line 36 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 36 "define.pgc" |
| |
| { ECPGtrans(__LINE__, NULL, "commit"); |
| #line 37 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 37 "define.pgc" |
| |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into Test ( name , amount , letter ) values ( 'false' , 1 , 'f' )", ECPGt_EOIT, ECPGt_EORT); |
| #line 39 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 39 "define.pgc" |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into test ( name , amount , letter ) values ( 'true' , 2 , 't' )", ECPGt_EOIT, ECPGt_EORT); |
| #line 40 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 40 "define.pgc" |
| |
| { ECPGtrans(__LINE__, NULL, "commit"); |
| #line 41 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 41 "define.pgc" |
| |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select * from test", ECPGt_EOIT, |
| ECPGt_char,(name),(long)8,(long)6,(8)*sizeof(char), |
| ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, |
| ECPGt_int,(amount),(long)1,(long)6,sizeof(int), |
| ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, |
| ECPGt_char,(letter),(long)1,(long)6,(1)*sizeof(char), |
| ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT); |
| #line 43 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 43 "define.pgc" |
| |
| |
| for (i=0, j=sqlca.sqlerrd[2]; i<j; i++) |
| { |
| /* exec sql begin declare section */ |
| |
| |
| |
| #line 48 "define.pgc" |
| char n [ 8 ] , l = letter [ i ] [ 0 ] ; |
| |
| #line 49 "define.pgc" |
| int a = amount [ i ] ; |
| /* exec sql end declare section */ |
| #line 50 "define.pgc" |
| |
| |
| strncpy(n, name[i], 8); |
| printf("name[%d]=%8.8s\tamount[%d]=%d\tletter[%d]=%c\n", i, n, i, a, i, l); |
| } |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "drop table test", ECPGt_EOIT, ECPGt_EORT); |
| #line 56 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 56 "define.pgc" |
| |
| { ECPGtrans(__LINE__, NULL, "commit"); |
| #line 57 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 57 "define.pgc" |
| |
| { ECPGdisconnect(__LINE__, "CURRENT"); |
| #line 58 "define.pgc" |
| |
| if (sqlca.sqlcode < 0) sqlprint();} |
| #line 58 "define.pgc" |
| |
| |
| return (0); |
| } |