Age         Owner                  TLA  Line data    Source code

                                  1                 : #include <stdio.h>
                                  2                 : #include <stdlib.h>
                                  3                 : #include <string.h>
                                  4                 : 
                                  5                 : EXEC SQL INCLUDE ../regression;
                                  6                 : 
 5072 meskes                      7 CBC           1 : int main() {
                                  8                 :   EXEC SQL BEGIN DECLARE SECTION;
                                  9                 :     int i1[3], i2[3], i3[3], i4;
                                 10                 :   EXEC SQL END DECLARE SECTION;
                                 11                 : 
 6062                            12               1 :   ECPGdebug(1, stderr);
                                 13               1 :   EXEC SQL CONNECT TO REGRESSDB1;
                                 14                 : 
                                 15                 :   EXEC SQL WHENEVER SQLWARNING SQLPRINT;
                                 16                 :   EXEC SQL WHENEVER SQLERROR SQLPRINT;
                                 17                 : 
 5717                            18               1 :   EXEC SQL CREATE TABLE insupd_test(a int, b int);
 6062                            19               1 : 
 5717                            20               1 :   EXEC SQL INSERT INTO insupd_test (a,b) values (1, 1);
                                 21               1 :   EXEC SQL INSERT INTO insupd_test (a,b) values (2, 2);
 4692                            22               1 :   EXEC SQL INSERT INTO insupd_test (a,b) values (3, 3) returning a into :i4;
 6062                            23               1 : 
 4692                            24               1 :   EXEC SQL UPDATE insupd_test set a=a+1 returning a into :i3;
 5717                            25               1 :   EXEC SQL UPDATE insupd_test set (a,b)=(5,5) where a = 4;
                                 26               1 :   EXEC SQL UPDATE insupd_test set a=4 where a=3;;
 6062                            27               1 : 
 5717                            28               1 :   EXEC SQL SELECT a,b into :i1,:i2 from insupd_test order by a;
 6062                            29               1 : 
 4692                            30               1 :   printf("changes\n%d %d %d %d\n", i3[0], i3[1], i3[2], i4);
 6062                            31               1 :   printf("test\na b\n%d %d\n%d %d\n%d %d\n", i1[0], i2[0], i1[1], i2[1], i1[2], i2[2]);
                                 32                 : 
                                 33               1 :   EXEC SQL DISCONNECT ALL;
                                 34               1 : 
                                 35               1 :   return 0;
                                 36                 : }