Line data    Source code

       1              : #include <stdio.h>
       2              : 
       3              : exec sql include ../regression;
       4              : 
       5              : EXEC SQL WHENEVER sqlerror sqlprint;
       6              : EXEC SQL WHENEVER sqlwarning sqlprint;
       7              : EXEC SQL WHENEVER not found sqlprint;
       8              : 
       9              : EXEC SQL TYPE customer IS
      10              :     struct
      11              :     {
      12              :         varchar name[50];
      13              :         int     phone;
      14              :     };
      15              : 
      16              : EXEC SQL TYPE cust_ind IS
      17              :     struct ind
      18              :     {
      19              :         short   name_ind;
      20              :         short   phone_ind;
      21              :     };
      22              : 
      23              : EXEC SQL TYPE company IS
      24              :     struct
      25              :     {
      26              :         customer customers[10];
      27              :     };
      28              : 
      29            2 : int main()
      30              : {
      31              :     EXEC SQL begin declare section;
      32              :       customer  custs1[10];
      33              :       cust_ind  inds[10];
      34              :       typedef struct
      35              :       {
      36              :         varchar name[50];
      37              :         int     phone;
      38              :       } customer2;
      39              :       customer2  custs2[10];
      40              :       struct customer3
      41              :       {
      42              :         varchar name[50];
      43              :         int     phone;
      44              :       } custs3[10];
      45              :       struct customer4
      46              :       {
      47              :         varchar name[50];
      48              :         int     phone;
      49              :       } custs4;
      50              : 
      51              :       company acme;
      52              : 
      53              :       int r;
      54              :       varchar onlyname[2][50];
      55              :     EXEC SQL end declare section;
      56              : 
      57            2 :     ECPGdebug(1, stderr);
      58              : 
      59            2 :     EXEC SQL connect to REGRESSDB1;
      60            2 : 
      61            2 :     EXEC SQL create table customers (c varchar(50), p int);
      62            2 : 
      63              :     /* First we'll insert some data using C variable references */
      64            2 :     strcpy(custs1[0].name.arr, "John Doe");
      65            2 :     custs1[0].name.len = strlen(custs1[0].name.arr);
      66            2 :     custs1[0].phone = 12345;
      67              : 
      68            2 :     strcpy(acme.customers[1].name.arr, "Jane Doe");
      69            2 :     acme.customers[1].name.len = strlen(acme.customers[1].name.arr);
      70            2 :     acme.customers[1].phone = 67890;
      71              : 
      72            2 :     EXEC SQL insert into customers values (:custs1->name,
      73              :                                            :custs1[0].phone);
      74            2 :     EXEC SQL insert into customers values (:acme.customers[1].name,
      75              :                                            :acme.customers[1].phone);
      76            2 : 
      77              :     /* Clear the array, to be sure reading back into it actually gets data */
      78            2 :     memset(custs1, 0, sizeof(customer) * 10);
      79              : 
      80              :     /* Now read back the data */
      81            2 :     EXEC SQL select * INTO :custs1:inds from customers limit 2;
      82            2 :     printf("custs1:\n");
      83            6 :     for (r = 0; r < 2; r++)
      84              :     {
      85            4 :         printf( "name  - %s\n", custs1[r].name.arr );
      86            4 :         printf( "phone - %d\n", custs1[r].phone );
      87              :     }
      88              : 
      89            2 :     EXEC SQL select * INTO :custs2:inds from customers limit 2;
      90            2 :     printf("\ncusts2:\n");
      91            6 :     for (r = 0; r < 2; r++)
      92              :     {
      93            4 :         printf( "name  - %s\n", custs2[r].name.arr );
      94            4 :         printf( "phone - %d\n", custs2[r].phone );
      95              :     }
      96              : 
      97            2 :     EXEC SQL select * INTO :custs3:inds from customers limit 2;
      98            2 :     printf("\ncusts3:\n");
      99            6 :     for (r = 0; r < 2; r++)
     100              :     {
     101            4 :         printf( "name  - %s\n", custs3[r].name.arr );
     102            4 :         printf( "phone - %d\n", custs3[r].phone );
     103              :     }
     104              : 
     105            2 :     EXEC SQL select * INTO :custs4:inds[0] from customers limit 1;
     106            2 :     printf("\ncusts4:\n");
     107            2 :     printf( "name  - %s\n", custs4.name.arr );
     108            2 :     printf( "phone - %d\n", custs4.phone );
     109              : 
     110            2 :     EXEC SQL select c INTO :onlyname from customers limit 2;
     111            2 :     printf("\nname:\n");
     112            6 :     for (r = 0; r < 2; r++)
     113              :     {
     114            4 :         printf( "name  - %s\n", onlyname[r].arr );
     115              :     }
     116              : 
     117            2 :     EXEC SQL disconnect all;
     118            2 : 
     119            2 :     return 0;
     120              : }