diff options
Diffstat (limited to 'src/interfaces/ecpg/test/expected/sql-func.c')
| -rw-r--r-- | src/interfaces/ecpg/test/expected/sql-func.c | 108 |
1 files changed, 72 insertions, 36 deletions
diff --git a/src/interfaces/ecpg/test/expected/sql-func.c b/src/interfaces/ecpg/test/expected/sql-func.c index 50b385ee97b..cdcbc6ae06d 100644 --- a/src/interfaces/ecpg/test/expected/sql-func.c +++ b/src/interfaces/ecpg/test/expected/sql-func.c @@ -24,57 +24,62 @@ int main(int argc, char* argv[]) { + +#line 8 "func.pgc" + char text [ 25 ] ; + +#line 8 "func.pgc" + ECPGdebug(1, stderr); { ECPGconnect(__LINE__, 0, "regress1" , NULL, NULL , NULL, 0); } -#line 10 "func.pgc" +#line 11 "func.pgc" { ECPGsetcommit(__LINE__, "on", NULL);} -#line 12 "func.pgc" +#line 13 "func.pgc" /* exec sql whenever sql_warning sqlprint ; */ -#line 13 "func.pgc" +#line 14 "func.pgc" /* exec sql whenever sqlerror sqlprint ; */ -#line 14 "func.pgc" +#line 15 "func.pgc" - { ECPGdo(__LINE__, 0, 1, NULL, "create table My_Table ( Item1 int , Item2 text ) ", ECPGt_EOIT, ECPGt_EORT); -#line 16 "func.pgc" + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "create table My_Table ( Item1 int , Item2 text ) ", ECPGt_EOIT, ECPGt_EORT); +#line 17 "func.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); -#line 16 "func.pgc" +#line 17 "func.pgc" if (sqlca.sqlcode < 0) sqlprint();} -#line 16 "func.pgc" - +#line 17 "func.pgc" - { ECPGdo(__LINE__, 0, 1, NULL, "create function My_Table_Check () returns trigger as $test$\ - BEGIN\ - RAISE WARNING 'Notice: TG_NAME=%, TG WHEN=%', TG_NAME, TG_WHEN;\ - RETURN NEW;\ - END; $test$ language plpgsql", ECPGt_EOIT, ECPGt_EORT); -#line 24 "func.pgc" + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "create table Log ( name text , w text ) ", ECPGt_EOIT, ECPGt_EORT); +#line 18 "func.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); -#line 24 "func.pgc" +#line 18 "func.pgc" if (sqlca.sqlcode < 0) sqlprint();} -#line 24 "func.pgc" +#line 18 "func.pgc" - { ECPGdo(__LINE__, 0, 1, NULL, "create trigger My_Table_Check_Trigger before insert on My_Table for each row execute procedure My_Table_Check ( )", ECPGt_EOIT, ECPGt_EORT); -#line 30 "func.pgc" + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "create function My_Table_Check () returns trigger as $test$\ + BEGIN\ + INSERT INTO Log VALUES(TG_NAME, TG_WHEN);\ + RETURN NEW;\ + END; $test$ language plpgsql", ECPGt_EOIT, ECPGt_EORT); +#line 26 "func.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); -#line 30 "func.pgc" +#line 26 "func.pgc" if (sqlca.sqlcode < 0) sqlprint();} -#line 30 "func.pgc" +#line 26 "func.pgc" - { ECPGdo(__LINE__, 0, 1, NULL, "insert into My_Table values ( 1234 , 'Some random text' ) ", ECPGt_EOIT, ECPGt_EORT); + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "create trigger My_Table_Check_Trigger before insert on My_Table for each row execute procedure My_Table_Check ( )", ECPGt_EOIT, ECPGt_EORT); #line 32 "func.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); @@ -83,17 +88,17 @@ if (sqlca.sqlwarn[0] == 'W') sqlprint(); if (sqlca.sqlcode < 0) sqlprint();} #line 32 "func.pgc" - { ECPGdo(__LINE__, 0, 1, NULL, "insert into My_Table values ( 5678 , 'The Quick Brown' ) ", ECPGt_EOIT, ECPGt_EORT); -#line 33 "func.pgc" + + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "insert into My_Table values ( 1234 , 'Some random text' ) ", ECPGt_EOIT, ECPGt_EORT); +#line 34 "func.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); -#line 33 "func.pgc" +#line 34 "func.pgc" if (sqlca.sqlcode < 0) sqlprint();} -#line 33 "func.pgc" - +#line 34 "func.pgc" - { ECPGdo(__LINE__, 0, 1, NULL, "drop trigger My_Table_Check_Trigger on My_Table ", ECPGt_EOIT, ECPGt_EORT); + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "insert into My_Table values ( 5678 , 'The Quick Brown' ) ", ECPGt_EOIT, ECPGt_EORT); #line 35 "func.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); @@ -102,7 +107,9 @@ if (sqlca.sqlwarn[0] == 'W') sqlprint(); if (sqlca.sqlcode < 0) sqlprint();} #line 35 "func.pgc" - { ECPGdo(__LINE__, 0, 1, NULL, "drop function My_Table_Check () ", ECPGt_EOIT, ECPGt_EORT); + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "select name from Log limit 1 ", ECPGt_EOIT, + ECPGt_char,(text),(long)25,(long)1,(25)*sizeof(char), + ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT); #line 36 "func.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); @@ -111,24 +118,53 @@ if (sqlca.sqlwarn[0] == 'W') sqlprint(); if (sqlca.sqlcode < 0) sqlprint();} #line 36 "func.pgc" - { ECPGdo(__LINE__, 0, 1, NULL, "drop table My_Table ", ECPGt_EOIT, ECPGt_EORT); -#line 37 "func.pgc" + printf("Trigger %s fired.\n", text); + + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "drop trigger My_Table_Check_Trigger on My_Table ", ECPGt_EOIT, ECPGt_EORT); +#line 39 "func.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); -#line 37 "func.pgc" +#line 39 "func.pgc" if (sqlca.sqlcode < 0) sqlprint();} -#line 37 "func.pgc" +#line 39 "func.pgc" + + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "drop function My_Table_Check () ", ECPGt_EOIT, ECPGt_EORT); +#line 40 "func.pgc" + +if (sqlca.sqlwarn[0] == 'W') sqlprint(); +#line 40 "func.pgc" + +if (sqlca.sqlcode < 0) sqlprint();} +#line 40 "func.pgc" + + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "drop table Log ", ECPGt_EOIT, ECPGt_EORT); +#line 41 "func.pgc" + +if (sqlca.sqlwarn[0] == 'W') sqlprint(); +#line 41 "func.pgc" + +if (sqlca.sqlcode < 0) sqlprint();} +#line 41 "func.pgc" + + { ECPGdo(__LINE__, 0, 1, NULL, 0, 0, "drop table My_Table ", ECPGt_EOIT, ECPGt_EORT); +#line 42 "func.pgc" + +if (sqlca.sqlwarn[0] == 'W') sqlprint(); +#line 42 "func.pgc" + +if (sqlca.sqlcode < 0) sqlprint();} +#line 42 "func.pgc" { ECPGdisconnect(__LINE__, "ALL"); -#line 39 "func.pgc" +#line 44 "func.pgc" if (sqlca.sqlwarn[0] == 'W') sqlprint(); -#line 39 "func.pgc" +#line 44 "func.pgc" if (sqlca.sqlcode < 0) sqlprint();} -#line 39 "func.pgc" +#line 44 "func.pgc" return 0; |