Age         Owner                    Branch data    TLA  Line data    Source code

                                  1                 :                : #include <stdio.h>
                                  2                 :                : #include <stdlib.h>
                                  3                 :                : #include <string.h>
                                  4                 :                : 
                                  5                 :                : EXEC SQL INCLUDE ../regression;
                                  6                 :                : 
   50 peter@eisentraut.org        7                 :GNC           1 : int main(void) {
                                  8                 :                :   EXEC SQL char text[25];
                                  9                 :                : 
 7216 meskes@postgresql.or       10                 :CBC           1 :   ECPGdebug(1, stderr);
                                 11                 :              1 :   EXEC SQL CONNECT TO REGRESSDB1;
                                 12                 :                : 
                                 13                 :              1 :   EXEC SQL SET AUTOCOMMIT TO ON;
                                 14                 :                :   EXEC SQL WHENEVER SQLWARNING SQLPRINT;
                                 15                 :                :   EXEC SQL WHENEVER SQLERROR SQLPRINT;
                                 16                 :                : 
                                 17                 :              1 :   EXEC SQL CREATE TABLE My_Table ( Item1 int, Item2 text );
 6839                            18   [ -  +  -  + ]:              1 :   EXEC SQL CREATE TABLE Log (name text, w text);
 7216                            19   [ -  +  -  + ]:              1 : 
                                 20                 :              1 :   EXEC SQL CREATE FUNCTION My_Table_Check() RETURNS trigger
                                 21                 :                :     AS $test$
                                 22                 :                :     BEGIN
                                 23                 :                :     INSERT INTO Log VALUES(TG_NAME, TG_WHEN);
                                 24                 :                :     RETURN NEW;
                                 25                 :                :     END; $test$
                                 26                 :                :     LANGUAGE plpgsql;
                                 27   [ -  +  -  + ]:              1 : 
                                 28                 :              1 :   EXEC SQL CREATE TRIGGER My_Table_Check_Trigger
                                 29                 :                :     BEFORE INSERT
                                 30                 :                :     ON My_Table
                                 31                 :                :     FOR EACH ROW
                                 32                 :                :     EXECUTE PROCEDURE My_Table_Check();
                                 33   [ -  +  -  + ]:              1 : 
                                 34                 :              1 :   EXEC SQL INSERT INTO My_Table VALUES (1234, 'Some random text');
                                 35   [ -  +  -  + ]:              1 :   EXEC SQL INSERT INTO My_Table VALUES (5678, 'The Quick Brown');
 6839                            36   [ -  +  -  + ]:              1 :   EXEC SQL SELECT name INTO :text FROM Log LIMIT 1;
                                 37   [ -  +  -  + ]:              1 :   printf("Trigger %s fired.\n", text);
                                 38                 :                : 
 7216                            39                 :              1 :   EXEC SQL DROP TRIGGER My_Table_Check_Trigger ON My_Table;
                                 40   [ -  +  -  + ]:              1 :   EXEC SQL DROP FUNCTION My_Table_Check();
 6839                            41   [ -  +  -  + ]:              1 :   EXEC SQL DROP TABLE Log;
 7216                            42   [ -  +  -  + ]:              1 :   EXEC SQL DROP TABLE My_Table;
                                 43   [ -  +  -  + ]:              1 : 
                                 44                 :              1 :   EXEC SQL DISCONNECT ALL;
                                 45   [ -  +  -  + ]:              1 : 
                                 46                 :              1 :   return 0;
                                 47                 :                : }