3 #line 1 "pro_monthly.ec"
8 #line 2 "pro_monthly.ec"
10 #line 2 "pro_monthly.ec"
11 #line 1 "/opt/informix/incl/esql/sqlca.h"
85 #define SQLNOTFOUND 100
89 #define sqlca ifmxsqlca
101 extern int4 * ifx_sqlcode(
void);
102 extern struct sqlca_s * ifx_sqlca(
void);
104 #define SQLCODE (*(ifx_sqlcode()))
105 #define SQLSTATE ((char *)(ifx_sqlstate()))
106 #define sqlca (*(ifx_sqlca()))
115 #line 103 "/opt/informix/incl/esql/sqlca.h"
116 #line 3 "pro_monthly.ec"
121 #line 4 "pro_monthly.ec"
122 #line 5 "pro_monthly.ec"
164 #line 47 "pro_monthly.ec"
197 int i,jtotal,
k,atime;
206 #line 85 "pro_monthly.ec"
207 #line 86 "pro_monthly.ec"
225 #line 102 "pro_monthly.ec"
238 strcpy(stat.hb5,hb5);
250 etime=end_date.
hour*10000+
279 #line 141 "pro_monthly.ec"
281 #line 152 "pro_monthly.ec"
282 static const char *sqlcmdtxt[] =
283 #line 152 "pro_monthly.ec"
285 #line 152 "pro_monthly.ec"
286 "select * from promonly where id = ? and pe1 = ? and pe2 = ? and dur = ? and t = ? and s = ? and e = ? and p = ? and cal_yr = ?",
289 #line 152 "pro_monthly.ec"
290 static ifx_cursor_t _SQ0 = {0};
291 static ifx_sqlvar_t _sqibind[] =
293 { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
294 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
295 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
296 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
297 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
298 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
299 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
300 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
301 { 102,
sizeof(
year), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
302 #line 152 "pro_monthly.ec"
304 static ifx_sqlvar_t _sqobind[] =
306 { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
307 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
308 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
309 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
310 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
311 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
312 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
313 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
314 { 102,
sizeof((
monthly_rec).cal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
315 { 105,
sizeof((
monthly_rec).jan), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
316 { 105,
sizeof((
monthly_rec).feb), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
317 { 105,
sizeof((
monthly_rec).mar), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
318 { 105,
sizeof((
monthly_rec).apr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
319 { 105,
sizeof((
monthly_rec).may), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
320 { 105,
sizeof((
monthly_rec).jun), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
321 { 105,
sizeof((
monthly_rec).jul), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
322 { 105,
sizeof((
monthly_rec).aug), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
323 { 105,
sizeof((
monthly_rec).sep), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
324 { 105,
sizeof((
monthly_rec).oct), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
325 { 105,
sizeof((
monthly_rec).nov), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
326 { 105,
sizeof((
monthly_rec).dec), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
327 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
328 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
329 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
330 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
331 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
332 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
333 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
334 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
335 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
336 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
337 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
338 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
339 #line 152 "pro_monthly.ec"
341 #line 152 "pro_monthly.ec"
342 _sqibind[0].sqldata = stat.hb5;
343 #line 152 "pro_monthly.ec"
344 _sqibind[1].sqldata = stat.pe1;
345 #line 152 "pro_monthly.ec"
346 _sqibind[2].sqldata = stat.pe2;
347 #line 152 "pro_monthly.ec"
348 _sqibind[3].sqldata = stat.dur;
349 #line 152 "pro_monthly.ec"
350 _sqibind[4].sqldata = stat.t;
351 #line 152 "pro_monthly.ec"
352 _sqibind[5].sqldata = stat.s;
353 #line 152 "pro_monthly.ec"
354 _sqibind[6].sqldata = stat.e;
355 #line 152 "pro_monthly.ec"
356 _sqibind[7].sqldata = stat.p;
357 #line 152 "pro_monthly.ec"
358 _sqibind[8].sqldata = (
char *) &
year;
359 #line 152 "pro_monthly.ec"
361 #line 152 "pro_monthly.ec"
363 #line 152 "pro_monthly.ec"
365 #line 152 "pro_monthly.ec"
367 #line 152 "pro_monthly.ec"
369 #line 152 "pro_monthly.ec"
371 #line 152 "pro_monthly.ec"
373 #line 152 "pro_monthly.ec"
375 #line 152 "pro_monthly.ec"
376 _sqobind[8].sqldata = (
char *) &(
monthly_rec).cal_yr;
377 #line 152 "pro_monthly.ec"
379 #line 152 "pro_monthly.ec"
380 _sqobind[10].sqldata = (
char *) &(
monthly_rec).feb;
381 #line 152 "pro_monthly.ec"
382 _sqobind[11].sqldata = (
char *) &(
monthly_rec).mar;
383 #line 152 "pro_monthly.ec"
384 _sqobind[12].sqldata = (
char *) &(
monthly_rec).apr;
385 #line 152 "pro_monthly.ec"
386 _sqobind[13].sqldata = (
char *) &(
monthly_rec).may;
387 #line 152 "pro_monthly.ec"
388 _sqobind[14].sqldata = (
char *) &(
monthly_rec).jun;
389 #line 152 "pro_monthly.ec"
390 _sqobind[15].sqldata = (
char *) &(
monthly_rec).jul;
391 #line 152 "pro_monthly.ec"
392 _sqobind[16].sqldata = (
char *) &(
monthly_rec).aug;
393 #line 152 "pro_monthly.ec"
394 _sqobind[17].sqldata = (
char *) &(
monthly_rec).sep;
395 #line 152 "pro_monthly.ec"
396 _sqobind[18].sqldata = (
char *) &(
monthly_rec).oct;
397 #line 152 "pro_monthly.ec"
398 _sqobind[19].sqldata = (
char *) &(
monthly_rec).nov;
399 #line 152 "pro_monthly.ec"
400 _sqobind[20].sqldata = (
char *) &(
monthly_rec).dec;
401 #line 152 "pro_monthly.ec"
403 #line 152 "pro_monthly.ec"
405 #line 152 "pro_monthly.ec"
407 #line 152 "pro_monthly.ec"
409 #line 152 "pro_monthly.ec"
411 #line 152 "pro_monthly.ec"
413 #line 152 "pro_monthly.ec"
415 #line 152 "pro_monthly.ec"
417 #line 152 "pro_monthly.ec"
419 #line 152 "pro_monthly.ec"
421 #line 152 "pro_monthly.ec"
423 #line 152 "pro_monthly.ec"
425 #line 152 "pro_monthly.ec"
426 sqli_slct(ESQLINTVERSION, &_SQ0,sqlcmdtxt,9,_sqibind,33,_sqobind,0,(ifx_literal_t *)0,(ifx_namelist_t *)0,0);
427 #line 152 "pro_monthly.ec"
454 for(hh=0;hh<qlen;hh++)
521 #line 243 "pro_monthly.ec"
struct data_rec data_record
int pro_monthly(char *hb5, char *parm, struct stim begin_date, struct stim end_date, char *qual, struct stn_values *stn_values)
struct sqlca_s ifx_sqlca_t
struct pro_monthly_rec monthly_rec
struct sqlca_s::sqlcaw_s sqlwarn