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"
203 #line 86 "pro_dly.ec"
238 int i,jtotal,
k,atime;
247 #line 126 "pro_dly.ec"
248 #line 127 "pro_dly.ec"
266 #line 143 "pro_dly.ec"
280 strcpy(stat.hb5,hb5);
292 etime=end_date.
hour*10000+
324 #line 185 "pro_dly.ec"
326 #line 197 "pro_dly.ec"
327 static const char *sqlcmdtxt[] =
328 #line 197 "pro_dly.ec"
330 #line 197 "pro_dly.ec"
331 "select * from prodly where id = ? and pe1 = ? and pe2 = ? and dur = ? and t = ? and s = ? and e = ? and p = ? and cal_yr = ? and mon = ?",
334 #line 197 "pro_dly.ec"
335 static ifx_cursor_t _SQ0 = {0};
336 static ifx_sqlvar_t _sqibind[] =
338 { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
339 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
340 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
341 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
342 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
343 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
344 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
345 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
346 { 102,
sizeof(
year), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
347 { 102,
sizeof(
month), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
348 #line 197 "pro_dly.ec"
350 static ifx_sqlvar_t _sqobind[] =
352 { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
353 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
354 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
355 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
356 { 100, 2, 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 { 102,
sizeof((
dly_rec).cal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
361 { 102,
sizeof((
dly_rec).
mon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
362 { 105,
sizeof((
dly_rec).zday01), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
363 { 105,
sizeof((
dly_rec).zday02), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
364 { 105,
sizeof((
dly_rec).zday03), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
365 { 105,
sizeof((
dly_rec).zday04), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
366 { 105,
sizeof((
dly_rec).zday05), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
367 { 105,
sizeof((
dly_rec).zday06), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
368 { 105,
sizeof((
dly_rec).zday07), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
369 { 105,
sizeof((
dly_rec).zday08), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
370 { 105,
sizeof((
dly_rec).zday09), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
371 { 105,
sizeof((
dly_rec).zday10), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
372 { 105,
sizeof((
dly_rec).zday11), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
373 { 105,
sizeof((
dly_rec).zday12), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
374 { 105,
sizeof((
dly_rec).zday13), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
375 { 105,
sizeof((
dly_rec).zday14), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
376 { 105,
sizeof((
dly_rec).zday15), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
377 { 105,
sizeof((
dly_rec).zday16), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
378 { 105,
sizeof((
dly_rec).zday17), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
379 { 105,
sizeof((
dly_rec).zday18), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
380 { 105,
sizeof((
dly_rec).zday19), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
381 { 105,
sizeof((
dly_rec).zday20), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
382 { 105,
sizeof((
dly_rec).zday21), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
383 { 105,
sizeof((
dly_rec).zday22), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
384 { 105,
sizeof((
dly_rec).zday23), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
385 { 105,
sizeof((
dly_rec).zday24), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
386 { 105,
sizeof((
dly_rec).zday25), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
387 { 105,
sizeof((
dly_rec).zday26), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
388 { 105,
sizeof((
dly_rec).zday27), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
389 { 105,
sizeof((
dly_rec).zday28), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
390 { 105,
sizeof((
dly_rec).zday29), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
391 { 105,
sizeof((
dly_rec).zday30), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
392 { 105,
sizeof((
dly_rec).zday31), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
393 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
394 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
395 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
396 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
397 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
398 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
399 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
400 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
401 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
402 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
403 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
404 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
405 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
406 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
407 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
408 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
409 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
410 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
411 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
412 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
413 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
414 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
415 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
416 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
417 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
418 { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
419 { 100, 2, 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 #line 197 "pro_dly.ec"
426 #line 197 "pro_dly.ec"
427 _sqibind[0].sqldata = stat.hb5;
428 #line 197 "pro_dly.ec"
429 _sqibind[1].sqldata = stat.pe1;
430 #line 197 "pro_dly.ec"
431 _sqibind[2].sqldata = stat.pe2;
432 #line 197 "pro_dly.ec"
433 _sqibind[3].sqldata = stat.dur;
434 #line 197 "pro_dly.ec"
435 _sqibind[4].sqldata = stat.t;
436 #line 197 "pro_dly.ec"
437 _sqibind[5].sqldata = stat.s;
438 #line 197 "pro_dly.ec"
439 _sqibind[6].sqldata = stat.e;
440 #line 197 "pro_dly.ec"
441 _sqibind[7].sqldata = stat.p;
442 #line 197 "pro_dly.ec"
443 _sqibind[8].sqldata = (
char *) &
year;
444 #line 197 "pro_dly.ec"
445 _sqibind[9].sqldata = (
char *) &
month;
446 #line 197 "pro_dly.ec"
447 _sqobind[0].sqldata = (
dly_rec).
id;
448 #line 197 "pro_dly.ec"
449 _sqobind[1].sqldata = (
dly_rec).pe1;
450 #line 197 "pro_dly.ec"
451 _sqobind[2].sqldata = (
dly_rec).pe2;
452 #line 197 "pro_dly.ec"
453 _sqobind[3].sqldata = (
dly_rec).dur;
454 #line 197 "pro_dly.ec"
455 _sqobind[4].sqldata = (
dly_rec).t;
456 #line 197 "pro_dly.ec"
457 _sqobind[5].sqldata = (
dly_rec).s;
458 #line 197 "pro_dly.ec"
459 _sqobind[6].sqldata = (
dly_rec).e;
460 #line 197 "pro_dly.ec"
461 _sqobind[7].sqldata = (
dly_rec).p;
462 #line 197 "pro_dly.ec"
463 _sqobind[8].sqldata = (
char *) &(
dly_rec).cal_yr;
464 #line 197 "pro_dly.ec"
465 _sqobind[9].sqldata = (
char *) &(
dly_rec).mon;
466 #line 197 "pro_dly.ec"
467 _sqobind[10].sqldata = (
char *) &(
dly_rec).zday01;
468 #line 197 "pro_dly.ec"
469 _sqobind[11].sqldata = (
char *) &(
dly_rec).zday02;
470 #line 197 "pro_dly.ec"
471 _sqobind[12].sqldata = (
char *) &(
dly_rec).zday03;
472 #line 197 "pro_dly.ec"
473 _sqobind[13].sqldata = (
char *) &(
dly_rec).zday04;
474 #line 197 "pro_dly.ec"
475 _sqobind[14].sqldata = (
char *) &(
dly_rec).zday05;
476 #line 197 "pro_dly.ec"
477 _sqobind[15].sqldata = (
char *) &(
dly_rec).zday06;
478 #line 197 "pro_dly.ec"
479 _sqobind[16].sqldata = (
char *) &(
dly_rec).zday07;
480 #line 197 "pro_dly.ec"
481 _sqobind[17].sqldata = (
char *) &(
dly_rec).zday08;
482 #line 197 "pro_dly.ec"
483 _sqobind[18].sqldata = (
char *) &(
dly_rec).zday09;
484 #line 197 "pro_dly.ec"
485 _sqobind[19].sqldata = (
char *) &(
dly_rec).zday10;
486 #line 197 "pro_dly.ec"
487 _sqobind[20].sqldata = (
char *) &(
dly_rec).zday11;
488 #line 197 "pro_dly.ec"
489 _sqobind[21].sqldata = (
char *) &(
dly_rec).zday12;
490 #line 197 "pro_dly.ec"
491 _sqobind[22].sqldata = (
char *) &(
dly_rec).zday13;
492 #line 197 "pro_dly.ec"
493 _sqobind[23].sqldata = (
char *) &(
dly_rec).zday14;
494 #line 197 "pro_dly.ec"
495 _sqobind[24].sqldata = (
char *) &(
dly_rec).zday15;
496 #line 197 "pro_dly.ec"
497 _sqobind[25].sqldata = (
char *) &(
dly_rec).zday16;
498 #line 197 "pro_dly.ec"
499 _sqobind[26].sqldata = (
char *) &(
dly_rec).zday17;
500 #line 197 "pro_dly.ec"
501 _sqobind[27].sqldata = (
char *) &(
dly_rec).zday18;
502 #line 197 "pro_dly.ec"
503 _sqobind[28].sqldata = (
char *) &(
dly_rec).zday19;
504 #line 197 "pro_dly.ec"
505 _sqobind[29].sqldata = (
char *) &(
dly_rec).zday20;
506 #line 197 "pro_dly.ec"
507 _sqobind[30].sqldata = (
char *) &(
dly_rec).zday21;
508 #line 197 "pro_dly.ec"
509 _sqobind[31].sqldata = (
char *) &(
dly_rec).zday22;
510 #line 197 "pro_dly.ec"
511 _sqobind[32].sqldata = (
char *) &(
dly_rec).zday23;
512 #line 197 "pro_dly.ec"
513 _sqobind[33].sqldata = (
char *) &(
dly_rec).zday24;
514 #line 197 "pro_dly.ec"
515 _sqobind[34].sqldata = (
char *) &(
dly_rec).zday25;
516 #line 197 "pro_dly.ec"
517 _sqobind[35].sqldata = (
char *) &(
dly_rec).zday26;
518 #line 197 "pro_dly.ec"
519 _sqobind[36].sqldata = (
char *) &(
dly_rec).zday27;
520 #line 197 "pro_dly.ec"
521 _sqobind[37].sqldata = (
char *) &(
dly_rec).zday28;
522 #line 197 "pro_dly.ec"
523 _sqobind[38].sqldata = (
char *) &(
dly_rec).zday29;
524 #line 197 "pro_dly.ec"
525 _sqobind[39].sqldata = (
char *) &(
dly_rec).zday30;
526 #line 197 "pro_dly.ec"
527 _sqobind[40].sqldata = (
char *) &(
dly_rec).zday31;
528 #line 197 "pro_dly.ec"
529 _sqobind[41].sqldata = (
dly_rec).qzday01;
530 #line 197 "pro_dly.ec"
531 _sqobind[42].sqldata = (
dly_rec).qzday02;
532 #line 197 "pro_dly.ec"
533 _sqobind[43].sqldata = (
dly_rec).qzday03;
534 #line 197 "pro_dly.ec"
535 _sqobind[44].sqldata = (
dly_rec).qzday04;
536 #line 197 "pro_dly.ec"
537 _sqobind[45].sqldata = (
dly_rec).qzday05;
538 #line 197 "pro_dly.ec"
539 _sqobind[46].sqldata = (
dly_rec).qzday06;
540 #line 197 "pro_dly.ec"
541 _sqobind[47].sqldata = (
dly_rec).qzday07;
542 #line 197 "pro_dly.ec"
543 _sqobind[48].sqldata = (
dly_rec).qzday08;
544 #line 197 "pro_dly.ec"
545 _sqobind[49].sqldata = (
dly_rec).qzday09;
546 #line 197 "pro_dly.ec"
547 _sqobind[50].sqldata = (
dly_rec).qzday10;
548 #line 197 "pro_dly.ec"
549 _sqobind[51].sqldata = (
dly_rec).qzday11;
550 #line 197 "pro_dly.ec"
551 _sqobind[52].sqldata = (
dly_rec).qzday12;
552 #line 197 "pro_dly.ec"
553 _sqobind[53].sqldata = (
dly_rec).qzday13;
554 #line 197 "pro_dly.ec"
555 _sqobind[54].sqldata = (
dly_rec).qzday14;
556 #line 197 "pro_dly.ec"
557 _sqobind[55].sqldata = (
dly_rec).qzday15;
558 #line 197 "pro_dly.ec"
559 _sqobind[56].sqldata = (
dly_rec).qzday16;
560 #line 197 "pro_dly.ec"
561 _sqobind[57].sqldata = (
dly_rec).qzday17;
562 #line 197 "pro_dly.ec"
563 _sqobind[58].sqldata = (
dly_rec).qzday18;
564 #line 197 "pro_dly.ec"
565 _sqobind[59].sqldata = (
dly_rec).qzday19;
566 #line 197 "pro_dly.ec"
567 _sqobind[60].sqldata = (
dly_rec).qzday20;
568 #line 197 "pro_dly.ec"
569 _sqobind[61].sqldata = (
dly_rec).qzday21;
570 #line 197 "pro_dly.ec"
571 _sqobind[62].sqldata = (
dly_rec).qzday22;
572 #line 197 "pro_dly.ec"
573 _sqobind[63].sqldata = (
dly_rec).qzday23;
574 #line 197 "pro_dly.ec"
575 _sqobind[64].sqldata = (
dly_rec).qzday24;
576 #line 197 "pro_dly.ec"
577 _sqobind[65].sqldata = (
dly_rec).qzday25;
578 #line 197 "pro_dly.ec"
579 _sqobind[66].sqldata = (
dly_rec).qzday26;
580 #line 197 "pro_dly.ec"
581 _sqobind[67].sqldata = (
dly_rec).qzday27;
582 #line 197 "pro_dly.ec"
583 _sqobind[68].sqldata = (
dly_rec).qzday28;
584 #line 197 "pro_dly.ec"
585 _sqobind[69].sqldata = (
dly_rec).qzday29;
586 #line 197 "pro_dly.ec"
587 _sqobind[70].sqldata = (
dly_rec).qzday30;
588 #line 197 "pro_dly.ec"
589 _sqobind[71].sqldata = (
dly_rec).qzday31;
590 #line 197 "pro_dly.ec"
591 sqli_slct(ESQLINTVERSION, &_SQ0,sqlcmdtxt,10,_sqibind,72,_sqobind,0,(ifx_literal_t *)0,(ifx_namelist_t *)0,0);
592 #line 197 "pro_dly.ec"
611 for(
k=numdays;
k>0;
k--) {
628 for(hh=0;hh<qlen;hh++)
780 #line 382 "pro_dly.ec"
struct data_rec data_record
int pro_dly(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_dly_rec dly_rec
int getmonthdays(int year, int month)
struct sqlca_s::sqlcaw_s sqlwarn