Age Owner TLA Line data Source code
1 : #include <stdio.h>
2 : exec sql include sqlca;
3 : #include <stdlib.h>
4 : exec sql include ../regression;
5 :
6094 meskes 6 CBC 1 : int main(void)
7 : {
8 : exec sql begin declare section;
9 1 : int *ip1=0;
10 1 : char **cp2=0;
11 1 : int *ipointer1=0;
12 1 : int *ipointer2=0;
13 : int colnum;
14 : exec sql end declare section;
15 : int i;
16 :
17 1 : ECPGdebug(1, stderr);
18 :
19 : exec sql whenever sqlerror do sqlprint();
20 1 : exec sql connect to REGRESSDB1;
21 1 :
6077 22 1 : exec sql set datestyle to postgres;
23 1 :
6094 24 1 : exec sql create table test (a int, b text);
25 1 : exec sql insert into test values (1, 'one');
26 1 : exec sql insert into test values (2, 'two');
27 1 : exec sql insert into test values (NULL, 'three');
28 1 : exec sql insert into test values (4, 'four');
29 1 : exec sql insert into test values (5, NULL);
30 1 : exec sql insert into test values (NULL, NULL);
31 1 :
32 1 : exec sql allocate descriptor mydesc;
4842 33 1 : exec sql select * into sql descriptor mydesc from test;
6094 34 1 : exec sql get descriptor mydesc :colnum=COUNT;
35 1 : exec sql get descriptor mydesc value 1 :ip1=DATA, :ipointer1=INDICATOR;
36 1 : exec sql get descriptor mydesc value 2 :cp2=DATA, :ipointer2=INDICATOR;
37 1 :
38 1 : printf("Result (%d columns):\n", colnum);
39 7 : for (i=0;i < sqlca.sqlerrd[2];++i)
40 : {
41 6 : if (ipointer1[i]) printf("NULL, ");
4520 peter_e 42 4 : else printf("%d, ",ip1[i]);
43 :
6094 meskes 44 6 : if (ipointer2[i]) printf("NULL, ");
4520 peter_e 45 4 : else printf("'%s', ",cp2[i]);
6094 meskes 46 6 : printf("\n");
47 : }
48 1 : ECPGfree_auto_mem();
49 1 : printf("\n");
50 :
51 1 : exec sql deallocate descriptor mydesc;
52 1 : exec sql rollback;
53 1 : exec sql disconnect;
54 1 : return 0;
55 : }
|
