57 #line 23 "variable.pgc"
60 #line 23 "variable.pgc"
63 #line 23 "variable.pgc"
75 #line 27 "variable.pgc"
76 struct personal_struct {
77 #line 25 "variable.pgc"
80 #line 26 "variable.pgc"
81 struct birthinfo birth ;
84 #line 30 "variable.pgc"
85 struct personal_indicator {
86 #line 28 "variable.pgc"
89 #line 29 "variable.pgc"
90 struct birthinfo ind_birth ;
91 } ind_personal , *
i ;
93 #line 31 "variable.pgc"
96 #line 32 "variable.pgc"
99 #line 32 "variable.pgc"
102 #line 33 "variable.pgc"
106 #line 35 "variable.pgc"
107 char * married = NULL ;
109 #line 35 "variable.pgc"
112 #line 36 "variable.pgc"
115 #line 36 "variable.pgc"
118 #line 37 "variable.pgc"
121 #line 37 "variable.pgc"
128 strcpy(msg,
"connect");
129 {
ECPGconnect(__LINE__, 0,
"ecpg1_regression" , NULL, NULL , NULL, 0);
130 #line 44 "variable.pgc"
133 #line 44 "variable.pgc"
138 #line 47 "variable.pgc"
141 #line 47 "variable.pgc"
144 strcpy(msg,
"create");
145 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"create table family ( name char ( 8 ) , born integer , age smallint , married date , children integer )",
ECPGt_EOIT,
ECPGt_EORT);
146 #line 50 "variable.pgc"
149 #line 50 "variable.pgc"
152 strcpy(msg,
"insert");
153 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"insert into family ( name , married , children ) values ( 'Mum' , '19870714' , 3 )",
ECPGt_EOIT,
ECPGt_EORT);
154 #line 53 "variable.pgc"
157 #line 53 "variable.pgc"
159 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"insert into family ( name , born , married , children ) values ( 'Dad' , '19610721' , '19870714' , 3 )",
ECPGt_EOIT,
ECPGt_EORT);
160 #line 54 "variable.pgc"
163 #line 54 "variable.pgc"
165 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"insert into family ( name , age ) values ( 'Child 1' , 16 )",
ECPGt_EOIT,
ECPGt_EORT);
166 #line 55 "variable.pgc"
169 #line 55 "variable.pgc"
171 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"insert into family ( name , age ) values ( 'Child 2' , 14 )",
ECPGt_EOIT,
ECPGt_EORT);
172 #line 56 "variable.pgc"
175 #line 56 "variable.pgc"
177 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"insert into family ( name , age ) values ( 'Child 3' , 9 )",
ECPGt_EOIT,
ECPGt_EORT);
178 #line 57 "variable.pgc"
181 #line 57 "variable.pgc"
184 strcpy(msg,
"commit");
186 #line 60 "variable.pgc"
189 #line 60 "variable.pgc"
193 {
ECPGdo(__LINE__, 0, 1, NULL, 0,
ECPGst_normal,
"declare cur cursor for select name , born , age , married , children from family",
ECPGt_EOIT,
ECPGt_EORT);
194 #line 63 "variable.pgc"
197 #line 63 "variable.pgc"
201 #line 65 "variable.pgc"
206 memset(
i, 0,
sizeof(ind_personal));
207 for (loopcount = 0; loopcount < 100; loopcount++) {
208 strcpy(msg,
"fetch");
211 ECPGt_int,&(
i->ind_name),(
long)1,(
long)-1,
sizeof(
struct birthinfo ),
212 ECPGt_long,&(p->birth.born),(
long)1,(
long)1,
sizeof(
struct birthinfo ),
213 ECPGt_long,&(
i->ind_birth.born),(
long)1,(
long)1,
sizeof(
struct birthinfo ),
214 ECPGt_short,&(p->birth.age),(
long)1,(
long)1,
sizeof(
struct birthinfo ),
215 ECPGt_short,&(
i->ind_birth.age),(
long)1,(
long)1,
sizeof(
struct birthinfo ),
216 ECPGt_char,&(married),(
long)0,(
long)1,(1)*
sizeof(
char),
217 ECPGt_long,&(ind_married),(
long)1,(
long)1,
sizeof(
long),
220 #line 72 "variable.pgc"
223 #line 72 "variable.pgc"
226 #line 72 "variable.pgc"
228 printf(
"%8.8s", personal.name.arr);
229 if (
i->ind_birth.born >= 0)
230 printf(
", born %ld", personal.birth.born);
231 if (
i->ind_birth.age >= 0)
232 printf(
", age = %d", personal.birth.age);
233 if (ind_married >= 0)
234 printf(
", married %s", married);
243 strcpy(msg,
"close");
245 #line 89 "variable.pgc"
248 #line 89 "variable.pgc"
253 #line 92 "variable.pgc"
256 #line 92 "variable.pgc"
259 strcpy(msg,
"commit");
261 #line 95 "variable.pgc"
264 #line 95 "variable.pgc"
267 strcpy(msg,
"disconnect");
269 #line 98 "variable.pgc"
272 #line 98 "variable.pgc"
bool ECPGdisconnect(int lineno, const char *connection_name)
bool ECPGconnect(int lineno, int c, const char *name, const char *user, const char *passwd, const char *connection_name, int autocommit)
bool ECPGdo(const int lineno, const int compat, const int force_indicator, const char *connection_name, const bool questionmarks, const int st, const char *query,...)
bool ECPGtrans(int lineno, const char *connection_name, const char *transaction)