blob: ec8ad6040b405d4160c624a70d61ccbab5b7cea9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
|
#include <stdlib.h>
#include <stdio.h>
/*----------------------------------------------------------------*/
EXEC SQL INCLUDE SQLCA;
short sqlcode;
EXEC SQL BEGIN DECLARE SECTION;
int host_a;
double host_b;
char host_c;
EXEC SQL END DECLARE SECTION;
EXEC SQL DECLARE csr1 CURSOR FOR
SELECT a, b, c
FROM table1
WHERE x = :hostvar1;
/* dollar sign notation */
$ DECLARE cursorName CURSOR for
SELECT
a,
b
INTO
$struct->a,
$struct->b
FROM table;
/*----------------------------------------------------------------*/
void main(void)
{
hostvar1 = 42;
EXEC SQL OPEN csr1;
if (sqlcode < 0)
{
exit(0);
}
while (rc >= 0 && rc != 100)
{
EXEC SQL FETCH csr1 INTO :host_a, :host_b, :host_c;
printf("Fetch %d, %lf, %s\n", host_a, host_b, host_c);
}
EXEC SQL CLOSE csr1;
}
void foo(void)
{
strcpy(demoquery1, "some SQL statement");
EXEC SQL prepare demo3id from :demoquery1;
/* a comment */
EXEC SQL declare demo3cursor cursor for demo3id;
}
|
