3 static const char _Cn1[] =
"fvalcursor";
12 #line 1 "/opt/informix/incl/esql/sqlca.h"
86 #define SQLNOTFOUND 100
90 #define sqlca ifmxsqlca
102 extern int4 * ifx_sqlcode(
void);
103 extern struct sqlca_s * ifx_sqlca(
void);
105 #define SQLCODE (*(ifx_sqlcode()))
106 #define SQLSTATE ((char *)(ifx_sqlstate()))
107 #define sqlca (*(ifx_sqlca()))
116 #line 103 "/opt/informix/incl/esql/sqlca.h"
124 int etime,btime,zdate;
131 #line 13 "fvalues.ec"
132 #line 14 "fvalues.ec"
133 int byear, eyear, bmonth, emonth, bday, eday;
135 char pe1[2], pe2[2], dur[2], t[2], s[2], e[2], p[2], shb5[10];
136 struct fval_rec_single
159 #line 42 "fvalues.ec"
180 byear=begin_date.
year;
182 emonth=end_date.
month;
183 bmonth=begin_date.
month;
188 etime=end_date.
hour*10000+
191 btime=begin_date.
hour*10000+
194 printf(
"%d %d %d %d %d %d\n",eyear,emonth,eday,byear,bmonth,bday);
196 eval=eyear*10000+emonth*100+eday;
197 bval=byear*10000+bmonth*100+bday;
205 #line 82 "fvalues.ec"
207 #line 84 "fvalues.ec"
208 static ifx_sqlvar_t _sqibind[] =
210 { 100, 10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
211 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
212 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
213 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
214 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
215 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
216 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
217 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
218 { 102,
sizeof(eval), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
219 { 102,
sizeof(bval), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
220 #line 84 "fvalues.ec"
222 static ifx_sqlda_t _SD0 = { 10, _sqibind, {0}, 10, 0 };
223 #line 84 "fvalues.ec"
224 _sqibind[0].sqldata = shb5;
225 #line 84 "fvalues.ec"
226 _sqibind[1].sqldata = pe1;
227 #line 84 "fvalues.ec"
228 _sqibind[2].sqldata = pe2;
229 #line 84 "fvalues.ec"
230 _sqibind[3].sqldata = dur;
231 #line 84 "fvalues.ec"
232 _sqibind[4].sqldata = t;
233 #line 84 "fvalues.ec"
234 _sqibind[5].sqldata = s;
235 #line 84 "fvalues.ec"
236 _sqibind[6].sqldata = e;
237 #line 84 "fvalues.ec"
238 _sqibind[7].sqldata = p;
239 #line 84 "fvalues.ec"
240 _sqibind[8].sqldata = (
char *) &eval;
241 #line 84 "fvalues.ec"
242 _sqibind[9].sqldata = (
char *) &bval;
243 sqli_curs_open(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION,
_Cn1, 768), &_SD0, (
char *)0, (
struct value *)0, 1, 0);
244 #line 84 "fvalues.ec"
262 #line 98 "fvalues.ec"
264 #line 98 "fvalues.ec"
265 static ifx_sqlvar_t _sqobind[] =
267 { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
268 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
269 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
270 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
271 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
272 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
273 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
274 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
275 { 102,
sizeof((fval_rec).vcal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
276 { 102,
sizeof((fval_rec).vmon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
277 { 102,
sizeof((fval_rec).vzday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
278 { 102,
sizeof((fval_rec).vtime), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
279 { 102,
sizeof((fval_rec).ccal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
280 { 102,
sizeof((fval_rec).cmon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
281 { 102,
sizeof((fval_rec).czday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
282 { 102,
sizeof((fval_rec).ctime), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
283 { 105,
sizeof((fval_rec).
value), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
284 #line 98 "fvalues.ec"
286 static ifx_sqlda_t _SD0 = { 17, _sqobind, {0}, 17, 0 };
287 static _FetchSpec _FS1 = { 0, 1, 0 };
288 #line 98 "fvalues.ec"
289 _sqobind[0].sqldata = (fval_rec).
id;
290 #line 98 "fvalues.ec"
291 _sqobind[1].sqldata = (fval_rec).pe1;
292 #line 98 "fvalues.ec"
293 _sqobind[2].sqldata = (fval_rec).pe2;
294 #line 98 "fvalues.ec"
295 _sqobind[3].sqldata = (fval_rec).dur;
296 #line 98 "fvalues.ec"
297 _sqobind[4].sqldata = (fval_rec).t;
298 #line 98 "fvalues.ec"
299 _sqobind[5].sqldata = (fval_rec).s;
300 #line 98 "fvalues.ec"
301 _sqobind[6].sqldata = (fval_rec).e;
302 #line 98 "fvalues.ec"
303 _sqobind[7].sqldata = (fval_rec).p;
304 #line 98 "fvalues.ec"
305 _sqobind[8].sqldata = (
char *) &(fval_rec).vcal_yr;
306 #line 98 "fvalues.ec"
307 _sqobind[9].sqldata = (
char *) &(fval_rec).vmon;
308 #line 98 "fvalues.ec"
309 _sqobind[10].sqldata = (
char *) &(fval_rec).vzday;
310 #line 98 "fvalues.ec"
311 _sqobind[11].sqldata = (
char *) &(fval_rec).vtime;
312 #line 98 "fvalues.ec"
313 _sqobind[12].sqldata = (
char *) &(fval_rec).ccal_yr;
314 #line 98 "fvalues.ec"
315 _sqobind[13].sqldata = (
char *) &(fval_rec).cmon;
316 #line 98 "fvalues.ec"
317 _sqobind[14].sqldata = (
char *) &(fval_rec).czday;
318 #line 98 "fvalues.ec"
319 _sqobind[15].sqldata = (
char *) &(fval_rec).ctime;
320 #line 98 "fvalues.ec"
321 _sqobind[16].sqldata = (
char *) &(fval_rec).value;
322 sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION,
_Cn1, 768), (ifx_sqlda_t *)0, &_SD0, (
char *)0, &_FS1);
323 #line 98 "fvalues.ec"
333 zdate=fval_rec.vcal_yr*10000+fval_rec.vmon*100+fval_rec.vzday;
335 cdate=fval_rec.ccal_yr*10000+fval_rec.cmon*100+fval_rec.czday;
337 ctime=fval_rec.ctime;
339 if(odate==zdate && otime==fval_rec.vtime)
343 otime=fval_rec.vtime;
365 #line 136 "fvalues.ec"
367 #line 136 "fvalues.ec"
368 sqli_curs_close(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION,
_Cn1, 768));
369 #line 136 "fvalues.ec"
377 #line 141 "fvalues.ec"
int fvalues_search(char *hb5, char *parm, struct stim begin_date, struct stim end_date, struct stn_values *stn_values)
struct sqlca_s ifx_sqlca_t
printf("fbuf is %s\n", fbuf)
struct sqlca_s::sqlcaw_s sqlwarn