1 exec sql include sqlca;
4 int fb(int x) { return x; }
5 int fc(const char *x) { return *x; }
6 int fd(const char *x,int i) { return (*x)*i; }
7 enum e { ENUM0, ENUM1 };
8 int fe(enum e x) { return (int)x; }
9 struct sa { int member; };
11 void sqlmeldung(char *meldung, short trans)
15 exec sql define NONO 0;
21 { static const int i=2;
27 exec sql begin declare section;
40 long long iax /* = 40000000000LL */ ;
41 exec sql end declare section;
46 exec sql begin declare section;
47 int k=N::i; /* compile error */
48 exec sql end declare section;
51 exec sql whenever sqlerror do fa();
52 exec sql select now();
53 exec sql whenever sqlerror do fb(20);
54 exec sql select now();
55 exec sql whenever sqlerror do fc("50");
56 exec sql select now();
57 exec sql whenever sqlerror do fd("50",1);
58 exec sql select now();
59 exec sql whenever sqlerror do fe(ENUM0);
60 exec sql select now();
61 exec sql whenever sqlerror do sqlmeldung(NULL, NONO);
62 exec sql select now();