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 "fma_hrly.ec"
121 #line 4 "fma_hrly.ec"
122 #line 5 "fma_hrly.ec"
197 #line 79 "fma_hrly.ec"
234 int i,jtotal,
k,atime,iclear;
245 #line 123 "fma_hrly.ec"
246 #line 124 "fma_hrly.ec"
249 char drain[2], pos[2], cgroup[2];
251 int fyear, fmonth, fday, fhour, fminute, ftime;
263 #line 138 "fma_hrly.ec"
293 etime=end_date.
hour*10000+
299 btime=begin_date.
hour*10000+
311 ftime=fhour*10000+fminute*100;
342 #line 193 "fma_hrly.ec"
344 #line 213 "fma_hrly.ec"
345 static const char *sqlcmdtxt[] =
346 #line 213 "fma_hrly.ec"
348 #line 213 "fma_hrly.ec"
349 "select * from fmahrly where id = ? and drain = ? and pos = ? and cgroup = ? and pe1 = ? and pe2 = ? and dur = ? and t = ? and s = ? and e = ? and p = ? and vcal_yr = ? and vmon = ? and vzday = ? and ccal_yr = ? and cmon = ? and czday = ? and cztime = ?",
352 #line 213 "fma_hrly.ec"
353 static ifx_cursor_t _SQ0 = {0};
354 static ifx_sqlvar_t _sqibind[] =
356 { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
357 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
358 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
359 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
360 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
361 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
362 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
363 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
364 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
365 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
366 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
367 { 102,
sizeof(
year), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
368 { 102,
sizeof(
month), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
369 { 102,
sizeof(
day), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
370 { 102,
sizeof(fyear), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
371 { 102,
sizeof(fmonth), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
372 { 102,
sizeof(fday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
373 { 102,
sizeof(ftime), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
374 #line 213 "fma_hrly.ec"
376 static ifx_sqlvar_t _sqobind[] =
378 { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
379 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
380 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
381 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
382 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
383 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
384 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
385 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
386 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
387 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
388 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
389 { 102,
sizeof((
fma_hrly_rec).vcal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
390 { 102,
sizeof((
fma_hrly_rec).vmon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
391 { 102,
sizeof((
fma_hrly_rec).vzday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
392 { 102,
sizeof((
fma_hrly_rec).ccal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
393 { 102,
sizeof((
fma_hrly_rec).cmon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
394 { 102,
sizeof((
fma_hrly_rec).czday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
395 { 102,
sizeof((
fma_hrly_rec).cztime), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
396 { 105,
sizeof((
fma_hrly_rec).zhr00), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
397 { 105,
sizeof((
fma_hrly_rec).zhr01), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
398 { 105,
sizeof((
fma_hrly_rec).zhr02), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
399 { 105,
sizeof((
fma_hrly_rec).zhr03), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
400 { 105,
sizeof((
fma_hrly_rec).zhr04), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
401 { 105,
sizeof((
fma_hrly_rec).zhr05), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
402 { 105,
sizeof((
fma_hrly_rec).zhr06), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
403 { 105,
sizeof((
fma_hrly_rec).zhr07), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
404 { 105,
sizeof((
fma_hrly_rec).zhr08), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
405 { 105,
sizeof((
fma_hrly_rec).zhr09), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
406 { 105,
sizeof((
fma_hrly_rec).zhr10), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
407 { 105,
sizeof((
fma_hrly_rec).zhr11), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
408 { 105,
sizeof((
fma_hrly_rec).zhr12), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
409 { 105,
sizeof((
fma_hrly_rec).zhr13), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
410 { 105,
sizeof((
fma_hrly_rec).zhr14), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
411 { 105,
sizeof((
fma_hrly_rec).zhr15), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
412 { 105,
sizeof((
fma_hrly_rec).zhr16), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
413 { 105,
sizeof((
fma_hrly_rec).zhr17), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
414 { 105,
sizeof((
fma_hrly_rec).zhr18), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
415 { 105,
sizeof((
fma_hrly_rec).zhr19), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
416 { 105,
sizeof((
fma_hrly_rec).zhr20), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
417 { 105,
sizeof((
fma_hrly_rec).zhr21), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
418 { 105,
sizeof((
fma_hrly_rec).zhr22), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
419 { 105,
sizeof((
fma_hrly_rec).zhr23), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
420 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
421 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
422 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
423 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
424 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
425 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
426 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
427 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
428 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
429 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
430 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
431 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
432 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
433 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
434 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
435 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
436 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
437 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
438 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
439 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
440 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
441 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
442 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
443 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
444 #line 213 "fma_hrly.ec"
446 #line 213 "fma_hrly.ec"
447 _sqibind[0].sqldata = shb5;
448 #line 213 "fma_hrly.ec"
449 _sqibind[1].sqldata = drain;
450 #line 213 "fma_hrly.ec"
451 _sqibind[2].sqldata = pos;
452 #line 213 "fma_hrly.ec"
453 _sqibind[3].sqldata = cgroup;
454 #line 213 "fma_hrly.ec"
455 _sqibind[4].sqldata = pe1;
456 #line 213 "fma_hrly.ec"
457 _sqibind[5].sqldata = pe2;
458 #line 213 "fma_hrly.ec"
459 _sqibind[6].sqldata = dur;
460 #line 213 "fma_hrly.ec"
461 _sqibind[7].sqldata = t;
462 #line 213 "fma_hrly.ec"
463 _sqibind[8].sqldata = s;
464 #line 213 "fma_hrly.ec"
465 _sqibind[9].sqldata = e;
466 #line 213 "fma_hrly.ec"
467 _sqibind[10].sqldata = p;
468 #line 213 "fma_hrly.ec"
469 _sqibind[11].sqldata = (
char *) &
year;
470 #line 213 "fma_hrly.ec"
471 _sqibind[12].sqldata = (
char *) &
month;
472 #line 213 "fma_hrly.ec"
473 _sqibind[13].sqldata = (
char *) &
day;
474 #line 213 "fma_hrly.ec"
475 _sqibind[14].sqldata = (
char *) &fyear;
476 #line 213 "fma_hrly.ec"
477 _sqibind[15].sqldata = (
char *) &fmonth;
478 #line 213 "fma_hrly.ec"
479 _sqibind[16].sqldata = (
char *) &fday;
480 #line 213 "fma_hrly.ec"
481 _sqibind[17].sqldata = (
char *) &ftime;
482 #line 213 "fma_hrly.ec"
484 #line 213 "fma_hrly.ec"
486 #line 213 "fma_hrly.ec"
488 #line 213 "fma_hrly.ec"
490 #line 213 "fma_hrly.ec"
492 #line 213 "fma_hrly.ec"
494 #line 213 "fma_hrly.ec"
496 #line 213 "fma_hrly.ec"
498 #line 213 "fma_hrly.ec"
500 #line 213 "fma_hrly.ec"
502 #line 213 "fma_hrly.ec"
504 #line 213 "fma_hrly.ec"
505 _sqobind[11].sqldata = (
char *) &(
fma_hrly_rec).vcal_yr;
506 #line 213 "fma_hrly.ec"
508 #line 213 "fma_hrly.ec"
510 #line 213 "fma_hrly.ec"
511 _sqobind[14].sqldata = (
char *) &(
fma_hrly_rec).ccal_yr;
512 #line 213 "fma_hrly.ec"
514 #line 213 "fma_hrly.ec"
516 #line 213 "fma_hrly.ec"
518 #line 213 "fma_hrly.ec"
520 #line 213 "fma_hrly.ec"
522 #line 213 "fma_hrly.ec"
524 #line 213 "fma_hrly.ec"
526 #line 213 "fma_hrly.ec"
528 #line 213 "fma_hrly.ec"
530 #line 213 "fma_hrly.ec"
532 #line 213 "fma_hrly.ec"
534 #line 213 "fma_hrly.ec"
536 #line 213 "fma_hrly.ec"
538 #line 213 "fma_hrly.ec"
540 #line 213 "fma_hrly.ec"
542 #line 213 "fma_hrly.ec"
544 #line 213 "fma_hrly.ec"
546 #line 213 "fma_hrly.ec"
548 #line 213 "fma_hrly.ec"
550 #line 213 "fma_hrly.ec"
552 #line 213 "fma_hrly.ec"
554 #line 213 "fma_hrly.ec"
556 #line 213 "fma_hrly.ec"
558 #line 213 "fma_hrly.ec"
560 #line 213 "fma_hrly.ec"
562 #line 213 "fma_hrly.ec"
564 #line 213 "fma_hrly.ec"
566 #line 213 "fma_hrly.ec"
568 #line 213 "fma_hrly.ec"
570 #line 213 "fma_hrly.ec"
572 #line 213 "fma_hrly.ec"
574 #line 213 "fma_hrly.ec"
576 #line 213 "fma_hrly.ec"
578 #line 213 "fma_hrly.ec"
580 #line 213 "fma_hrly.ec"
582 #line 213 "fma_hrly.ec"
584 #line 213 "fma_hrly.ec"
586 #line 213 "fma_hrly.ec"
588 #line 213 "fma_hrly.ec"
590 #line 213 "fma_hrly.ec"
592 #line 213 "fma_hrly.ec"
594 #line 213 "fma_hrly.ec"
596 #line 213 "fma_hrly.ec"
598 #line 213 "fma_hrly.ec"
600 #line 213 "fma_hrly.ec"
602 #line 213 "fma_hrly.ec"
604 #line 213 "fma_hrly.ec"
606 #line 213 "fma_hrly.ec"
608 #line 213 "fma_hrly.ec"
610 #line 213 "fma_hrly.ec"
612 #line 213 "fma_hrly.ec"
614 #line 213 "fma_hrly.ec"
615 sqli_slct(ESQLINTVERSION, &_SQ0,sqlcmdtxt,18,_sqibind,66,_sqobind,0,(ifx_literal_t *)0,(ifx_namelist_t *)0,0);
616 #line 213 "fma_hrly.ec"
634 ftime=fhour*10000+fminute*100;
882 #line 476 "fma_hrly.ec"
struct data_rec data_record
struct fma_hrly_rec fma_hrly_rec
struct sqlca_s ifx_sqlca_t
int fma_hrly(char *hb5, char *parm, char *dpc, struct stim begin_date, struct stim end_date, struct stim q_date, struct stn_values *stn_values)
struct sqlca_s::sqlcaw_s sqlwarn