3 exec sql include ../regression;
5 EXEC SQL WHENEVER sqlerror sqlprint;
6 EXEC SQL WHENEVER sqlwarning sqlprint;
7 EXEC SQL WHENEVER not found sqlprint;
9 EXEC SQL TYPE customer IS
16 EXEC SQL TYPE cust_ind IS
23 int main( int argc, char * argv[] )
25 EXEC SQL begin declare section;
45 varchar onlyname[2][50];
46 EXEC SQL end declare section;
50 EXEC SQL connect to REGRESSDB1;
52 EXEC SQL create table customers (c varchar(50), p int);
53 EXEC SQL insert into customers values ('John Doe', '12345');
54 EXEC SQL insert into customers values ('Jane Doe', '67890');
56 EXEC SQL select * INTO :custs1:inds from customers limit 2;
58 for (r = 0; r < 2; r++)
60 printf( "name - %s\n", custs1[r].name.arr );
61 printf( "phone - %d\n", custs1[r].phone );
64 EXEC SQL select * INTO :custs2:inds from customers limit 2;
65 printf("\ncusts2:\n");
66 for (r = 0; r < 2; r++)
68 printf( "name - %s\n", custs2[r].name.arr );
69 printf( "phone - %d\n", custs2[r].phone );
72 EXEC SQL select * INTO :custs3:inds from customers limit 2;
73 printf("\ncusts3:\n");
74 for (r = 0; r < 2; r++)
76 printf( "name - %s\n", custs3[r].name.arr );
77 printf( "phone - %d\n", custs3[r].phone );
80 EXEC SQL select * INTO :custs4:inds[0] from customers limit 1;
81 printf("\ncusts4:\n");
82 printf( "name - %s\n", custs4.name.arr );
83 printf( "phone - %d\n", custs4.phone );
85 EXEC SQL select c INTO :onlyname from customers limit 2;
87 for (r = 0; r < 2; r++)
89 printf( "name - %s\n", onlyname[r].arr );
92 EXEC SQL disconnect all;