*** ./expected/preproc-autoprep.stderr 2007-10-01 10:57:37.532045600 +0200 --- ./results/preproc-autoprep.stderr 2007-10-03 13:53:13.898609200 +0200 *************** *** 2,44 **** [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGconnect: opening database regress1 on port [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGauto_prepare line 19: stmt not in cache; inserting - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGprepare line 19: NAME: ecpg1 QUERY: create table T ( Item1 int , Item2 int ) - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 19: QUERY: create table T ( Item1 int , Item2 int ) with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 19: using PQexecPrepared for create table T ( Item1 int , Item2 int ) [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 19 Ok: CREATE TABLE [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGauto_prepare line 21: stmt not in cache; inserting - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGprepare line 21: NAME: ecpg2 QUERY: insert into T values ( 1 , null ) - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 21: QUERY: insert into T values ( 1 , null ) with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 21: using PQexecPrepared for insert into T values ( 1 , null ) [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 21 Ok: INSERT 0 1 [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGauto_prepare line 22: stmt not in cache; inserting - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGprepare line 22: NAME: ecpg3 QUERY: insert into T values ( 1 , $1 ) - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 22: QUERY: insert into T values ( 1 , $1 ) with 1 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 22: using PQexecPrepared for insert into T values ( 1 , $1 ) [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 22: parameter 1 = 1 [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 22 Ok: INSERT 0 1 [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGauto_prepare line 24: stmt found in cache, entry 6248 - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 24: QUERY: insert into T values ( 1 , $1 ) with 1 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 24: using PQexecPrepared for insert into T values ( 1 , $1 ) [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 24: parameter 1 = 2 [NO_PID]: sqlca: code: 0, state: 00000 --- 2,30 ---- [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGconnect: opening database regress1 on port [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 19: QUERY: create table T ( Item1 int , Item2 int ) with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 19: using PQexec [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 19 Ok: CREATE TABLE [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 21: QUERY: insert into T values ( 1 , null ) with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 21: using PQexec [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 21 Ok: INSERT 0 1 [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 22: QUERY: insert into T values ( 1 , $1 ) with 1 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 22: using PQexecParams [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 22: parameter 1 = 1 [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 22 Ok: INSERT 0 1 [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 24: QUERY: insert into T values ( 1 , $1 ) with 1 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 24: using PQexecParams [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 24: parameter 1 = 2 [NO_PID]: sqlca: code: 0, state: 00000 *************** *** 52,64 **** [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 26 Ok: INSERT 0 1 [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGauto_prepare line 28: stmt not in cache; inserting - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGprepare line 28: NAME: ecpg4 QUERY: select Item2 from T order by Item2 nulls last - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 28: QUERY: select Item2 from T order by Item2 nulls last with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 28: using PQexecPrepared for select Item2 from T order by Item2 nulls last [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 28: Correctly got 4 tuples with 1 fields [NO_PID]: sqlca: code: 0, state: 00000 --- 38,46 ---- [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 26 Ok: INSERT 0 1 [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 28: QUERY: select Item2 from T order by Item2 nulls last with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 28: using PQexec [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 28: Correctly got 4 tuples with 1 fields [NO_PID]: sqlca: code: 0, state: 00000 *************** *** 70,134 **** [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGget_data line 28: RESULT: offset: -1 array: Yes [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGauto_prepare line 35: stmt not in cache; inserting - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGprepare line 35: NAME: ecpg5 QUERY: declare C cursor for select Item1 from T - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 35: QUERY: declare C cursor for select Item1 from T with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 35: using PQexecPrepared for declare C cursor for select Item1 from T [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 35 Ok: DECLARE CURSOR [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGauto_prepare line 37: stmt not in cache; inserting - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGprepare line 37: NAME: ecpg6 QUERY: fetch 1 in C - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 37: QUERY: fetch 1 in C with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 37: using PQexecPrepared for fetch 1 in C [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 37: Correctly got 1 tuples with 1 fields [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGget_data line 37: RESULT: 1 offset: -1 array: Yes [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGauto_prepare line 40: stmt not in cache; inserting - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGprepare line 40: NAME: ecpg7 QUERY: close C - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 40: QUERY: close C with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 40: using PQexecPrepared for close C [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 40 Ok: CLOSE CURSOR [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGauto_prepare line 42: stmt not in cache; inserting - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGprepare line 42: NAME: ecpg8 QUERY: drop table T - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 42: QUERY: drop table T with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 42: using PQexecPrepared for drop table T [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 42 Ok: DROP TABLE [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGdeallocate line 0: NAME: ecpg8 - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGdeallocate line 0: NAME: ecpg7 - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGdeallocate line 0: NAME: ecpg6 - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGdeallocate line 0: NAME: ecpg5 - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGdeallocate line 0: NAME: ecpg4 - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGdeallocate line 0: NAME: i [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGdeallocate line 0: NAME: ecpg3 - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGdeallocate line 0: NAME: ecpg2 - [NO_PID]: sqlca: code: 0, state: 00000 - [NO_PID]: ECPGdeallocate line 0: NAME: ecpg1 - [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ecpg_finish: Connection regress1 closed. [NO_PID]: sqlca: code: 0, state: 00000 --- 52,84 ---- [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGget_data line 28: RESULT: offset: -1 array: Yes [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 35: QUERY: declare C cursor for select Item1 from T with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 35: using PQexec [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 35 Ok: DECLARE CURSOR [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 37: QUERY: fetch 1 in C with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 37: using PQexec [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 37: Correctly got 1 tuples with 1 fields [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGget_data line 37: RESULT: 1 offset: -1 array: Yes [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 40: QUERY: close C with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 40: using PQexec [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 40 Ok: CLOSE CURSOR [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 42: QUERY: drop table T with 0 parameter on connection regress1 [NO_PID]: sqlca: code: 0, state: 00000 ! [NO_PID]: ECPGexecute line 42: using PQexec [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGexecute line 42 Ok: DROP TABLE [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ECPGdeallocate line 0: NAME: i [NO_PID]: sqlca: code: 0, state: 00000 [NO_PID]: ecpg_finish: Connection regress1 closed. [NO_PID]: sqlca: code: 0, state: 00000 ====================================================================== *** ./expected/preproc-autoprep.c 2007-08-14 12:32:47.000000000 +0200 --- ./results/preproc-autoprep.c 2007-10-03 13:53:13.679825600 +0200 *************** *** 46,52 **** #line 17 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_prepnormal, "create table T ( Item1 int , Item2 int ) ", ECPGt_EOIT, ECPGt_EORT); #line 19 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); --- 46,52 ---- #line 17 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "create table T ( Item1 int , Item2 int ) ", ECPGt_EOIT, ECPGt_EORT); #line 19 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); *************** *** 56,62 **** #line 19 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_prepnormal, "insert into T values ( 1 , null ) ", ECPGt_EOIT, ECPGt_EORT); #line 21 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); --- 56,62 ---- #line 19 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into T values ( 1 , null ) ", ECPGt_EOIT, ECPGt_EORT); #line 21 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); *************** *** 65,71 **** if (sqlca.sqlcode < 0) sqlprint();} #line 21 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_prepnormal, "insert into T values ( 1 , $1 ) ", ECPGt_int,&(i),(long)1,(long)1,sizeof(int), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT); #line 22 "autoprep.pgc" --- 65,71 ---- if (sqlca.sqlcode < 0) sqlprint();} #line 21 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into T values ( 1 , $1 ) ", ECPGt_int,&(i),(long)1,(long)1,sizeof(int), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT); #line 22 "autoprep.pgc" *************** *** 77,83 **** #line 22 "autoprep.pgc" i++; ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_prepnormal, "insert into T values ( 1 , $1 ) ", ECPGt_int,&(i),(long)1,(long)1,sizeof(int), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT); #line 24 "autoprep.pgc" --- 77,83 ---- #line 22 "autoprep.pgc" i++; ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "insert into T values ( 1 , $1 ) ", ECPGt_int,&(i),(long)1,(long)1,sizeof(int), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT); #line 24 "autoprep.pgc" *************** *** 107,113 **** #line 26 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_prepnormal, "select Item2 from T order by Item2 nulls last", ECPGt_EOIT, ECPGt_int,(item),(long)1,(long)4,sizeof(int), ECPGt_int,(ind),(long)1,(long)4,sizeof(int), ECPGt_EORT); #line 28 "autoprep.pgc" --- 107,113 ---- #line 26 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select Item2 from T order by Item2 nulls last", ECPGt_EOIT, ECPGt_int,(item),(long)1,(long)4,sizeof(int), ECPGt_int,(ind),(long)1,(long)4,sizeof(int), ECPGt_EORT); #line 28 "autoprep.pgc" *************** *** 126,132 **** #line 33 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_prepnormal, "declare C cursor for select Item1 from T ", ECPGt_EOIT, ECPGt_EORT); #line 35 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); --- 126,132 ---- #line 33 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare C cursor for select Item1 from T ", ECPGt_EOIT, ECPGt_EORT); #line 35 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); *************** *** 136,142 **** #line 35 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_prepnormal, "fetch 1 in C", ECPGt_EOIT, ECPGt_int,&(i),(long)1,(long)1,sizeof(int), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT); #line 37 "autoprep.pgc" --- 136,142 ---- #line 35 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "fetch 1 in C", ECPGt_EOIT, ECPGt_int,&(i),(long)1,(long)1,sizeof(int), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT); #line 37 "autoprep.pgc" *************** *** 149,155 **** printf("i = %d\n", i); ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_prepnormal, "close C", ECPGt_EOIT, ECPGt_EORT); #line 40 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); --- 149,155 ---- printf("i = %d\n", i); ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close C", ECPGt_EOIT, ECPGt_EORT); #line 40 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); *************** *** 159,165 **** #line 40 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_prepnormal, "drop table T ", ECPGt_EOIT, ECPGt_EORT); #line 42 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); --- 159,165 ---- #line 40 "autoprep.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "drop table T ", ECPGt_EOIT, ECPGt_EORT); #line 42 "autoprep.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); ====================================================================== *** ./expected/sql-oldexec.c 2007-10-01 10:57:37.703949200 +0200 --- ./results/sql-oldexec.c 2007-10-03 13:53:19.899530800 +0200 *************** *** 65,71 **** if (sqlca.sqlcode < 0) sqlprint();} #line 24 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 1, ECPGst_normal, "create table test ( name char ( 8 ) , amount int , letter char ( 1 ) ) ", ECPGt_EOIT, ECPGt_EORT); #line 25 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} --- 65,71 ---- if (sqlca.sqlcode < 0) sqlprint();} #line 24 "oldexec.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 25 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} *************** *** 79,85 **** sprintf(command, "insert into test (name, amount, letter) values ('db: ''r1''', 1, 'f')"); ! { ECPGdo(__LINE__, 0, 1, NULL, 1, 2, command, ECPGt_EOIT, ECPGt_EORT); #line 29 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} --- 79,85 ---- sprintf(command, "insert into test (name, amount, letter) values ('db: ''r1''', 1, 'f')"); ! { ECPGdo(__LINE__, 0, 1, NULL, 0, 2, command, ECPGt_EOIT, ECPGt_EORT); #line 29 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} *************** *** 87,93 **** sprintf(command, "insert into test (name, amount, letter) values ('db: ''r1''', 2, 't')"); ! { ECPGdo(__LINE__, 0, 1, NULL, 1, 2, command, ECPGt_EOIT, ECPGt_EORT); #line 32 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} --- 87,93 ---- sprintf(command, "insert into test (name, amount, letter) values ('db: ''r1''', 2, 't')"); ! { ECPGdo(__LINE__, 0, 1, NULL, 0, 2, command, ECPGt_EOIT, ECPGt_EORT); #line 32 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} *************** *** 95,101 **** sprintf(command, "insert into test (name, amount, letter) select name, amount+10, letter from test"); ! { ECPGdo(__LINE__, 0, 1, NULL, 1, 2, command, ECPGt_EOIT, ECPGt_EORT); #line 35 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} --- 95,101 ---- sprintf(command, "insert into test (name, amount, letter) select name, amount+10, letter from test"); ! { ECPGdo(__LINE__, 0, 1, NULL, 0, 2, command, ECPGt_EOIT, ECPGt_EORT); #line 35 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} *************** *** 105,117 **** printf("Inserted %ld tuples via execute immediate\n", sqlca.sqlerrd[2]); sprintf(command, "insert into test (name, amount, letter) select name, amount+$1, letter from test"); ! { ECPGprepare(__LINE__, NULL, 1, "i", command); #line 40 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} #line 40 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 1, 1, "i", ECPGt_int,&(increment),(long)1,(long)1,sizeof(int), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT); #line 41 "oldexec.pgc" --- 105,117 ---- printf("Inserted %ld tuples via execute immediate\n", sqlca.sqlerrd[2]); sprintf(command, "insert into test (name, amount, letter) select name, amount+$1, letter from test"); ! { ECPGprepare(__LINE__, NULL, 0, "i", command); #line 40 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} #line 40 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, 1, "i", ECPGt_int,&(increment),(long)1,(long)1,sizeof(int), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT); #line 41 "oldexec.pgc" *************** *** 131,137 **** sprintf (command, "select * from test"); ! { ECPGprepare(__LINE__, NULL, 1, "f", command); #line 49 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} --- 131,137 ---- sprintf (command, "select * from test"); ! { ECPGprepare(__LINE__, NULL, 0, "f", command); #line 49 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} *************** *** 141,147 **** #line 50 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 1, ECPGst_normal, "declare CUR cursor for $1", ECPGt_char_variable,(ECPGprepared_statement(NULL, "f", __LINE__)),(long)1,(long)1,(1)*sizeof(char), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT); #line 52 "oldexec.pgc" --- 141,147 ---- #line 50 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare CUR cursor for $1", ECPGt_char_variable,(ECPGprepared_statement(NULL, "f", __LINE__)),(long)1,(long)1,(1)*sizeof(char), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT); #line 52 "oldexec.pgc" *************** *** 149,155 **** if (sqlca.sqlcode < 0) sqlprint();} #line 52 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 1, ECPGst_normal, "fetch 8 in CUR", ECPGt_EOIT, ECPGt_char,(name),(long)8,(long)8,(8)*sizeof(char), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_int,(amount),(long)1,(long)8,sizeof(int), --- 149,155 ---- if (sqlca.sqlcode < 0) sqlprint();} #line 52 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "fetch 8 in CUR", ECPGt_EOIT, ECPGt_char,(name),(long)8,(long)8,(8)*sizeof(char), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_int,(amount),(long)1,(long)8,sizeof(int), *************** *** 181,187 **** printf("name[%d]=%8.8s\tamount[%d]=%d\tletter[%d]=%c\n", i, n, i, a, i, l); } ! { ECPGdo(__LINE__, 0, 1, NULL, 1, ECPGst_normal, "close CUR", ECPGt_EOIT, ECPGt_EORT); #line 66 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} --- 181,187 ---- 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, "close CUR", ECPGt_EOIT, ECPGt_EORT); #line 66 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} *************** *** 190,196 **** sprintf (command, "select * from test where ? = amount"); ! { ECPGprepare(__LINE__, NULL, 1, "f", command); #line 70 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} --- 190,196 ---- sprintf (command, "select * from test where ? = amount"); ! { ECPGprepare(__LINE__, NULL, 0, "f", command); #line 70 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} *************** *** 200,206 **** #line 71 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 1, ECPGst_normal, "declare CUR3 cursor for $1", ECPGt_char_variable,(ECPGprepared_statement(NULL, "f", __LINE__)),(long)1,(long)1,(1)*sizeof(char), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_const,"1",(long)1,(long)1,strlen("1"), --- 200,206 ---- #line 71 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare CUR3 cursor for $1", ECPGt_char_variable,(ECPGprepared_statement(NULL, "f", __LINE__)),(long)1,(long)1,(1)*sizeof(char), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_const,"1",(long)1,(long)1,strlen("1"), *************** *** 210,216 **** if (sqlca.sqlcode < 0) sqlprint();} #line 73 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 1, ECPGst_normal, "fetch in CUR3", ECPGt_EOIT, ECPGt_char,(name),(long)8,(long)8,(8)*sizeof(char), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_int,(amount),(long)1,(long)8,sizeof(int), --- 210,216 ---- if (sqlca.sqlcode < 0) sqlprint();} #line 73 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "fetch in CUR3", ECPGt_EOIT, ECPGt_char,(name),(long)8,(long)8,(8)*sizeof(char), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_int,(amount),(long)1,(long)8,sizeof(int), *************** *** 242,254 **** printf("name[%d]=%8.8s\tamount[%d]=%d\tletter[%d]=%c\n", i, n, i, a, i, l); } ! { ECPGdo(__LINE__, 0, 1, NULL, 1, ECPGst_normal, "close CUR3", ECPGt_EOIT, ECPGt_EORT); #line 87 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} #line 87 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 1, ECPGst_normal, "drop table test ", ECPGt_EOIT, ECPGt_EORT); #line 88 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} --- 242,254 ---- 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, "close CUR3", ECPGt_EOIT, ECPGt_EORT); #line 87 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} #line 87 "oldexec.pgc" ! { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "drop table test ", ECPGt_EOIT, ECPGt_EORT); #line 88 "oldexec.pgc" if (sqlca.sqlcode < 0) sqlprint();} ======================================================================