| /* 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 "code100.pgc" |
| |
| #line 1 "sqlca.h" |
| #ifndef POSTGRES_SQLCA_H |
| #define POSTGRES_SQLCA_H |
| |
| #ifndef PGDLLIMPORT |
| #if defined(WIN32) || defined(__CYGWIN__) |
| #define PGDLLIMPORT __declspec (dllimport) |
| #else |
| #define PGDLLIMPORT |
| #endif /* __CYGWIN__ */ |
| #endif /* PGDLLIMPORT */ |
| |
| #define SQLERRMC_LEN 150 |
| |
| #ifdef __cplusplus |
| extern "C" |
| { |
| #endif |
| |
| struct sqlca_t |
| { |
| char sqlcaid[8]; |
| long sqlabc; |
| long sqlcode; |
| struct |
| { |
| int sqlerrml; |
| char sqlerrmc[SQLERRMC_LEN]; |
| } sqlerrm; |
| char sqlerrp[8]; |
| long sqlerrd[6]; |
| /* Element 0: empty */ |
| /* 1: OID of processed tuple if applicable */ |
| /* 2: number of rows processed */ |
| /* after an INSERT, UPDATE or */ |
| /* DELETE statement */ |
| /* 3: empty */ |
| /* 4: empty */ |
| /* 5: empty */ |
| char sqlwarn[8]; |
| /* Element 0: set to 'W' if at least one other is 'W' */ |
| /* 1: if 'W' at least one character string */ |
| /* value was truncated when it was */ |
| /* stored into a host variable. */ |
| |
| /* |
| * 2: if 'W' a (hopefully) non-fatal notice occurred |
| */ /* 3: empty */ |
| /* 4: empty */ |
| /* 5: empty */ |
| /* 6: empty */ |
| /* 7: empty */ |
| |
| char sqlstate[5]; |
| }; |
| |
| struct sqlca_t *ECPGget_sqlca(void); |
| |
| #ifndef POSTGRES_ECPG_INTERNAL |
| #define sqlca (*ECPGget_sqlca()) |
| #endif |
| |
| #ifdef __cplusplus |
| } |
| #endif |
| |
| #endif |
| |
| #line 1 "code100.pgc" |
| |
| #include <stdio.h> |
| |
| |
| #line 1 "regression.h" |
| |
| |
| |
| |
| |
| |
| #line 4 "code100.pgc" |
| |
| |
| |
| int main() |
| { /* exec sql begin declare section */ |
| |
| |
| #line 9 "code100.pgc" |
| int index ; |
| /* exec sql end declare section */ |
| #line 10 "code100.pgc" |
| |
| |
| |
| ECPGdebug(1,stderr); |
| |
| { ECPGconnect(__LINE__, 0, "ecpg1_regression" , NULL, NULL , NULL, 0); } |
| #line 15 "code100.pgc" |
| |
| if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "create table test ( \"index\" numeric ( 3 ) primary key , \"payload\" int4 not null )", ECPGt_EOIT, ECPGt_EORT);} |
| #line 20 "code100.pgc" |
| |
| if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| { ECPGtrans(__LINE__, NULL, "commit work");} |
| #line 22 "code100.pgc" |
| |
| if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| |
| for (index=0;index<10;++index) |
| { { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into test ( payload , index ) values ( 0 , $1 )", |
| ECPGt_int,&(index),(long)1,(long)1,sizeof(int), |
| ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);} |
| #line 28 "code100.pgc" |
| |
| if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| } |
| { ECPGtrans(__LINE__, NULL, "commit work");} |
| #line 31 "code100.pgc" |
| |
| if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "update test set payload = payload + 1 where index = - 1", ECPGt_EOIT, ECPGt_EORT);} |
| #line 35 "code100.pgc" |
| |
| if (sqlca.sqlcode!=100) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "delete from test where index = - 1", ECPGt_EOIT, ECPGt_EORT);} |
| #line 38 "code100.pgc" |
| |
| if (sqlca.sqlcode!=100) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into test ( select * from test where index = - 1 )", ECPGt_EOIT, ECPGt_EORT);} |
| #line 41 "code100.pgc" |
| |
| if (sqlca.sqlcode!=100) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| |
| { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "drop table test", ECPGt_EOIT, ECPGt_EORT);} |
| #line 44 "code100.pgc" |
| |
| if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| { ECPGtrans(__LINE__, NULL, "commit work");} |
| #line 46 "code100.pgc" |
| |
| if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| |
| { ECPGdisconnect(__LINE__, "CURRENT");} |
| #line 49 "code100.pgc" |
| |
| if (sqlca.sqlcode) printf("%ld:%s\n",sqlca.sqlcode,sqlca.sqlerrm.sqlerrmc); |
| return 0; |
| } |