Mapper
get_stn_values4.c
Go to the documentation of this file.
1 #include <sqlhdr.h>
2 #include <sqliapi.h>
3 static const char _Cn1[] = "qrval96";
4 #line 1 "get_stn_values4.ec"
5 #include "hydro_data.h"
6 
7 int get_stn_values(char *stn_id,char *shef,time_t abeg,time_t aend,
8  struct stn_values *stn_values)
9 {
10 
11 /* general variable definitions */
12 int i,k;
13 int nval=0;
14 int count=0;
15 int go;
16 int debug=0;
17 int pro=0;
18 int b_year,b_month,b_day,b_hour,b_min,b_sec;
19 int e_year,e_month,e_day,e_hour,e_min,e_sec;
20 char *caller="get_stn_values: ";
21 char rval96_yr[10];
22 
23 struct tm *gm;
24 time_t acur,acur00;
25 
26 struct data_rec
27 {
28  double values[96];
29  char lwals[96];
30 }dr;
31 
32 /* declare informix host variables */
33 /*
34  * exec sql begin declare section;
35  */
36 #line 29 "get_stn_values4.ec"
37 #line 30 "get_stn_values4.ec"
38  char id[6];
39  char pe1[2];
40  char pe2[2];
41  char dur[2];
42  char t[2];
43  char s[2];
44  char e[2];
45  char p[2];
46 int cal_yr;
47 int mon;
48 int zday;
49 int year, month, day, hour, min, sec;
50 int beg_cal_yr;
51  char query[256];
52 struct rec96_rec
53  {
54  char id[6];
55  char pe1[2];
56  char pe2[2];
57  char dur[2];
58  char t[2];
59  char s[2];
60  char e[2];
61  char p[2];
62  int cal_yr;
63  int mon;
64  int zday;
65  double z0000;
66  double z0015;
67  double z0030;
68  double z0045;
69  double z0100;
70  double z0115;
71  double z0130;
72  double z0145;
73  double z0200;
74  double z0215;
75  double z0230;
76  double z0245;
77  double z0300;
78  double z0315;
79  double z0330;
80  double z0345;
81  double z0400;
82  double z0415;
83  double z0430;
84  double z0445;
85  double z0500;
86  double z0515;
87  double z0530;
88  double z0545;
89  double z0600;
90  double z0615;
91  double z0630;
92  double z0645;
93  double z0700;
94  double z0715;
95  double z0730;
96  double z0745;
97  double z0800;
98  double z0815;
99  double z0830;
100  double z0845;
101  double z0900;
102  double z0915;
103  double z0930;
104  double z0945;
105  double z1000;
106  double z1015;
107  double z1030;
108  double z1045;
109  double z1100;
110  double z1115;
111  double z1130;
112  double z1145;
113  double z1200;
114  double z1215;
115  double z1230;
116  double z1245;
117  double z1300;
118  double z1315;
119  double z1330;
120  double z1345;
121  double z1400;
122  double z1415;
123  double z1430;
124  double z1445;
125  double z1500;
126  double z1515;
127  double z1530;
128  double z1545;
129  double z1600;
130  double z1615;
131  double z1630;
132  double z1645;
133  double z1700;
134  double z1715;
135  double z1730;
136  double z1745;
137  double z1800;
138  double z1815;
139  double z1830;
140  double z1845;
141  double z1900;
142  double z1915;
143  double z1930;
144  double z1945;
145  double z2000;
146  double z2015;
147  double z2030;
148  double z2045;
149  double z2100;
150  double z2115;
151  double z2130;
152  double z2145;
153  double z2200;
154  double z2215;
155  double z2230;
156  double z2245;
157  double z2300;
158  double z2315;
159  double z2330;
160  double z2345;
161  char qz0000[2];
162  char qz0015[2];
163  char qz0030[2];
164  char qz0045[2];
165  char qz0100[2];
166  char qz0115[2];
167  char qz0130[2];
168  char qz0145[2];
169  char qz0200[2];
170  char qz0215[2];
171  char qz0230[2];
172  char qz0245[2];
173  char qz0300[2];
174  char qz0315[2];
175  char qz0330[2];
176  char qz0345[2];
177  char qz0400[2];
178  char qz0415[2];
179  char qz0430[2];
180  char qz0445[2];
181  char qz0500[2];
182  char qz0515[2];
183  char qz0530[2];
184  char qz0545[2];
185  char qz0600[2];
186  char qz0615[2];
187  char qz0630[2];
188  char qz0645[2];
189  char qz0700[2];
190  char qz0715[2];
191  char qz0730[2];
192  char qz0745[2];
193  char qz0800[2];
194  char qz0815[2];
195  char qz0830[2];
196  char qz0845[2];
197  char qz0900[2];
198  char qz0915[2];
199  char qz0930[2];
200  char qz0945[2];
201  char qz1000[2];
202  char qz1015[2];
203  char qz1030[2];
204  char qz1045[2];
205  char qz1100[2];
206  char qz1115[2];
207  char qz1130[2];
208  char qz1145[2];
209  char qz1200[2];
210  char qz1215[2];
211  char qz1230[2];
212  char qz1245[2];
213  char qz1300[2];
214  char qz1315[2];
215  char qz1330[2];
216  char qz1345[2];
217  char qz1400[2];
218  char qz1415[2];
219  char qz1430[2];
220  char qz1445[2];
221  char qz1500[2];
222  char qz1515[2];
223  char qz1530[2];
224  char qz1545[2];
225  char qz1600[2];
226  char qz1615[2];
227  char qz1630[2];
228  char qz1645[2];
229  char qz1700[2];
230  char qz1715[2];
231  char qz1730[2];
232  char qz1745[2];
233  char qz1800[2];
234  char qz1815[2];
235  char qz1830[2];
236  char qz1845[2];
237  char qz1900[2];
238  char qz1915[2];
239  char qz1930[2];
240  char qz1945[2];
241  char qz2000[2];
242  char qz2015[2];
243  char qz2030[2];
244  char qz2045[2];
245  char qz2100[2];
246  char qz2115[2];
247  char qz2130[2];
248  char qz2145[2];
249  char qz2200[2];
250  char qz2215[2];
251  char qz2230[2];
252  char qz2245[2];
253  char qz2300[2];
254  char qz2315[2];
255  char qz2330[2];
256  char qz2345[2];
257  } rec96;
258 struct prohrly
259  {
260  char id[6];
261  char pe1[2];
262  char pe2[2];
263  char dur[2];
264  char t[2];
265  char s[2];
266  char e[2];
267  char p[2];
268  int cal_yr;
269  int mon;
270  int zday;
271  double z00;
272  double z01;
273  double z02;
274  double z03;
275  double z04;
276  double z05;
277  double z06;
278  double z07;
279  double z08;
280  double z09;
281  double z10;
282  double z11;
283  double z12;
284  double z13;
285  double z14;
286  double z15;
287  double z16;
288  double z17;
289  double z18;
290  double z19;
291  double z20;
292  double z21;
293  double z22;
294  double z23;
295  char qz00[2];
296  char qz01[2];
297  char qz02[2];
298  char qz03[2];
299  char qz04[2];
300  char qz05[2];
301  char qz06[2];
302  char qz07[2];
303  char qz08[2];
304  char qz09[2];
305  char qz10[2];
306  char qz11[2];
307  char qz12[2];
308  char qz13[2];
309  char qz14[2];
310  char qz15[2];
311  char qz16[2];
312  char qz17[2];
313  char qz18[2];
314  char qz19[2];
315  char qz20[2];
316  char qz21[2];
317  char qz22[2];
318  char qz23[2];
319  } pph;
320 struct proqtry
321  {
322  char id[6];
323  char pe1[2];
324  char pe2[2];
325  char dur[2];
326  char t[2];
327  char s[2];
328  char e[2];
329  char p[2];
330  int cal_yr;
331  int mon;
332  int zday;
333  double z00;
334  double z06;
335  double z12;
336  double z18;
337  char qz00[2];
338  char qz06[2];
339  char qz12[2];
340  char qz18[2];
341  } ppq;
342 struct prodly
343  {
344  char id[6];
345  char pe1[2];
346  char pe2[2];
347  char dur[2];
348  char t[2];
349  char s[2];
350  char e[2];
351  char p[2];
352  int cal_yr;
353  int mon;
354  double z01;
355  double z02;
356  double z03;
357  double z04;
358  double z05;
359  double z06;
360  double z07;
361  double z08;
362  double z09;
363  double z10;
364  double z11;
365  double z12;
366  double z13;
367  double z14;
368  double z15;
369  double z16;
370  double z17;
371  double z18;
372  double z19;
373  double z20;
374  double z21;
375  double z22;
376  double z23;
377  double z24;
378  double z25;
379  double z26;
380  double z27;
381  double z28;
382  double z29;
383  double z30;
384  double z31;
385  char qz01[2];
386  char qz02[2];
387  char qz03[2];
388  char qz04[2];
389  char qz05[2];
390  char qz06[2];
391  char qz07[2];
392  char qz08[2];
393  char qz09[2];
394  char qz10[2];
395  char qz11[2];
396  char qz12[2];
397  char qz13[2];
398  char qz14[2];
399  char qz15[2];
400  char qz16[2];
401  char qz17[2];
402  char qz18[2];
403  char qz19[2];
404  char qz20[2];
405  char qz21[2];
406  char qz22[2];
407  char qz23[2];
408  char qz24[2];
409  char qz25[2];
410  char qz26[2];
411  char qz27[2];
412  char qz28[2];
413  char qz29[2];
414  char qz30[2];
415  char qz31[2];
416  } ppd;
417 /*
418  * exec sql end declare section;
419  */
420 #line 415 "get_stn_values4.ec"
421 
422 
423  strcpy(id,stn_id);
424  strncpy(pe1,shef+0,1);
425  *(pe1+1)='\0';
426  strncpy(pe2,shef+1,1);
427  *(pe2+1)='\0';
428  strncpy(dur,shef+2,1);
429  *(dur+1)='\0';
430  strncpy(t,shef+3,1);
431  *(t+1)='\0';
432  strncpy(s,shef+4,1);
433  *(s+1)='\0';
434  strncpy(e,shef+5,1);
435  *(e+1)='\0';
436  strncpy(p,shef+6,1);
437  *(p+1)='\0';
438 
439  if(debug)
440  {
441  gm=gmtime(&abeg);
442  b_year=gm->tm_year+1900;
443  b_month=gm->tm_mon+1;
444  b_day=gm->tm_mday;
445  b_hour=gm->tm_hour;
446  b_min=gm->tm_min;
447  b_sec=gm->tm_sec;
448 
449  gm=gmtime(&aend);
450  e_year=gm->tm_year+1900;
451  e_month=gm->tm_mon+1;
452  e_day=gm->tm_mday;
453  e_hour=gm->tm_hour;
454  e_min=gm->tm_min;
455  e_sec=gm->tm_sec;
456 
457  printf("%s %s%s%s%s%s\n"
458  "(abeg) %d = %02d/%02d/%04d %02d:%02d\n"
459  "(aend) %d = %02d/%02d/%04d %02d:%02d\n",
460  id,pe1,pe2,dur,t,s,
461  abeg,b_month,b_day,b_year,b_hour,b_min,
462  aend,e_month,e_day,e_year,e_hour,e_min);
463  }
464 
465 /* initialize data structure */
466  for(i=0;i<=999;i++)
467  stn_values[i].value = -99.;
468 
469  i=-1;
470  nval=0;
471  go=1;
472  while(go)
473  {
474  i++;
475  acur=abeg-(i*86400L);
476 
477  if(debug)
478  printf("acur =%d\n",acur);
479 
480  if(acur >= aend)
481  {
482  gm=gmtime(&acur);
483  year=gm->tm_year+1900;
484  month=gm->tm_mon+1;
485  day=gm->tm_mday;
486  gm->tm_hour=0;
487  gm->tm_min=0;
488  gm->tm_sec=0;
489 /*
490  acur00=mktime(gm)-28800L;
491  acur00=mktime(gm);
492 */
493  acur00=timegm(gm);
494  if(debug)
495  printf("acur00=%d\n",acur00);
496 
497 /*
498  if(!strncmp(dur,"H",1) && !strncmp(t,"1",1))
499 */
500  if(!strncmp(dur,"H",1))
501  {
502  if(!strncmp(t,"R",1))
503  {
504  strncpy(t,"1",1);
505  *(t+1)='\0';
506  }
507  pro=1;
508  if(debug)
509  printf("selecting from prohrly\n");
510 /*
511  * $select *
512  * into $pph
513  * from prohrly
514  * where id=$id and
515  * pe1=$pe1 and
516  * pe2=$pe2 and
517  * dur=$dur and
518  * t=$t and
519  * s=$s and
520  * e=$e and
521  * p=$p and
522  * cal_yr=$year and
523  * mon=$month and
524  * zday=$day;
525  */
526 #line 504 "get_stn_values4.ec"
527  {
528 #line 517 "get_stn_values4.ec"
529  static const char *sqlcmdtxt[] =
530 #line 517 "get_stn_values4.ec"
531  {
532 #line 517 "get_stn_values4.ec"
533  "select * from prohrly where id = ? and pe1 = ? and pe2 = ? and dur = ? and t = ? and s = ? and e = ? and p = ? and cal_yr = ? and mon = ? and zday = ?",
534  0
535  };
536 #line 517 "get_stn_values4.ec"
537 static ifx_cursor_t _SQ0 = {0};
538  static ifx_sqlvar_t _sqibind[] =
539  {
540  { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
541  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
542  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
543  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
544  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
545  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
546  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
547  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
548  { 102, sizeof(year), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
549  { 102, sizeof(month), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
550  { 102, sizeof(day), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
551 #line 517 "get_stn_values4.ec"
552  };
553  static ifx_sqlvar_t _sqobind[] =
554  {
555  { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
556  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
557  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
558  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
559  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
560  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
561  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
562  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
563  { 102, sizeof((pph).cal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
564  { 102, sizeof((pph).mon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
565  { 102, sizeof((pph).zday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
566  { 105, sizeof((pph).z00), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
567  { 105, sizeof((pph).z01), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
568  { 105, sizeof((pph).z02), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
569  { 105, sizeof((pph).z03), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
570  { 105, sizeof((pph).z04), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
571  { 105, sizeof((pph).z05), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
572  { 105, sizeof((pph).z06), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
573  { 105, sizeof((pph).z07), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
574  { 105, sizeof((pph).z08), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
575  { 105, sizeof((pph).z09), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
576  { 105, sizeof((pph).z10), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
577  { 105, sizeof((pph).z11), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
578  { 105, sizeof((pph).z12), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
579  { 105, sizeof((pph).z13), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
580  { 105, sizeof((pph).z14), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
581  { 105, sizeof((pph).z15), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
582  { 105, sizeof((pph).z16), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
583  { 105, sizeof((pph).z17), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
584  { 105, sizeof((pph).z18), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
585  { 105, sizeof((pph).z19), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
586  { 105, sizeof((pph).z20), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
587  { 105, sizeof((pph).z21), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
588  { 105, sizeof((pph).z22), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
589  { 105, sizeof((pph).z23), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
590  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
591  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
592  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
593  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
594  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
595  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
596  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
597  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
598  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
599  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
600  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
601  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
602  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
603  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
604  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
605  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
606  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
607  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
608  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
609  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
610  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
611  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
612  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
613  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
614 #line 517 "get_stn_values4.ec"
615  };
616 #line 517 "get_stn_values4.ec"
617  _sqibind[0].sqldata = id;
618 #line 517 "get_stn_values4.ec"
619  _sqibind[1].sqldata = pe1;
620 #line 517 "get_stn_values4.ec"
621  _sqibind[2].sqldata = pe2;
622 #line 517 "get_stn_values4.ec"
623  _sqibind[3].sqldata = dur;
624 #line 517 "get_stn_values4.ec"
625  _sqibind[4].sqldata = t;
626 #line 517 "get_stn_values4.ec"
627  _sqibind[5].sqldata = s;
628 #line 517 "get_stn_values4.ec"
629  _sqibind[6].sqldata = e;
630 #line 517 "get_stn_values4.ec"
631  _sqibind[7].sqldata = p;
632 #line 517 "get_stn_values4.ec"
633  _sqibind[8].sqldata = (char *) &year;
634 #line 517 "get_stn_values4.ec"
635  _sqibind[9].sqldata = (char *) &month;
636 #line 517 "get_stn_values4.ec"
637  _sqibind[10].sqldata = (char *) &day;
638 #line 517 "get_stn_values4.ec"
639  _sqobind[0].sqldata = (pph).id;
640 #line 517 "get_stn_values4.ec"
641  _sqobind[1].sqldata = (pph).pe1;
642 #line 517 "get_stn_values4.ec"
643  _sqobind[2].sqldata = (pph).pe2;
644 #line 517 "get_stn_values4.ec"
645  _sqobind[3].sqldata = (pph).dur;
646 #line 517 "get_stn_values4.ec"
647  _sqobind[4].sqldata = (pph).t;
648 #line 517 "get_stn_values4.ec"
649  _sqobind[5].sqldata = (pph).s;
650 #line 517 "get_stn_values4.ec"
651  _sqobind[6].sqldata = (pph).e;
652 #line 517 "get_stn_values4.ec"
653  _sqobind[7].sqldata = (pph).p;
654 #line 517 "get_stn_values4.ec"
655  _sqobind[8].sqldata = (char *) &(pph).cal_yr;
656 #line 517 "get_stn_values4.ec"
657  _sqobind[9].sqldata = (char *) &(pph).mon;
658 #line 517 "get_stn_values4.ec"
659  _sqobind[10].sqldata = (char *) &(pph).zday;
660 #line 517 "get_stn_values4.ec"
661  _sqobind[11].sqldata = (char *) &(pph).z00;
662 #line 517 "get_stn_values4.ec"
663  _sqobind[12].sqldata = (char *) &(pph).z01;
664 #line 517 "get_stn_values4.ec"
665  _sqobind[13].sqldata = (char *) &(pph).z02;
666 #line 517 "get_stn_values4.ec"
667  _sqobind[14].sqldata = (char *) &(pph).z03;
668 #line 517 "get_stn_values4.ec"
669  _sqobind[15].sqldata = (char *) &(pph).z04;
670 #line 517 "get_stn_values4.ec"
671  _sqobind[16].sqldata = (char *) &(pph).z05;
672 #line 517 "get_stn_values4.ec"
673  _sqobind[17].sqldata = (char *) &(pph).z06;
674 #line 517 "get_stn_values4.ec"
675  _sqobind[18].sqldata = (char *) &(pph).z07;
676 #line 517 "get_stn_values4.ec"
677  _sqobind[19].sqldata = (char *) &(pph).z08;
678 #line 517 "get_stn_values4.ec"
679  _sqobind[20].sqldata = (char *) &(pph).z09;
680 #line 517 "get_stn_values4.ec"
681  _sqobind[21].sqldata = (char *) &(pph).z10;
682 #line 517 "get_stn_values4.ec"
683  _sqobind[22].sqldata = (char *) &(pph).z11;
684 #line 517 "get_stn_values4.ec"
685  _sqobind[23].sqldata = (char *) &(pph).z12;
686 #line 517 "get_stn_values4.ec"
687  _sqobind[24].sqldata = (char *) &(pph).z13;
688 #line 517 "get_stn_values4.ec"
689  _sqobind[25].sqldata = (char *) &(pph).z14;
690 #line 517 "get_stn_values4.ec"
691  _sqobind[26].sqldata = (char *) &(pph).z15;
692 #line 517 "get_stn_values4.ec"
693  _sqobind[27].sqldata = (char *) &(pph).z16;
694 #line 517 "get_stn_values4.ec"
695  _sqobind[28].sqldata = (char *) &(pph).z17;
696 #line 517 "get_stn_values4.ec"
697  _sqobind[29].sqldata = (char *) &(pph).z18;
698 #line 517 "get_stn_values4.ec"
699  _sqobind[30].sqldata = (char *) &(pph).z19;
700 #line 517 "get_stn_values4.ec"
701  _sqobind[31].sqldata = (char *) &(pph).z20;
702 #line 517 "get_stn_values4.ec"
703  _sqobind[32].sqldata = (char *) &(pph).z21;
704 #line 517 "get_stn_values4.ec"
705  _sqobind[33].sqldata = (char *) &(pph).z22;
706 #line 517 "get_stn_values4.ec"
707  _sqobind[34].sqldata = (char *) &(pph).z23;
708 #line 517 "get_stn_values4.ec"
709  _sqobind[35].sqldata = (pph).qz00;
710 #line 517 "get_stn_values4.ec"
711  _sqobind[36].sqldata = (pph).qz01;
712 #line 517 "get_stn_values4.ec"
713  _sqobind[37].sqldata = (pph).qz02;
714 #line 517 "get_stn_values4.ec"
715  _sqobind[38].sqldata = (pph).qz03;
716 #line 517 "get_stn_values4.ec"
717  _sqobind[39].sqldata = (pph).qz04;
718 #line 517 "get_stn_values4.ec"
719  _sqobind[40].sqldata = (pph).qz05;
720 #line 517 "get_stn_values4.ec"
721  _sqobind[41].sqldata = (pph).qz06;
722 #line 517 "get_stn_values4.ec"
723  _sqobind[42].sqldata = (pph).qz07;
724 #line 517 "get_stn_values4.ec"
725  _sqobind[43].sqldata = (pph).qz08;
726 #line 517 "get_stn_values4.ec"
727  _sqobind[44].sqldata = (pph).qz09;
728 #line 517 "get_stn_values4.ec"
729  _sqobind[45].sqldata = (pph).qz10;
730 #line 517 "get_stn_values4.ec"
731  _sqobind[46].sqldata = (pph).qz11;
732 #line 517 "get_stn_values4.ec"
733  _sqobind[47].sqldata = (pph).qz12;
734 #line 517 "get_stn_values4.ec"
735  _sqobind[48].sqldata = (pph).qz13;
736 #line 517 "get_stn_values4.ec"
737  _sqobind[49].sqldata = (pph).qz14;
738 #line 517 "get_stn_values4.ec"
739  _sqobind[50].sqldata = (pph).qz15;
740 #line 517 "get_stn_values4.ec"
741  _sqobind[51].sqldata = (pph).qz16;
742 #line 517 "get_stn_values4.ec"
743  _sqobind[52].sqldata = (pph).qz17;
744 #line 517 "get_stn_values4.ec"
745  _sqobind[53].sqldata = (pph).qz18;
746 #line 517 "get_stn_values4.ec"
747  _sqobind[54].sqldata = (pph).qz19;
748 #line 517 "get_stn_values4.ec"
749  _sqobind[55].sqldata = (pph).qz20;
750 #line 517 "get_stn_values4.ec"
751  _sqobind[56].sqldata = (pph).qz21;
752 #line 517 "get_stn_values4.ec"
753  _sqobind[57].sqldata = (pph).qz22;
754 #line 517 "get_stn_values4.ec"
755  _sqobind[58].sqldata = (pph).qz23;
756 #line 517 "get_stn_values4.ec"
757  sqli_slct(ESQLINTVERSION, &_SQ0,sqlcmdtxt,11,_sqibind,59,_sqobind,0,(ifx_literal_t *)0,(ifx_namelist_t *)0,0);
758 #line 517 "get_stn_values4.ec"
759  }
760  if(!sqlca.sqlcode)
761  {
762  dr.values[0]=pph.z00;
763  dr.values[1]=pph.z01;
764  dr.values[2]=pph.z02;
765  dr.values[3]=pph.z03;
766  dr.values[4]=pph.z04;
767  dr.values[5]=pph.z05;
768  dr.values[6]=pph.z06;
769  dr.values[7]=pph.z07;
770  dr.values[8]=pph.z08;
771  dr.values[9]=pph.z09;
772  dr.values[10]=pph.z10;
773  dr.values[11]=pph.z11;
774  dr.values[12]=pph.z12;
775  dr.values[13]=pph.z13;
776  dr.values[14]=pph.z14;
777  dr.values[15]=pph.z15;
778  dr.values[16]=pph.z16;
779  dr.values[17]=pph.z17;
780  dr.values[18]=pph.z18;
781  dr.values[19]=pph.z19;
782  dr.values[20]=pph.z20;
783  dr.values[21]=pph.z21;
784  dr.values[22]=pph.z22;
785  dr.values[23]=pph.z23;
786  dr.lwals[0]=pph.qz00[0];
787  dr.lwals[1]=pph.qz01[0];
788  dr.lwals[2]=pph.qz02[0];
789  dr.lwals[3]=pph.qz03[0];
790  dr.lwals[4]=pph.qz04[0];
791  dr.lwals[5]=pph.qz05[0];
792  dr.lwals[6]=pph.qz06[0];
793  dr.lwals[7]=pph.qz07[0];
794  dr.lwals[8]=pph.qz08[0];
795  dr.lwals[9]=pph.qz09[0];
796  dr.lwals[10]=pph.qz10[0];
797  dr.lwals[11]=pph.qz11[0];
798  dr.lwals[12]=pph.qz12[0];
799  dr.lwals[13]=pph.qz13[0];
800  dr.lwals[14]=pph.qz14[0];
801  dr.lwals[15]=pph.qz15[0];
802  dr.lwals[16]=pph.qz16[0];
803  dr.lwals[17]=pph.qz17[0];
804  dr.lwals[18]=pph.qz18[0];
805  dr.lwals[19]=pph.qz19[0];
806  dr.lwals[20]=pph.qz20[0];
807  dr.lwals[21]=pph.qz21[0];
808  dr.lwals[22]=pph.qz22[0];
809  dr.lwals[23]=pph.qz23[0];
810  }
811 
812  min=0;
813  for(k=23;k>=0;k--)
814  {
815  acur=acur00+(3600L*k);
816  if(acur <= abeg && acur >= aend)
817  {
818  if(!sqlca.sqlcode)
819  {
820  stn_values[nval].value = dr.values[k];
821  stn_values[nval].qual = dr.lwals[k];
822  if(dr.values[k] >= 0.0)
823  count++;
824  }
825  else
826  {
827  stn_values[nval].value = -9999.;
828  stn_values[nval].qual='M';
829  }
830  stn_values[nval].clock=acur;
831  stn_values[nval].zdate=10000*year+100*month+day;
832  stn_values[nval].ztime=10000*k+100*min;
833  nval++;
834  }
835  }
836  }
837 
838 /*
839  if(!strncmp(dur,"Q",1) && (!strncmp(t,"1",1) || (!strncmp(t,"2",1))))
840 */
841  if(!strncmp(dur,"Q",1))
842  {
843  if(!strncmp(t,"R",1))
844  {
845  strncpy(t,"1",1);
846  *(t+1)='\0';
847  }
848  pro=1;
849  if(debug)
850  printf("selecting from proqtrly\n");
851 /*
852  * $select *
853  * into $ppq
854  * from proqtrly
855  * where id=$id and
856  * pe1=$pe1 and
857  * pe2=$pe2 and
858  * dur=$dur and
859  * t=$t and
860  * s=$s and
861  * e=$e and
862  * p=$p and
863  * cal_yr=$year and
864  * mon=$month and
865  * zday=$day;
866  */
867 #line 609 "get_stn_values4.ec"
868  {
869 #line 622 "get_stn_values4.ec"
870  static const char *sqlcmdtxt[] =
871 #line 622 "get_stn_values4.ec"
872  {
873 #line 622 "get_stn_values4.ec"
874  "select * from proqtrly where id = ? and pe1 = ? and pe2 = ? and dur = ? and t = ? and s = ? and e = ? and p = ? and cal_yr = ? and mon = ? and zday = ?",
875  0
876  };
877 #line 622 "get_stn_values4.ec"
878 static ifx_cursor_t _SQ0 = {0};
879  static ifx_sqlvar_t _sqibind[] =
880  {
881  { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
882  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
883  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
884  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
885  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
886  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
887  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
888  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
889  { 102, sizeof(year), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
890  { 102, sizeof(month), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
891  { 102, sizeof(day), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
892 #line 622 "get_stn_values4.ec"
893  };
894  static ifx_sqlvar_t _sqobind[] =
895  {
896  { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
897  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
898  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
899  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
900  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
901  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
902  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
903  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
904  { 102, sizeof((ppq).cal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
905  { 102, sizeof((ppq).mon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
906  { 102, sizeof((ppq).zday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
907  { 105, sizeof((ppq).z00), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
908  { 105, sizeof((ppq).z06), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
909  { 105, sizeof((ppq).z12), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
910  { 105, sizeof((ppq).z18), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
911  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
912  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
913  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
914  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
915 #line 622 "get_stn_values4.ec"
916  };
917 #line 622 "get_stn_values4.ec"
918  _sqibind[0].sqldata = id;
919 #line 622 "get_stn_values4.ec"
920  _sqibind[1].sqldata = pe1;
921 #line 622 "get_stn_values4.ec"
922  _sqibind[2].sqldata = pe2;
923 #line 622 "get_stn_values4.ec"
924  _sqibind[3].sqldata = dur;
925 #line 622 "get_stn_values4.ec"
926  _sqibind[4].sqldata = t;
927 #line 622 "get_stn_values4.ec"
928  _sqibind[5].sqldata = s;
929 #line 622 "get_stn_values4.ec"
930  _sqibind[6].sqldata = e;
931 #line 622 "get_stn_values4.ec"
932  _sqibind[7].sqldata = p;
933 #line 622 "get_stn_values4.ec"
934  _sqibind[8].sqldata = (char *) &year;
935 #line 622 "get_stn_values4.ec"
936  _sqibind[9].sqldata = (char *) &month;
937 #line 622 "get_stn_values4.ec"
938  _sqibind[10].sqldata = (char *) &day;
939 #line 622 "get_stn_values4.ec"
940  _sqobind[0].sqldata = (ppq).id;
941 #line 622 "get_stn_values4.ec"
942  _sqobind[1].sqldata = (ppq).pe1;
943 #line 622 "get_stn_values4.ec"
944  _sqobind[2].sqldata = (ppq).pe2;
945 #line 622 "get_stn_values4.ec"
946  _sqobind[3].sqldata = (ppq).dur;
947 #line 622 "get_stn_values4.ec"
948  _sqobind[4].sqldata = (ppq).t;
949 #line 622 "get_stn_values4.ec"
950  _sqobind[5].sqldata = (ppq).s;
951 #line 622 "get_stn_values4.ec"
952  _sqobind[6].sqldata = (ppq).e;
953 #line 622 "get_stn_values4.ec"
954  _sqobind[7].sqldata = (ppq).p;
955 #line 622 "get_stn_values4.ec"
956  _sqobind[8].sqldata = (char *) &(ppq).cal_yr;
957 #line 622 "get_stn_values4.ec"
958  _sqobind[9].sqldata = (char *) &(ppq).mon;
959 #line 622 "get_stn_values4.ec"
960  _sqobind[10].sqldata = (char *) &(ppq).zday;
961 #line 622 "get_stn_values4.ec"
962  _sqobind[11].sqldata = (char *) &(ppq).z00;
963 #line 622 "get_stn_values4.ec"
964  _sqobind[12].sqldata = (char *) &(ppq).z06;
965 #line 622 "get_stn_values4.ec"
966  _sqobind[13].sqldata = (char *) &(ppq).z12;
967 #line 622 "get_stn_values4.ec"
968  _sqobind[14].sqldata = (char *) &(ppq).z18;
969 #line 622 "get_stn_values4.ec"
970  _sqobind[15].sqldata = (ppq).qz00;
971 #line 622 "get_stn_values4.ec"
972  _sqobind[16].sqldata = (ppq).qz06;
973 #line 622 "get_stn_values4.ec"
974  _sqobind[17].sqldata = (ppq).qz12;
975 #line 622 "get_stn_values4.ec"
976  _sqobind[18].sqldata = (ppq).qz18;
977 #line 622 "get_stn_values4.ec"
978  sqli_slct(ESQLINTVERSION, &_SQ0,sqlcmdtxt,11,_sqibind,19,_sqobind,0,(ifx_literal_t *)0,(ifx_namelist_t *)0,0);
979 #line 622 "get_stn_values4.ec"
980  }
981 
982  if(!sqlca.sqlcode)
983  {
984  dr.values[0]=ppq.z00;
985  dr.values[1]=ppq.z06;
986  dr.values[2]=ppq.z12;
987  dr.values[3]=ppq.z18;
988  dr.lwals[0]=ppq.qz00[0];
989  dr.lwals[1]=ppq.qz06[0];
990  dr.lwals[2]=ppq.qz12[0];
991  dr.lwals[3]=ppq.qz18[0];
992  }
993 
994  min=0;
995  for(k=3;k>=0;k--)
996  {
997  hour=k*6;
998  acur=acur00+hour*3600L;
999  if(acur <= abeg && acur >= aend)
1000  {
1001  if(!sqlca.sqlcode)
1002  {
1003  stn_values[nval].value = dr.values[k];
1004  stn_values[nval].qual = dr.lwals[k];
1005  if(dr.values[k] >= 0.0)
1006  count++;
1007  }
1008  else
1009  {
1010  stn_values[nval].value = -9999.;
1011  stn_values[nval].qual='M';
1012  }
1013  stn_values[nval].clock=acur;
1014  stn_values[nval].zdate=10000*year+100*month+day;
1015  stn_values[nval].ztime=10000*hour+100*min;
1016 
1017  if(debug)
1018  printf("%s %d: %3.2f %c zd:%d zt:%d\n",
1019  id,nval,
1020  stn_values[nval].value,stn_values[nval].qual,
1021  stn_values[nval].zdate,stn_values[nval].ztime);
1022 
1023  nval++;
1024  }
1025  }
1026  }
1027 /*
1028  else if(!strncmp(dur,"D",1) && (!strncmp(t,"1",1) || !strncmp(t,"2",1)))
1029 */
1030  if(!strncmp(dur,"D",1))
1031  {
1032  if(!strncmp(t,"R",1))
1033  {
1034  strncpy(t,"1",1);
1035  *(t+1)='\0';
1036  }
1037  pro=1;
1038  if(debug)
1039  printf("selecting from prodly\n");
1040 /*
1041  * $select *
1042  * into $ppd
1043  * from prodly
1044  * where id=$id and
1045  * pe1=$pe1 and
1046  * pe2=$pe2 and
1047  * dur=$dur and
1048  * t=$t and
1049  * s=$s and
1050  * e=$e and
1051  * p=$p and
1052  * cal_yr=$year and
1053  * mon=$month;
1054  */
1055 #line 682 "get_stn_values4.ec"
1056  {
1057 #line 694 "get_stn_values4.ec"
1058  static const char *sqlcmdtxt[] =
1059 #line 694 "get_stn_values4.ec"
1060  {
1061 #line 694 "get_stn_values4.ec"
1062  "select * from prodly where id = ? and pe1 = ? and pe2 = ? and dur = ? and t = ? and s = ? and e = ? and p = ? and cal_yr = ? and mon = ?",
1063  0
1064  };
1065 #line 694 "get_stn_values4.ec"
1066 static ifx_cursor_t _SQ0 = {0};
1067  static ifx_sqlvar_t _sqibind[] =
1068  {
1069  { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1070  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1071  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1072  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1073  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1074  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1075  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1076  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1077  { 102, sizeof(year), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1078  { 102, sizeof(month), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1079 #line 694 "get_stn_values4.ec"
1080  };
1081  static ifx_sqlvar_t _sqobind[] =
1082  {
1083  { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1084  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1085  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1086  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1087  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1088  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1089  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1090  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1091  { 102, sizeof((ppd).cal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1092  { 102, sizeof((ppd).mon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1093  { 105, sizeof((ppd).z01), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1094  { 105, sizeof((ppd).z02), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1095  { 105, sizeof((ppd).z03), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1096  { 105, sizeof((ppd).z04), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1097  { 105, sizeof((ppd).z05), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1098  { 105, sizeof((ppd).z06), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1099  { 105, sizeof((ppd).z07), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1100  { 105, sizeof((ppd).z08), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1101  { 105, sizeof((ppd).z09), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1102  { 105, sizeof((ppd).z10), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1103  { 105, sizeof((ppd).z11), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1104  { 105, sizeof((ppd).z12), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1105  { 105, sizeof((ppd).z13), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1106  { 105, sizeof((ppd).z14), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1107  { 105, sizeof((ppd).z15), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1108  { 105, sizeof((ppd).z16), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1109  { 105, sizeof((ppd).z17), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1110  { 105, sizeof((ppd).z18), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1111  { 105, sizeof((ppd).z19), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1112  { 105, sizeof((ppd).z20), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1113  { 105, sizeof((ppd).z21), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1114  { 105, sizeof((ppd).z22), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1115  { 105, sizeof((ppd).z23), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1116  { 105, sizeof((ppd).z24), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1117  { 105, sizeof((ppd).z25), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1118  { 105, sizeof((ppd).z26), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1119  { 105, sizeof((ppd).z27), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1120  { 105, sizeof((ppd).z28), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1121  { 105, sizeof((ppd).z29), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1122  { 105, sizeof((ppd).z30), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1123  { 105, sizeof((ppd).z31), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1124  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1125  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1126  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1127  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1128  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1129  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1130  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1131  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1132  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1133  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1134  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1135  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1136  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1137  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1138  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1139  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1140  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1141  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1142  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1143  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1144  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1145  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1146  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1147  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1148  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1149  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1150  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1151  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1152  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1153  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1154  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1155 #line 694 "get_stn_values4.ec"
1156  };
1157 #line 694 "get_stn_values4.ec"
1158  _sqibind[0].sqldata = id;
1159 #line 694 "get_stn_values4.ec"
1160  _sqibind[1].sqldata = pe1;
1161 #line 694 "get_stn_values4.ec"
1162  _sqibind[2].sqldata = pe2;
1163 #line 694 "get_stn_values4.ec"
1164  _sqibind[3].sqldata = dur;
1165 #line 694 "get_stn_values4.ec"
1166  _sqibind[4].sqldata = t;
1167 #line 694 "get_stn_values4.ec"
1168  _sqibind[5].sqldata = s;
1169 #line 694 "get_stn_values4.ec"
1170  _sqibind[6].sqldata = e;
1171 #line 694 "get_stn_values4.ec"
1172  _sqibind[7].sqldata = p;
1173 #line 694 "get_stn_values4.ec"
1174  _sqibind[8].sqldata = (char *) &year;
1175 #line 694 "get_stn_values4.ec"
1176  _sqibind[9].sqldata = (char *) &month;
1177 #line 694 "get_stn_values4.ec"
1178  _sqobind[0].sqldata = (ppd).id;
1179 #line 694 "get_stn_values4.ec"
1180  _sqobind[1].sqldata = (ppd).pe1;
1181 #line 694 "get_stn_values4.ec"
1182  _sqobind[2].sqldata = (ppd).pe2;
1183 #line 694 "get_stn_values4.ec"
1184  _sqobind[3].sqldata = (ppd).dur;
1185 #line 694 "get_stn_values4.ec"
1186  _sqobind[4].sqldata = (ppd).t;
1187 #line 694 "get_stn_values4.ec"
1188  _sqobind[5].sqldata = (ppd).s;
1189 #line 694 "get_stn_values4.ec"
1190  _sqobind[6].sqldata = (ppd).e;
1191 #line 694 "get_stn_values4.ec"
1192  _sqobind[7].sqldata = (ppd).p;
1193 #line 694 "get_stn_values4.ec"
1194  _sqobind[8].sqldata = (char *) &(ppd).cal_yr;
1195 #line 694 "get_stn_values4.ec"
1196  _sqobind[9].sqldata = (char *) &(ppd).mon;
1197 #line 694 "get_stn_values4.ec"
1198  _sqobind[10].sqldata = (char *) &(ppd).z01;
1199 #line 694 "get_stn_values4.ec"
1200  _sqobind[11].sqldata = (char *) &(ppd).z02;
1201 #line 694 "get_stn_values4.ec"
1202  _sqobind[12].sqldata = (char *) &(ppd).z03;
1203 #line 694 "get_stn_values4.ec"
1204  _sqobind[13].sqldata = (char *) &(ppd).z04;
1205 #line 694 "get_stn_values4.ec"
1206  _sqobind[14].sqldata = (char *) &(ppd).z05;
1207 #line 694 "get_stn_values4.ec"
1208  _sqobind[15].sqldata = (char *) &(ppd).z06;
1209 #line 694 "get_stn_values4.ec"
1210  _sqobind[16].sqldata = (char *) &(ppd).z07;
1211 #line 694 "get_stn_values4.ec"
1212  _sqobind[17].sqldata = (char *) &(ppd).z08;
1213 #line 694 "get_stn_values4.ec"
1214  _sqobind[18].sqldata = (char *) &(ppd).z09;
1215 #line 694 "get_stn_values4.ec"
1216  _sqobind[19].sqldata = (char *) &(ppd).z10;
1217 #line 694 "get_stn_values4.ec"
1218  _sqobind[20].sqldata = (char *) &(ppd).z11;
1219 #line 694 "get_stn_values4.ec"
1220  _sqobind[21].sqldata = (char *) &(ppd).z12;
1221 #line 694 "get_stn_values4.ec"
1222  _sqobind[22].sqldata = (char *) &(ppd).z13;
1223 #line 694 "get_stn_values4.ec"
1224  _sqobind[23].sqldata = (char *) &(ppd).z14;
1225 #line 694 "get_stn_values4.ec"
1226  _sqobind[24].sqldata = (char *) &(ppd).z15;
1227 #line 694 "get_stn_values4.ec"
1228  _sqobind[25].sqldata = (char *) &(ppd).z16;
1229 #line 694 "get_stn_values4.ec"
1230  _sqobind[26].sqldata = (char *) &(ppd).z17;
1231 #line 694 "get_stn_values4.ec"
1232  _sqobind[27].sqldata = (char *) &(ppd).z18;
1233 #line 694 "get_stn_values4.ec"
1234  _sqobind[28].sqldata = (char *) &(ppd).z19;
1235 #line 694 "get_stn_values4.ec"
1236  _sqobind[29].sqldata = (char *) &(ppd).z20;
1237 #line 694 "get_stn_values4.ec"
1238  _sqobind[30].sqldata = (char *) &(ppd).z21;
1239 #line 694 "get_stn_values4.ec"
1240  _sqobind[31].sqldata = (char *) &(ppd).z22;
1241 #line 694 "get_stn_values4.ec"
1242  _sqobind[32].sqldata = (char *) &(ppd).z23;
1243 #line 694 "get_stn_values4.ec"
1244  _sqobind[33].sqldata = (char *) &(ppd).z24;
1245 #line 694 "get_stn_values4.ec"
1246  _sqobind[34].sqldata = (char *) &(ppd).z25;
1247 #line 694 "get_stn_values4.ec"
1248  _sqobind[35].sqldata = (char *) &(ppd).z26;
1249 #line 694 "get_stn_values4.ec"
1250  _sqobind[36].sqldata = (char *) &(ppd).z27;
1251 #line 694 "get_stn_values4.ec"
1252  _sqobind[37].sqldata = (char *) &(ppd).z28;
1253 #line 694 "get_stn_values4.ec"
1254  _sqobind[38].sqldata = (char *) &(ppd).z29;
1255 #line 694 "get_stn_values4.ec"
1256  _sqobind[39].sqldata = (char *) &(ppd).z30;
1257 #line 694 "get_stn_values4.ec"
1258  _sqobind[40].sqldata = (char *) &(ppd).z31;
1259 #line 694 "get_stn_values4.ec"
1260  _sqobind[41].sqldata = (ppd).qz01;
1261 #line 694 "get_stn_values4.ec"
1262  _sqobind[42].sqldata = (ppd).qz02;
1263 #line 694 "get_stn_values4.ec"
1264  _sqobind[43].sqldata = (ppd).qz03;
1265 #line 694 "get_stn_values4.ec"
1266  _sqobind[44].sqldata = (ppd).qz04;
1267 #line 694 "get_stn_values4.ec"
1268  _sqobind[45].sqldata = (ppd).qz05;
1269 #line 694 "get_stn_values4.ec"
1270  _sqobind[46].sqldata = (ppd).qz06;
1271 #line 694 "get_stn_values4.ec"
1272  _sqobind[47].sqldata = (ppd).qz07;
1273 #line 694 "get_stn_values4.ec"
1274  _sqobind[48].sqldata = (ppd).qz08;
1275 #line 694 "get_stn_values4.ec"
1276  _sqobind[49].sqldata = (ppd).qz09;
1277 #line 694 "get_stn_values4.ec"
1278  _sqobind[50].sqldata = (ppd).qz10;
1279 #line 694 "get_stn_values4.ec"
1280  _sqobind[51].sqldata = (ppd).qz11;
1281 #line 694 "get_stn_values4.ec"
1282  _sqobind[52].sqldata = (ppd).qz12;
1283 #line 694 "get_stn_values4.ec"
1284  _sqobind[53].sqldata = (ppd).qz13;
1285 #line 694 "get_stn_values4.ec"
1286  _sqobind[54].sqldata = (ppd).qz14;
1287 #line 694 "get_stn_values4.ec"
1288  _sqobind[55].sqldata = (ppd).qz15;
1289 #line 694 "get_stn_values4.ec"
1290  _sqobind[56].sqldata = (ppd).qz16;
1291 #line 694 "get_stn_values4.ec"
1292  _sqobind[57].sqldata = (ppd).qz17;
1293 #line 694 "get_stn_values4.ec"
1294  _sqobind[58].sqldata = (ppd).qz18;
1295 #line 694 "get_stn_values4.ec"
1296  _sqobind[59].sqldata = (ppd).qz19;
1297 #line 694 "get_stn_values4.ec"
1298  _sqobind[60].sqldata = (ppd).qz20;
1299 #line 694 "get_stn_values4.ec"
1300  _sqobind[61].sqldata = (ppd).qz21;
1301 #line 694 "get_stn_values4.ec"
1302  _sqobind[62].sqldata = (ppd).qz22;
1303 #line 694 "get_stn_values4.ec"
1304  _sqobind[63].sqldata = (ppd).qz23;
1305 #line 694 "get_stn_values4.ec"
1306  _sqobind[64].sqldata = (ppd).qz24;
1307 #line 694 "get_stn_values4.ec"
1308  _sqobind[65].sqldata = (ppd).qz25;
1309 #line 694 "get_stn_values4.ec"
1310  _sqobind[66].sqldata = (ppd).qz26;
1311 #line 694 "get_stn_values4.ec"
1312  _sqobind[67].sqldata = (ppd).qz27;
1313 #line 694 "get_stn_values4.ec"
1314  _sqobind[68].sqldata = (ppd).qz28;
1315 #line 694 "get_stn_values4.ec"
1316  _sqobind[69].sqldata = (ppd).qz29;
1317 #line 694 "get_stn_values4.ec"
1318  _sqobind[70].sqldata = (ppd).qz30;
1319 #line 694 "get_stn_values4.ec"
1320  _sqobind[71].sqldata = (ppd).qz31;
1321 #line 694 "get_stn_values4.ec"
1322  sqli_slct(ESQLINTVERSION, &_SQ0,sqlcmdtxt,10,_sqibind,72,_sqobind,0,(ifx_literal_t *)0,(ifx_namelist_t *)0,0);
1323 #line 694 "get_stn_values4.ec"
1324  }
1325  if(!sqlca.sqlcode)
1326  {
1327  dr.values[1]=ppd.z01;
1328  dr.values[2]=ppd.z02;
1329  dr.values[3]=ppd.z03;
1330  dr.values[4]=ppd.z04;
1331  dr.values[5]=ppd.z05;
1332  dr.values[6]=ppd.z06;
1333  dr.values[7]=ppd.z07;
1334  dr.values[8]=ppd.z08;
1335  dr.values[9]=ppd.z09;
1336  dr.values[10]=ppd.z10;
1337  dr.values[11]=ppd.z11;
1338  dr.values[12]=ppd.z12;
1339  dr.values[13]=ppd.z13;
1340  dr.values[14]=ppd.z14;
1341  dr.values[15]=ppd.z15;
1342  dr.values[16]=ppd.z16;
1343  dr.values[17]=ppd.z17;
1344  dr.values[18]=ppd.z18;
1345  dr.values[19]=ppd.z19;
1346  dr.values[20]=ppd.z20;
1347  dr.values[21]=ppd.z21;
1348  dr.values[22]=ppd.z22;
1349  dr.values[23]=ppd.z23;
1350  dr.values[24]=ppd.z24;
1351  dr.values[25]=ppd.z25;
1352  dr.values[26]=ppd.z26;
1353  dr.values[27]=ppd.z27;
1354  dr.values[28]=ppd.z28;
1355  dr.values[29]=ppd.z29;
1356  dr.values[30]=ppd.z30;
1357  dr.values[31]=ppd.z31;
1358  dr.lwals[1]=ppd.qz01[0];
1359  dr.lwals[2]=ppd.qz02[0];
1360  dr.lwals[3]=ppd.qz03[0];
1361  dr.lwals[4]=ppd.qz04[0];
1362  dr.lwals[5]=ppd.qz05[0];
1363  dr.lwals[6]=ppd.qz06[0];
1364  dr.lwals[7]=ppd.qz07[0];
1365  dr.lwals[8]=ppd.qz08[0];
1366  dr.lwals[9]=ppd.qz09[0];
1367  dr.lwals[10]=ppd.qz10[0];
1368  dr.lwals[11]=ppd.qz11[0];
1369  dr.lwals[12]=ppd.qz12[0];
1370  dr.lwals[13]=ppd.qz13[0];
1371  dr.lwals[14]=ppd.qz14[0];
1372  dr.lwals[15]=ppd.qz15[0];
1373  dr.lwals[16]=ppd.qz16[0];
1374  dr.lwals[17]=ppd.qz17[0];
1375  dr.lwals[18]=ppd.qz18[0];
1376  dr.lwals[19]=ppd.qz19[0];
1377  dr.lwals[20]=ppd.qz20[0];
1378  dr.lwals[21]=ppd.qz21[0];
1379  dr.lwals[22]=ppd.qz22[0];
1380  dr.lwals[23]=ppd.qz23[0];
1381  dr.lwals[24]=ppd.qz24[0];
1382  dr.lwals[25]=ppd.qz25[0];
1383  dr.lwals[26]=ppd.qz26[0];
1384  dr.lwals[27]=ppd.qz27[0];
1385  dr.lwals[28]=ppd.qz28[0];
1386  dr.lwals[29]=ppd.qz29[0];
1387  dr.lwals[30]=ppd.qz30[0];
1388  dr.lwals[31]=ppd.qz31[0];
1389 
1390  hour=12;
1391  min=0;
1392  for(k=day;k>=1;k--)
1393  {
1394  acur=acur00+(3600L*hour)-(86400L*i);
1395  if(acur <= abeg && acur >= aend)
1396  {
1397  if(dr.values[k] >= 0.0)
1398  {
1399  stn_values[nval].value = dr.values[k];
1400  stn_values[nval].qual = dr.lwals[k];
1401  count++;
1402  }
1403  else
1404  {
1405  stn_values[nval].value = -9999.;
1406  stn_values[nval].qual='M';
1407  }
1408  stn_values[nval].clock=acur;
1409  stn_values[nval].zdate=10000*year+100*month+k;
1410  stn_values[nval].ztime=10000*hour+100*min;
1411  nval++;
1412  }
1413  if(k>1) i++;
1414  }
1415  }
1416  }
1417 /*
1418 else
1419 */
1420  if(!pro)
1421  {
1422 /*
1423  * $select beg_cal_yr into $beg_cal_yr from tbl_yr where tbl_nam="rawval96";
1424  */
1425 #line 792 "get_stn_values4.ec"
1426  {
1427 #line 792 "get_stn_values4.ec"
1428  static const char *sqlcmdtxt[] =
1429 #line 792 "get_stn_values4.ec"
1430  {
1431 #line 792 "get_stn_values4.ec"
1432  "select beg_cal_yr from tbl_yr where tbl_nam = \"rawval96\"",
1433  0
1434  };
1435 #line 792 "get_stn_values4.ec"
1436 static ifx_cursor_t _SQ0 = {0};
1437  static ifx_sqlvar_t _sqobind[] =
1438  {
1439  { 102, sizeof(beg_cal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1440 #line 792 "get_stn_values4.ec"
1441  };
1442 #line 792 "get_stn_values4.ec"
1443  _sqobind[0].sqldata = (char *) &beg_cal_yr;
1444 #line 792 "get_stn_values4.ec"
1445  sqli_slct(ESQLINTVERSION, &_SQ0,sqlcmdtxt,0,(ifx_sqlvar_t *)0,1,_sqobind,0,(ifx_literal_t *)0,(ifx_namelist_t *)0,0);
1446 #line 792 "get_stn_values4.ec"
1447  }
1448  if(sqlca.sqlcode)
1449  beg_cal_yr=b_year;
1450 
1451  if(year >= beg_cal_yr)
1452  {
1453  strcpy(rval96_yr,"rawval96");
1454  *(rval96_yr+8)='\0';
1455  }
1456  else
1457  {
1458  sprintf(rval96_yr,"rval96_%02d",year%100);
1459  *(rval96_yr+9)='\0';
1460  }
1461 
1462  sprintf(query,"select * from %s "
1463  "where id=\"%s\" and pe1=\"%s\" and pe2=\"%s\" and "
1464  "dur=\"%s\" and t=\"%s\" and s=\"%s\" and e=\"%s\" and p=\"%s\" and "
1465  "cal_yr=%d and mon=%d and zday=%d",
1466  rval96_yr,id,pe1,pe2,dur,t,s,e,p,year,month,day);
1467  if(debug)
1468  printf("%s\n",query);
1469 /*
1470  * $prepare qrval96 from $query;
1471  */
1472 #line 814 "get_stn_values4.ec"
1473  {
1474 #line 814 "get_stn_values4.ec"
1475  sqli_prep(ESQLINTVERSION, _Cn1, query,(ifx_literal_t *)0, (ifx_namelist_t *)0, -1, 0, 0 );
1476 #line 814 "get_stn_values4.ec"
1477  }
1478  if(sqlca.sqlcode)
1479  printf("prepare error (%d) in values_search96\n<%s>\n",sqlca.sqlcode,query);
1480  else
1481 /*
1482  * $execute qrval96 into $rec96;
1483  */
1484 #line 818 "get_stn_values4.ec"
1485  {
1486 #line 818 "get_stn_values4.ec"
1487  static ifx_sqlvar_t _sqobind[] =
1488  {
1489  { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1490  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1491  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1492  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1493  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1494  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1495  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1496  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1497  { 102, sizeof((rec96).cal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1498  { 102, sizeof((rec96).mon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1499  { 102, sizeof((rec96).zday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1500  { 105, sizeof((rec96).z0000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1501  { 105, sizeof((rec96).z0015), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1502  { 105, sizeof((rec96).z0030), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1503  { 105, sizeof((rec96).z0045), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1504  { 105, sizeof((rec96).z0100), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1505  { 105, sizeof((rec96).z0115), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1506  { 105, sizeof((rec96).z0130), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1507  { 105, sizeof((rec96).z0145), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1508  { 105, sizeof((rec96).z0200), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1509  { 105, sizeof((rec96).z0215), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1510  { 105, sizeof((rec96).z0230), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1511  { 105, sizeof((rec96).z0245), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1512  { 105, sizeof((rec96).z0300), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1513  { 105, sizeof((rec96).z0315), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1514  { 105, sizeof((rec96).z0330), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1515  { 105, sizeof((rec96).z0345), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1516  { 105, sizeof((rec96).z0400), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1517  { 105, sizeof((rec96).z0415), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1518  { 105, sizeof((rec96).z0430), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1519  { 105, sizeof((rec96).z0445), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1520  { 105, sizeof((rec96).z0500), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1521  { 105, sizeof((rec96).z0515), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1522  { 105, sizeof((rec96).z0530), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1523  { 105, sizeof((rec96).z0545), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1524  { 105, sizeof((rec96).z0600), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1525  { 105, sizeof((rec96).z0615), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1526  { 105, sizeof((rec96).z0630), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1527  { 105, sizeof((rec96).z0645), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1528  { 105, sizeof((rec96).z0700), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1529  { 105, sizeof((rec96).z0715), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1530  { 105, sizeof((rec96).z0730), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1531  { 105, sizeof((rec96).z0745), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1532  { 105, sizeof((rec96).z0800), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1533  { 105, sizeof((rec96).z0815), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1534  { 105, sizeof((rec96).z0830), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1535  { 105, sizeof((rec96).z0845), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1536  { 105, sizeof((rec96).z0900), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1537  { 105, sizeof((rec96).z0915), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1538  { 105, sizeof((rec96).z0930), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1539  { 105, sizeof((rec96).z0945), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1540  { 105, sizeof((rec96).z1000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1541  { 105, sizeof((rec96).z1015), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1542  { 105, sizeof((rec96).z1030), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1543  { 105, sizeof((rec96).z1045), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1544  { 105, sizeof((rec96).z1100), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1545  { 105, sizeof((rec96).z1115), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1546  { 105, sizeof((rec96).z1130), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1547  { 105, sizeof((rec96).z1145), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1548  { 105, sizeof((rec96).z1200), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1549  { 105, sizeof((rec96).z1215), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1550  { 105, sizeof((rec96).z1230), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1551  { 105, sizeof((rec96).z1245), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1552  { 105, sizeof((rec96).z1300), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1553  { 105, sizeof((rec96).z1315), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1554  { 105, sizeof((rec96).z1330), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1555  { 105, sizeof((rec96).z1345), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1556  { 105, sizeof((rec96).z1400), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1557  { 105, sizeof((rec96).z1415), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1558  { 105, sizeof((rec96).z1430), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1559  { 105, sizeof((rec96).z1445), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1560  { 105, sizeof((rec96).z1500), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1561  { 105, sizeof((rec96).z1515), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1562  { 105, sizeof((rec96).z1530), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1563  { 105, sizeof((rec96).z1545), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1564  { 105, sizeof((rec96).z1600), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1565  { 105, sizeof((rec96).z1615), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1566  { 105, sizeof((rec96).z1630), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1567  { 105, sizeof((rec96).z1645), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1568  { 105, sizeof((rec96).z1700), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1569  { 105, sizeof((rec96).z1715), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1570  { 105, sizeof((rec96).z1730), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1571  { 105, sizeof((rec96).z1745), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1572  { 105, sizeof((rec96).z1800), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1573  { 105, sizeof((rec96).z1815), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1574  { 105, sizeof((rec96).z1830), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1575  { 105, sizeof((rec96).z1845), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1576  { 105, sizeof((rec96).z1900), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1577  { 105, sizeof((rec96).z1915), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1578  { 105, sizeof((rec96).z1930), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1579  { 105, sizeof((rec96).z1945), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1580  { 105, sizeof((rec96).z2000), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1581  { 105, sizeof((rec96).z2015), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1582  { 105, sizeof((rec96).z2030), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1583  { 105, sizeof((rec96).z2045), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1584  { 105, sizeof((rec96).z2100), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1585  { 105, sizeof((rec96).z2115), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1586  { 105, sizeof((rec96).z2130), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1587  { 105, sizeof((rec96).z2145), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1588  { 105, sizeof((rec96).z2200), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1589  { 105, sizeof((rec96).z2215), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1590  { 105, sizeof((rec96).z2230), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1591  { 105, sizeof((rec96).z2245), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1592  { 105, sizeof((rec96).z2300), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1593  { 105, sizeof((rec96).z2315), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1594  { 105, sizeof((rec96).z2330), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1595  { 105, sizeof((rec96).z2345), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1596  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1597  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1598  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1599  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1600  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1601  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1602  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1603  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1604  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1605  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1606  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1607  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1608  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1609  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1610  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1611  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1612  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1613  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1614  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1615  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1616  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1617  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1618  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1619  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1620  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1621  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1622  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1623  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1624  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1625  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1626  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1627  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1628  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1629  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1630  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1631  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1632  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1633  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1634  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1635  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1636  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1637  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1638  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1639  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1640  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1641  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1642  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1643  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1644  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1645  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1646  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1647  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1648  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1649  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1650  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1651  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1652  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1653  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1654  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1655  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1656  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1657  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1658  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1659  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1660  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1661  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1662  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1663  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1664  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1665  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1666  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1667  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1668  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1669  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1670  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1671  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1672  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1673  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1674  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1675  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1676  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1677  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1678  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1679  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1680  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1681  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1682  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1683  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1684  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1685  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1686  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1687  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1688  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1689  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1690  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1691  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
1692 #line 818 "get_stn_values4.ec"
1693  };
1694  static ifx_sqlda_t _SD0 = { 203, _sqobind, {0}, 203, 0 };
1695 #line 818 "get_stn_values4.ec"
1696  _sqobind[0].sqldata = (rec96).id;
1697 #line 818 "get_stn_values4.ec"
1698  _sqobind[1].sqldata = (rec96).pe1;
1699 #line 818 "get_stn_values4.ec"
1700  _sqobind[2].sqldata = (rec96).pe2;
1701 #line 818 "get_stn_values4.ec"
1702  _sqobind[3].sqldata = (rec96).dur;
1703 #line 818 "get_stn_values4.ec"
1704  _sqobind[4].sqldata = (rec96).t;
1705 #line 818 "get_stn_values4.ec"
1706  _sqobind[5].sqldata = (rec96).s;
1707 #line 818 "get_stn_values4.ec"
1708  _sqobind[6].sqldata = (rec96).e;
1709 #line 818 "get_stn_values4.ec"
1710  _sqobind[7].sqldata = (rec96).p;
1711 #line 818 "get_stn_values4.ec"
1712  _sqobind[8].sqldata = (char *) &(rec96).cal_yr;
1713 #line 818 "get_stn_values4.ec"
1714  _sqobind[9].sqldata = (char *) &(rec96).mon;
1715 #line 818 "get_stn_values4.ec"
1716  _sqobind[10].sqldata = (char *) &(rec96).zday;
1717 #line 818 "get_stn_values4.ec"
1718  _sqobind[11].sqldata = (char *) &(rec96).z0000;
1719 #line 818 "get_stn_values4.ec"
1720  _sqobind[12].sqldata = (char *) &(rec96).z0015;
1721 #line 818 "get_stn_values4.ec"
1722  _sqobind[13].sqldata = (char *) &(rec96).z0030;
1723 #line 818 "get_stn_values4.ec"
1724  _sqobind[14].sqldata = (char *) &(rec96).z0045;
1725 #line 818 "get_stn_values4.ec"
1726  _sqobind[15].sqldata = (char *) &(rec96).z0100;
1727 #line 818 "get_stn_values4.ec"
1728  _sqobind[16].sqldata = (char *) &(rec96).z0115;
1729 #line 818 "get_stn_values4.ec"
1730  _sqobind[17].sqldata = (char *) &(rec96).z0130;
1731 #line 818 "get_stn_values4.ec"
1732  _sqobind[18].sqldata = (char *) &(rec96).z0145;
1733 #line 818 "get_stn_values4.ec"
1734  _sqobind[19].sqldata = (char *) &(rec96).z0200;
1735 #line 818 "get_stn_values4.ec"
1736  _sqobind[20].sqldata = (char *) &(rec96).z0215;
1737 #line 818 "get_stn_values4.ec"
1738  _sqobind[21].sqldata = (char *) &(rec96).z0230;
1739 #line 818 "get_stn_values4.ec"
1740  _sqobind[22].sqldata = (char *) &(rec96).z0245;
1741 #line 818 "get_stn_values4.ec"
1742  _sqobind[23].sqldata = (char *) &(rec96).z0300;
1743 #line 818 "get_stn_values4.ec"
1744  _sqobind[24].sqldata = (char *) &(rec96).z0315;
1745 #line 818 "get_stn_values4.ec"
1746  _sqobind[25].sqldata = (char *) &(rec96).z0330;
1747 #line 818 "get_stn_values4.ec"
1748  _sqobind[26].sqldata = (char *) &(rec96).z0345;
1749 #line 818 "get_stn_values4.ec"
1750  _sqobind[27].sqldata = (char *) &(rec96).z0400;
1751 #line 818 "get_stn_values4.ec"
1752  _sqobind[28].sqldata = (char *) &(rec96).z0415;
1753 #line 818 "get_stn_values4.ec"
1754  _sqobind[29].sqldata = (char *) &(rec96).z0430;
1755 #line 818 "get_stn_values4.ec"
1756  _sqobind[30].sqldata = (char *) &(rec96).z0445;
1757 #line 818 "get_stn_values4.ec"
1758  _sqobind[31].sqldata = (char *) &(rec96).z0500;
1759 #line 818 "get_stn_values4.ec"
1760  _sqobind[32].sqldata = (char *) &(rec96).z0515;
1761 #line 818 "get_stn_values4.ec"
1762  _sqobind[33].sqldata = (char *) &(rec96).z0530;
1763 #line 818 "get_stn_values4.ec"
1764  _sqobind[34].sqldata = (char *) &(rec96).z0545;
1765 #line 818 "get_stn_values4.ec"
1766  _sqobind[35].sqldata = (char *) &(rec96).z0600;
1767 #line 818 "get_stn_values4.ec"
1768  _sqobind[36].sqldata = (char *) &(rec96).z0615;
1769 #line 818 "get_stn_values4.ec"
1770  _sqobind[37].sqldata = (char *) &(rec96).z0630;
1771 #line 818 "get_stn_values4.ec"
1772  _sqobind[38].sqldata = (char *) &(rec96).z0645;
1773 #line 818 "get_stn_values4.ec"
1774  _sqobind[39].sqldata = (char *) &(rec96).z0700;
1775 #line 818 "get_stn_values4.ec"
1776  _sqobind[40].sqldata = (char *) &(rec96).z0715;
1777 #line 818 "get_stn_values4.ec"
1778  _sqobind[41].sqldata = (char *) &(rec96).z0730;
1779 #line 818 "get_stn_values4.ec"
1780  _sqobind[42].sqldata = (char *) &(rec96).z0745;
1781 #line 818 "get_stn_values4.ec"
1782  _sqobind[43].sqldata = (char *) &(rec96).z0800;
1783 #line 818 "get_stn_values4.ec"
1784  _sqobind[44].sqldata = (char *) &(rec96).z0815;
1785 #line 818 "get_stn_values4.ec"
1786  _sqobind[45].sqldata = (char *) &(rec96).z0830;
1787 #line 818 "get_stn_values4.ec"
1788  _sqobind[46].sqldata = (char *) &(rec96).z0845;
1789 #line 818 "get_stn_values4.ec"
1790  _sqobind[47].sqldata = (char *) &(rec96).z0900;
1791 #line 818 "get_stn_values4.ec"
1792  _sqobind[48].sqldata = (char *) &(rec96).z0915;
1793 #line 818 "get_stn_values4.ec"
1794  _sqobind[49].sqldata = (char *) &(rec96).z0930;
1795 #line 818 "get_stn_values4.ec"
1796  _sqobind[50].sqldata = (char *) &(rec96).z0945;
1797 #line 818 "get_stn_values4.ec"
1798  _sqobind[51].sqldata = (char *) &(rec96).z1000;
1799 #line 818 "get_stn_values4.ec"
1800  _sqobind[52].sqldata = (char *) &(rec96).z1015;
1801 #line 818 "get_stn_values4.ec"
1802  _sqobind[53].sqldata = (char *) &(rec96).z1030;
1803 #line 818 "get_stn_values4.ec"
1804  _sqobind[54].sqldata = (char *) &(rec96).z1045;
1805 #line 818 "get_stn_values4.ec"
1806  _sqobind[55].sqldata = (char *) &(rec96).z1100;
1807 #line 818 "get_stn_values4.ec"
1808  _sqobind[56].sqldata = (char *) &(rec96).z1115;
1809 #line 818 "get_stn_values4.ec"
1810  _sqobind[57].sqldata = (char *) &(rec96).z1130;
1811 #line 818 "get_stn_values4.ec"
1812  _sqobind[58].sqldata = (char *) &(rec96).z1145;
1813 #line 818 "get_stn_values4.ec"
1814  _sqobind[59].sqldata = (char *) &(rec96).z1200;
1815 #line 818 "get_stn_values4.ec"
1816  _sqobind[60].sqldata = (char *) &(rec96).z1215;
1817 #line 818 "get_stn_values4.ec"
1818  _sqobind[61].sqldata = (char *) &(rec96).z1230;
1819 #line 818 "get_stn_values4.ec"
1820  _sqobind[62].sqldata = (char *) &(rec96).z1245;
1821 #line 818 "get_stn_values4.ec"
1822  _sqobind[63].sqldata = (char *) &(rec96).z1300;
1823 #line 818 "get_stn_values4.ec"
1824  _sqobind[64].sqldata = (char *) &(rec96).z1315;
1825 #line 818 "get_stn_values4.ec"
1826  _sqobind[65].sqldata = (char *) &(rec96).z1330;
1827 #line 818 "get_stn_values4.ec"
1828  _sqobind[66].sqldata = (char *) &(rec96).z1345;
1829 #line 818 "get_stn_values4.ec"
1830  _sqobind[67].sqldata = (char *) &(rec96).z1400;
1831 #line 818 "get_stn_values4.ec"
1832  _sqobind[68].sqldata = (char *) &(rec96).z1415;
1833 #line 818 "get_stn_values4.ec"
1834  _sqobind[69].sqldata = (char *) &(rec96).z1430;
1835 #line 818 "get_stn_values4.ec"
1836  _sqobind[70].sqldata = (char *) &(rec96).z1445;
1837 #line 818 "get_stn_values4.ec"
1838  _sqobind[71].sqldata = (char *) &(rec96).z1500;
1839 #line 818 "get_stn_values4.ec"
1840  _sqobind[72].sqldata = (char *) &(rec96).z1515;
1841 #line 818 "get_stn_values4.ec"
1842  _sqobind[73].sqldata = (char *) &(rec96).z1530;
1843 #line 818 "get_stn_values4.ec"
1844  _sqobind[74].sqldata = (char *) &(rec96).z1545;
1845 #line 818 "get_stn_values4.ec"
1846  _sqobind[75].sqldata = (char *) &(rec96).z1600;
1847 #line 818 "get_stn_values4.ec"
1848  _sqobind[76].sqldata = (char *) &(rec96).z1615;
1849 #line 818 "get_stn_values4.ec"
1850  _sqobind[77].sqldata = (char *) &(rec96).z1630;
1851 #line 818 "get_stn_values4.ec"
1852  _sqobind[78].sqldata = (char *) &(rec96).z1645;
1853 #line 818 "get_stn_values4.ec"
1854  _sqobind[79].sqldata = (char *) &(rec96).z1700;
1855 #line 818 "get_stn_values4.ec"
1856  _sqobind[80].sqldata = (char *) &(rec96).z1715;
1857 #line 818 "get_stn_values4.ec"
1858  _sqobind[81].sqldata = (char *) &(rec96).z1730;
1859 #line 818 "get_stn_values4.ec"
1860  _sqobind[82].sqldata = (char *) &(rec96).z1745;
1861 #line 818 "get_stn_values4.ec"
1862  _sqobind[83].sqldata = (char *) &(rec96).z1800;
1863 #line 818 "get_stn_values4.ec"
1864  _sqobind[84].sqldata = (char *) &(rec96).z1815;
1865 #line 818 "get_stn_values4.ec"
1866  _sqobind[85].sqldata = (char *) &(rec96).z1830;
1867 #line 818 "get_stn_values4.ec"
1868  _sqobind[86].sqldata = (char *) &(rec96).z1845;
1869 #line 818 "get_stn_values4.ec"
1870  _sqobind[87].sqldata = (char *) &(rec96).z1900;
1871 #line 818 "get_stn_values4.ec"
1872  _sqobind[88].sqldata = (char *) &(rec96).z1915;
1873 #line 818 "get_stn_values4.ec"
1874  _sqobind[89].sqldata = (char *) &(rec96).z1930;
1875 #line 818 "get_stn_values4.ec"
1876  _sqobind[90].sqldata = (char *) &(rec96).z1945;
1877 #line 818 "get_stn_values4.ec"
1878  _sqobind[91].sqldata = (char *) &(rec96).z2000;
1879 #line 818 "get_stn_values4.ec"
1880  _sqobind[92].sqldata = (char *) &(rec96).z2015;
1881 #line 818 "get_stn_values4.ec"
1882  _sqobind[93].sqldata = (char *) &(rec96).z2030;
1883 #line 818 "get_stn_values4.ec"
1884  _sqobind[94].sqldata = (char *) &(rec96).z2045;
1885 #line 818 "get_stn_values4.ec"
1886  _sqobind[95].sqldata = (char *) &(rec96).z2100;
1887 #line 818 "get_stn_values4.ec"
1888  _sqobind[96].sqldata = (char *) &(rec96).z2115;
1889 #line 818 "get_stn_values4.ec"
1890  _sqobind[97].sqldata = (char *) &(rec96).z2130;
1891 #line 818 "get_stn_values4.ec"
1892  _sqobind[98].sqldata = (char *) &(rec96).z2145;
1893 #line 818 "get_stn_values4.ec"
1894  _sqobind[99].sqldata = (char *) &(rec96).z2200;
1895 #line 818 "get_stn_values4.ec"
1896  _sqobind[100].sqldata = (char *) &(rec96).z2215;
1897 #line 818 "get_stn_values4.ec"
1898  _sqobind[101].sqldata = (char *) &(rec96).z2230;
1899 #line 818 "get_stn_values4.ec"
1900  _sqobind[102].sqldata = (char *) &(rec96).z2245;
1901 #line 818 "get_stn_values4.ec"
1902  _sqobind[103].sqldata = (char *) &(rec96).z2300;
1903 #line 818 "get_stn_values4.ec"
1904  _sqobind[104].sqldata = (char *) &(rec96).z2315;
1905 #line 818 "get_stn_values4.ec"
1906  _sqobind[105].sqldata = (char *) &(rec96).z2330;
1907 #line 818 "get_stn_values4.ec"
1908  _sqobind[106].sqldata = (char *) &(rec96).z2345;
1909 #line 818 "get_stn_values4.ec"
1910  _sqobind[107].sqldata = (rec96).qz0000;
1911 #line 818 "get_stn_values4.ec"
1912  _sqobind[108].sqldata = (rec96).qz0015;
1913 #line 818 "get_stn_values4.ec"
1914  _sqobind[109].sqldata = (rec96).qz0030;
1915 #line 818 "get_stn_values4.ec"
1916  _sqobind[110].sqldata = (rec96).qz0045;
1917 #line 818 "get_stn_values4.ec"
1918  _sqobind[111].sqldata = (rec96).qz0100;
1919 #line 818 "get_stn_values4.ec"
1920  _sqobind[112].sqldata = (rec96).qz0115;
1921 #line 818 "get_stn_values4.ec"
1922  _sqobind[113].sqldata = (rec96).qz0130;
1923 #line 818 "get_stn_values4.ec"
1924  _sqobind[114].sqldata = (rec96).qz0145;
1925 #line 818 "get_stn_values4.ec"
1926  _sqobind[115].sqldata = (rec96).qz0200;
1927 #line 818 "get_stn_values4.ec"
1928  _sqobind[116].sqldata = (rec96).qz0215;
1929 #line 818 "get_stn_values4.ec"
1930  _sqobind[117].sqldata = (rec96).qz0230;
1931 #line 818 "get_stn_values4.ec"
1932  _sqobind[118].sqldata = (rec96).qz0245;
1933 #line 818 "get_stn_values4.ec"
1934  _sqobind[119].sqldata = (rec96).qz0300;
1935 #line 818 "get_stn_values4.ec"
1936  _sqobind[120].sqldata = (rec96).qz0315;
1937 #line 818 "get_stn_values4.ec"
1938  _sqobind[121].sqldata = (rec96).qz0330;
1939 #line 818 "get_stn_values4.ec"
1940  _sqobind[122].sqldata = (rec96).qz0345;
1941 #line 818 "get_stn_values4.ec"
1942  _sqobind[123].sqldata = (rec96).qz0400;
1943 #line 818 "get_stn_values4.ec"
1944  _sqobind[124].sqldata = (rec96).qz0415;
1945 #line 818 "get_stn_values4.ec"
1946  _sqobind[125].sqldata = (rec96).qz0430;
1947 #line 818 "get_stn_values4.ec"
1948  _sqobind[126].sqldata = (rec96).qz0445;
1949 #line 818 "get_stn_values4.ec"
1950  _sqobind[127].sqldata = (rec96).qz0500;
1951 #line 818 "get_stn_values4.ec"
1952  _sqobind[128].sqldata = (rec96).qz0515;
1953 #line 818 "get_stn_values4.ec"
1954  _sqobind[129].sqldata = (rec96).qz0530;
1955 #line 818 "get_stn_values4.ec"
1956  _sqobind[130].sqldata = (rec96).qz0545;
1957 #line 818 "get_stn_values4.ec"
1958  _sqobind[131].sqldata = (rec96).qz0600;
1959 #line 818 "get_stn_values4.ec"
1960  _sqobind[132].sqldata = (rec96).qz0615;
1961 #line 818 "get_stn_values4.ec"
1962  _sqobind[133].sqldata = (rec96).qz0630;
1963 #line 818 "get_stn_values4.ec"
1964  _sqobind[134].sqldata = (rec96).qz0645;
1965 #line 818 "get_stn_values4.ec"
1966  _sqobind[135].sqldata = (rec96).qz0700;
1967 #line 818 "get_stn_values4.ec"
1968  _sqobind[136].sqldata = (rec96).qz0715;
1969 #line 818 "get_stn_values4.ec"
1970  _sqobind[137].sqldata = (rec96).qz0730;
1971 #line 818 "get_stn_values4.ec"
1972  _sqobind[138].sqldata = (rec96).qz0745;
1973 #line 818 "get_stn_values4.ec"
1974  _sqobind[139].sqldata = (rec96).qz0800;
1975 #line 818 "get_stn_values4.ec"
1976  _sqobind[140].sqldata = (rec96).qz0815;
1977 #line 818 "get_stn_values4.ec"
1978  _sqobind[141].sqldata = (rec96).qz0830;
1979 #line 818 "get_stn_values4.ec"
1980  _sqobind[142].sqldata = (rec96).qz0845;
1981 #line 818 "get_stn_values4.ec"
1982  _sqobind[143].sqldata = (rec96).qz0900;
1983 #line 818 "get_stn_values4.ec"
1984  _sqobind[144].sqldata = (rec96).qz0915;
1985 #line 818 "get_stn_values4.ec"
1986  _sqobind[145].sqldata = (rec96).qz0930;
1987 #line 818 "get_stn_values4.ec"
1988  _sqobind[146].sqldata = (rec96).qz0945;
1989 #line 818 "get_stn_values4.ec"
1990  _sqobind[147].sqldata = (rec96).qz1000;
1991 #line 818 "get_stn_values4.ec"
1992  _sqobind[148].sqldata = (rec96).qz1015;
1993 #line 818 "get_stn_values4.ec"
1994  _sqobind[149].sqldata = (rec96).qz1030;
1995 #line 818 "get_stn_values4.ec"
1996  _sqobind[150].sqldata = (rec96).qz1045;
1997 #line 818 "get_stn_values4.ec"
1998  _sqobind[151].sqldata = (rec96).qz1100;
1999 #line 818 "get_stn_values4.ec"
2000  _sqobind[152].sqldata = (rec96).qz1115;
2001 #line 818 "get_stn_values4.ec"
2002  _sqobind[153].sqldata = (rec96).qz1130;
2003 #line 818 "get_stn_values4.ec"
2004  _sqobind[154].sqldata = (rec96).qz1145;
2005 #line 818 "get_stn_values4.ec"
2006  _sqobind[155].sqldata = (rec96).qz1200;
2007 #line 818 "get_stn_values4.ec"
2008  _sqobind[156].sqldata = (rec96).qz1215;
2009 #line 818 "get_stn_values4.ec"
2010  _sqobind[157].sqldata = (rec96).qz1230;
2011 #line 818 "get_stn_values4.ec"
2012  _sqobind[158].sqldata = (rec96).qz1245;
2013 #line 818 "get_stn_values4.ec"
2014  _sqobind[159].sqldata = (rec96).qz1300;
2015 #line 818 "get_stn_values4.ec"
2016  _sqobind[160].sqldata = (rec96).qz1315;
2017 #line 818 "get_stn_values4.ec"
2018  _sqobind[161].sqldata = (rec96).qz1330;
2019 #line 818 "get_stn_values4.ec"
2020  _sqobind[162].sqldata = (rec96).qz1345;
2021 #line 818 "get_stn_values4.ec"
2022  _sqobind[163].sqldata = (rec96).qz1400;
2023 #line 818 "get_stn_values4.ec"
2024  _sqobind[164].sqldata = (rec96).qz1415;
2025 #line 818 "get_stn_values4.ec"
2026  _sqobind[165].sqldata = (rec96).qz1430;
2027 #line 818 "get_stn_values4.ec"
2028  _sqobind[166].sqldata = (rec96).qz1445;
2029 #line 818 "get_stn_values4.ec"
2030  _sqobind[167].sqldata = (rec96).qz1500;
2031 #line 818 "get_stn_values4.ec"
2032  _sqobind[168].sqldata = (rec96).qz1515;
2033 #line 818 "get_stn_values4.ec"
2034  _sqobind[169].sqldata = (rec96).qz1530;
2035 #line 818 "get_stn_values4.ec"
2036  _sqobind[170].sqldata = (rec96).qz1545;
2037 #line 818 "get_stn_values4.ec"
2038  _sqobind[171].sqldata = (rec96).qz1600;
2039 #line 818 "get_stn_values4.ec"
2040  _sqobind[172].sqldata = (rec96).qz1615;
2041 #line 818 "get_stn_values4.ec"
2042  _sqobind[173].sqldata = (rec96).qz1630;
2043 #line 818 "get_stn_values4.ec"
2044  _sqobind[174].sqldata = (rec96).qz1645;
2045 #line 818 "get_stn_values4.ec"
2046  _sqobind[175].sqldata = (rec96).qz1700;
2047 #line 818 "get_stn_values4.ec"
2048  _sqobind[176].sqldata = (rec96).qz1715;
2049 #line 818 "get_stn_values4.ec"
2050  _sqobind[177].sqldata = (rec96).qz1730;
2051 #line 818 "get_stn_values4.ec"
2052  _sqobind[178].sqldata = (rec96).qz1745;
2053 #line 818 "get_stn_values4.ec"
2054  _sqobind[179].sqldata = (rec96).qz1800;
2055 #line 818 "get_stn_values4.ec"
2056  _sqobind[180].sqldata = (rec96).qz1815;
2057 #line 818 "get_stn_values4.ec"
2058  _sqobind[181].sqldata = (rec96).qz1830;
2059 #line 818 "get_stn_values4.ec"
2060  _sqobind[182].sqldata = (rec96).qz1845;
2061 #line 818 "get_stn_values4.ec"
2062  _sqobind[183].sqldata = (rec96).qz1900;
2063 #line 818 "get_stn_values4.ec"
2064  _sqobind[184].sqldata = (rec96).qz1915;
2065 #line 818 "get_stn_values4.ec"
2066  _sqobind[185].sqldata = (rec96).qz1930;
2067 #line 818 "get_stn_values4.ec"
2068  _sqobind[186].sqldata = (rec96).qz1945;
2069 #line 818 "get_stn_values4.ec"
2070  _sqobind[187].sqldata = (rec96).qz2000;
2071 #line 818 "get_stn_values4.ec"
2072  _sqobind[188].sqldata = (rec96).qz2015;
2073 #line 818 "get_stn_values4.ec"
2074  _sqobind[189].sqldata = (rec96).qz2030;
2075 #line 818 "get_stn_values4.ec"
2076  _sqobind[190].sqldata = (rec96).qz2045;
2077 #line 818 "get_stn_values4.ec"
2078  _sqobind[191].sqldata = (rec96).qz2100;
2079 #line 818 "get_stn_values4.ec"
2080  _sqobind[192].sqldata = (rec96).qz2115;
2081 #line 818 "get_stn_values4.ec"
2082  _sqobind[193].sqldata = (rec96).qz2130;
2083 #line 818 "get_stn_values4.ec"
2084  _sqobind[194].sqldata = (rec96).qz2145;
2085 #line 818 "get_stn_values4.ec"
2086  _sqobind[195].sqldata = (rec96).qz2200;
2087 #line 818 "get_stn_values4.ec"
2088  _sqobind[196].sqldata = (rec96).qz2215;
2089 #line 818 "get_stn_values4.ec"
2090  _sqobind[197].sqldata = (rec96).qz2230;
2091 #line 818 "get_stn_values4.ec"
2092  _sqobind[198].sqldata = (rec96).qz2245;
2093 #line 818 "get_stn_values4.ec"
2094  _sqobind[199].sqldata = (rec96).qz2300;
2095 #line 818 "get_stn_values4.ec"
2096  _sqobind[200].sqldata = (rec96).qz2315;
2097 #line 818 "get_stn_values4.ec"
2098  _sqobind[201].sqldata = (rec96).qz2330;
2099 #line 818 "get_stn_values4.ec"
2100  _sqobind[202].sqldata = (rec96).qz2345;
2101  sqli_exec(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, _Cn1, 769), (ifx_sqlda_t *)0, (char *)0, (struct value *)0, &_SD0, (char *)0, (struct value *)0, 0);
2102 #line 818 "get_stn_values4.ec"
2103  }
2104 
2105 /*
2106  $select *
2107  into $rec96
2108  from rawval96
2109  where id=$id and
2110  pe1=$pe1 and
2111  pe2=$pe2 and
2112  dur=$dur and
2113  t=$t and
2114  s=$s and
2115  e=$e and
2116  p=$p and
2117  cal_yr=$year and
2118  mon=$month and
2119  zday=$day;
2120 */
2121 
2122  if(!sqlca.sqlcode)
2123  {
2124  dr.values[0] = rec96.z0000;
2125  dr.values[1] = rec96.z0015;
2126  dr.values[2] = rec96.z0030;
2127  dr.values[3] = rec96.z0045;
2128  dr.values[4] = rec96.z0100;
2129  dr.values[5] = rec96.z0115;
2130  dr.values[6] = rec96.z0130;
2131  dr.values[7] = rec96.z0145;
2132  dr.values[8] = rec96.z0200;
2133  dr.values[9] = rec96.z0215;
2134  dr.values[10] = rec96.z0230;
2135  dr.values[11] = rec96.z0245;
2136  dr.values[12] = rec96.z0300;
2137  dr.values[13] = rec96.z0315;
2138  dr.values[14] = rec96.z0330;
2139  dr.values[15] = rec96.z0345;
2140  dr.values[16] = rec96.z0400;
2141  dr.values[17] = rec96.z0415;
2142  dr.values[18] = rec96.z0430;
2143  dr.values[19] = rec96.z0445;
2144  dr.values[20] = rec96.z0500;
2145  dr.values[21] = rec96.z0515;
2146  dr.values[22] = rec96.z0530;
2147  dr.values[23] = rec96.z0545;
2148  dr.values[24] = rec96.z0600;
2149  dr.values[25] = rec96.z0615;
2150  dr.values[26] = rec96.z0630;
2151  dr.values[27] = rec96.z0645;
2152  dr.values[28] = rec96.z0700;
2153  dr.values[29] = rec96.z0715;
2154  dr.values[30] = rec96.z0730;
2155  dr.values[31] = rec96.z0745;
2156  dr.values[32] = rec96.z0800;
2157  dr.values[33] = rec96.z0815;
2158  dr.values[34] = rec96.z0830;
2159  dr.values[35] = rec96.z0845;
2160  dr.values[36] = rec96.z0900;
2161  dr.values[37] = rec96.z0915;
2162  dr.values[38] = rec96.z0930;
2163  dr.values[39] = rec96.z0945;
2164  dr.values[40] = rec96.z1000;
2165  dr.values[41] = rec96.z1015;
2166  dr.values[42] = rec96.z1030;
2167  dr.values[43] = rec96.z1045;
2168  dr.values[44] = rec96.z1100;
2169  dr.values[45] = rec96.z1115;
2170  dr.values[46] = rec96.z1130;
2171  dr.values[47] = rec96.z1145;
2172  dr.values[48] = rec96.z1200;
2173  dr.values[49] = rec96.z1215;
2174  dr.values[50] = rec96.z1230;
2175  dr.values[51] = rec96.z1245;
2176  dr.values[52] = rec96.z1300;
2177  dr.values[53] = rec96.z1315;
2178  dr.values[54] = rec96.z1330;
2179  dr.values[55] = rec96.z1345;
2180  dr.values[56] = rec96.z1400;
2181  dr.values[57] = rec96.z1415;
2182  dr.values[58] = rec96.z1430;
2183  dr.values[59] = rec96.z1445;
2184  dr.values[60] = rec96.z1500;
2185  dr.values[61] = rec96.z1515;
2186  dr.values[62] = rec96.z1530;
2187  dr.values[63] = rec96.z1545;
2188  dr.values[64] = rec96.z1600;
2189  dr.values[65] = rec96.z1615;
2190  dr.values[66] = rec96.z1630;
2191  dr.values[67] = rec96.z1645;
2192  dr.values[68] = rec96.z1700;
2193  dr.values[69] = rec96.z1715;
2194  dr.values[70] = rec96.z1730;
2195  dr.values[71] = rec96.z1745;
2196  dr.values[72] = rec96.z1800;
2197  dr.values[73] = rec96.z1815;
2198  dr.values[74] = rec96.z1830;
2199  dr.values[75] = rec96.z1845;
2200  dr.values[76] = rec96.z1900;
2201  dr.values[77] = rec96.z1915;
2202  dr.values[78] = rec96.z1930;
2203  dr.values[79] = rec96.z1945;
2204  dr.values[80] = rec96.z2000;
2205  dr.values[81] = rec96.z2015;
2206  dr.values[82] = rec96.z2030;
2207  dr.values[83] = rec96.z2045;
2208  dr.values[84] = rec96.z2100;
2209  dr.values[85] = rec96.z2115;
2210  dr.values[86] = rec96.z2130;
2211  dr.values[87] = rec96.z2145;
2212  dr.values[88] = rec96.z2200;
2213  dr.values[89] = rec96.z2215;
2214  dr.values[90] = rec96.z2230;
2215  dr.values[91] = rec96.z2245;
2216  dr.values[92] = rec96.z2300;
2217  dr.values[93] = rec96.z2315;
2218  dr.values[94] = rec96.z2330;
2219  dr.values[95] = rec96.z2345;
2220  dr.lwals[0] = rec96.qz0000[0];
2221  dr.lwals[1] = rec96.qz0015[0];
2222  dr.lwals[2] = rec96.qz0030[0];
2223  dr.lwals[3] = rec96.qz0045[0];
2224  dr.lwals[4] = rec96.qz0100[0];
2225  dr.lwals[5] = rec96.qz0115[0];
2226  dr.lwals[6] = rec96.qz0130[0];
2227  dr.lwals[7] = rec96.qz0145[0];
2228  dr.lwals[8] = rec96.qz0200[0];
2229  dr.lwals[9] = rec96.qz0215[0];
2230  dr.lwals[10] = rec96.qz0230[0];
2231  dr.lwals[11] = rec96.qz0245[0];
2232  dr.lwals[12] = rec96.qz0300[0];
2233  dr.lwals[13] = rec96.qz0315[0];
2234  dr.lwals[14] = rec96.qz0330[0];
2235  dr.lwals[15] = rec96.qz0345[0];
2236  dr.lwals[16] = rec96.qz0400[0];
2237  dr.lwals[17] = rec96.qz0415[0];
2238  dr.lwals[18] = rec96.qz0430[0];
2239  dr.lwals[19] = rec96.qz0445[0];
2240  dr.lwals[20] = rec96.qz0500[0];
2241  dr.lwals[21] = rec96.qz0515[0];
2242  dr.lwals[22] = rec96.qz0530[0];
2243  dr.lwals[23] = rec96.qz0545[0];
2244  dr.lwals[24] = rec96.qz0600[0];
2245  dr.lwals[25] = rec96.qz0615[0];
2246  dr.lwals[26] = rec96.qz0630[0];
2247  dr.lwals[27] = rec96.qz0645[0];
2248  dr.lwals[28] = rec96.qz0700[0];
2249  dr.lwals[29] = rec96.qz0715[0];
2250  dr.lwals[30] = rec96.qz0730[0];
2251  dr.lwals[31] = rec96.qz0745[0];
2252  dr.lwals[32] = rec96.qz0800[0];
2253  dr.lwals[33] = rec96.qz0815[0];
2254  dr.lwals[34] = rec96.qz0830[0];
2255  dr.lwals[35] = rec96.qz0845[0];
2256  dr.lwals[36] = rec96.qz0900[0];
2257  dr.lwals[37] = rec96.qz0915[0];
2258  dr.lwals[38] = rec96.qz0930[0];
2259  dr.lwals[39] = rec96.qz0945[0];
2260  dr.lwals[40] = rec96.qz1000[0];
2261  dr.lwals[41] = rec96.qz1015[0];
2262  dr.lwals[42] = rec96.qz1030[0];
2263  dr.lwals[43] = rec96.qz1045[0];
2264  dr.lwals[44] = rec96.qz1100[0];
2265  dr.lwals[45] = rec96.qz1115[0];
2266  dr.lwals[46] = rec96.qz1130[0];
2267  dr.lwals[47] = rec96.qz1145[0];
2268  dr.lwals[48] = rec96.qz1200[0];
2269  dr.lwals[49] = rec96.qz1215[0];
2270  dr.lwals[50] = rec96.qz1230[0];
2271  dr.lwals[51] = rec96.qz1245[0];
2272  dr.lwals[52] = rec96.qz1300[0];
2273  dr.lwals[53] = rec96.qz1315[0];
2274  dr.lwals[54] = rec96.qz1330[0];
2275  dr.lwals[55] = rec96.qz1345[0];
2276  dr.lwals[56] = rec96.qz1400[0];
2277  dr.lwals[57] = rec96.qz1415[0];
2278  dr.lwals[58] = rec96.qz1430[0];
2279  dr.lwals[59] = rec96.qz1445[0];
2280  dr.lwals[60] = rec96.qz1500[0];
2281  dr.lwals[61] = rec96.qz1515[0];
2282  dr.lwals[62] = rec96.qz1530[0];
2283  dr.lwals[63] = rec96.qz1545[0];
2284  dr.lwals[64] = rec96.qz1600[0];
2285  dr.lwals[65] = rec96.qz1615[0];
2286  dr.lwals[66] = rec96.qz1630[0];
2287  dr.lwals[67] = rec96.qz1645[0];
2288  dr.lwals[68] = rec96.qz1700[0];
2289  dr.lwals[69] = rec96.qz1715[0];
2290  dr.lwals[70] = rec96.qz1730[0];
2291  dr.lwals[71] = rec96.qz1745[0];
2292  dr.lwals[72] = rec96.qz1800[0];
2293  dr.lwals[73] = rec96.qz1815[0];
2294  dr.lwals[74] = rec96.qz1830[0];
2295  dr.lwals[75] = rec96.qz1845[0];
2296  dr.lwals[76] = rec96.qz1900[0];
2297  dr.lwals[77] = rec96.qz1915[0];
2298  dr.lwals[78] = rec96.qz1930[0];
2299  dr.lwals[79] = rec96.qz1945[0];
2300  dr.lwals[80] = rec96.qz2000[0];
2301  dr.lwals[81] = rec96.qz2015[0];
2302  dr.lwals[82] = rec96.qz2030[0];
2303  dr.lwals[83] = rec96.qz2045[0];
2304  dr.lwals[84] = rec96.qz2100[0];
2305  dr.lwals[85] = rec96.qz2115[0];
2306  dr.lwals[86] = rec96.qz2130[0];
2307  dr.lwals[87] = rec96.qz2145[0];
2308  dr.lwals[88] = rec96.qz2200[0];
2309  dr.lwals[89] = rec96.qz2215[0];
2310  dr.lwals[90] = rec96.qz2230[0];
2311  dr.lwals[91] = rec96.qz2245[0];
2312  dr.lwals[92] = rec96.qz2300[0];
2313  dr.lwals[93] = rec96.qz2315[0];
2314  dr.lwals[94] = rec96.qz2330[0];
2315  dr.lwals[95] = rec96.qz2345[0];
2316 
2317  for(k=95;k>=0;k--)
2318  {
2319  if(strncmp("M",dr.lwals+k,1) && dr.values[k] > -9998.)
2320  {
2321  hour=(int)((float)k/4.);
2322  min=15*(k%4);
2323  acur=acur00+(3600L*hour)+(60L*min);
2324  if(acur <= abeg && acur >= aend)
2325  {
2326  stn_values[nval].value = dr.values[k];
2327  stn_values[nval].qual = dr.lwals[k];
2328  stn_values[nval].clock=acur;
2329  stn_values[nval].zdate=10000*year+100*month+day;
2330  stn_values[nval].ztime=10000*hour+100*min;
2331  nval++;
2332  }
2333  }
2334  }
2335  count=nval;
2336  }
2337  }
2338  }
2339  else
2340  go=0;;
2341  }
2342 
2343 if(debug)
2344 {
2345  printf("%s %s%s%s%s%s: %4d obs.\n",id,pe1,pe2,dur,t,s,nval);
2346  if(nval)
2347  {
2348  printf("%s %s\n",id,shef);
2349  for(i=0;i<nval;i++)
2350  printf("%d %d %d %5.2f %c\n",
2351  stn_values[i].zdate,
2352  stn_values[i].ztime,
2353  stn_values[i].clock,
2354  stn_values[i].value,
2355  stn_values[i].qual);
2356  }
2357 }
2358 
2359 if(count)
2360  return(nval);
2361 else
2362  return(0);
2363 }
2364 
2365 
2366 #line 1079 "get_stn_values4.ec"
static int i
struct sqlca_s sqlca
int hour
Definition: display_data.c:26
int day
Definition: display_data.c:26
int year
Definition: display_data.c:26
char qual[10]
Definition: subdisplay.c:33
int month
Definition: display_data.c:26
char * mon[]
static const char _Cn1[]
int get_stn_values(char *stn_id, char *shef, time_t abeg, time_t aend, struct stn_values *stn_values)
int debug
Definition: hydro_data.h:53
sprintf(fbuf,"/usr/mapper/nexrad/ngrid.%02d-%02d-%02d-%02d", year, month, day, hour)
printf("fbuf is %s\n", fbuf)
int count[131][131]
Definition: mapp2h.h:50
int k
Definition: mapp2h.h:48
float value
double values[96]
Definition: calfma_qtrly.c:180
char lwals[96]
Definition: calfma_qtrly.c:181
char qz1900[2]
char qz1400[2]
char qz1000[2]
char qz0200[2]
char qz0700[2]
char qz0000[2]
char qz1330[2]
char qz0430[2]
char qz1845[2]
char qz2145[2]
char qz0545[2]
char qz0045[2]
char qz0645[2]
char qz2330[2]
char qz0930[2]
char qz1730[2]
char qz1800[2]
char qz0600[2]
char qz1245[2]
char qz0830[2]
char qz1500[2]
char qz1145[2]
char qz1545[2]
char qz2000[2]
char qz1130[2]
char qz0245[2]
char qz0230[2]
char qz1815[2]
char qz1345[2]
char qz1115[2]
char qz0530[2]
char qz1615[2]
char qz1215[2]
char qz1200[2]
char qz2130[2]
char qz1300[2]
char qz1600[2]
char qz0915[2]
char qz1445[2]
char qz0615[2]
char qz1515[2]
char qz2245[2]
char qz2230[2]
char qz0715[2]
char qz2215[2]
char qz0900[2]
char qz0100[2]
char qz2045[2]
char qz0730[2]
char qz0945[2]
char qz0845[2]
char qz0815[2]
char qz0745[2]
char qz1700[2]
char qz1230[2]
char qz1015[2]
char qz1830[2]
char qz2015[2]
char qz1415[2]
char qz0800[2]
char qz2300[2]
char qz2345[2]
char qz2200[2]
char qz0445[2]
char qz0500[2]
char qz1745[2]
char qz1315[2]
char qz1430[2]
char qz0630[2]
char qz1915[2]
char qz0400[2]
char qz0345[2]
char qz0315[2]
char qz2115[2]
char qz0300[2]
char qz2100[2]
char qz0115[2]
char qz1530[2]
char qz0130[2]
char qz0030[2]
char qz1045[2]
char qz0330[2]
char qz1945[2]
char qz1030[2]
char qz1100[2]
char qz1715[2]
char qz1930[2]
char qz1630[2]
char qz1645[2]
char qz2030[2]
char qz0145[2]
char qz0015[2]
char qz0215[2]
char qz0515[2]
char qz0415[2]
char qz2315[2]
long sqlcode
Definition: db.c:44
char qual
Definition: hydro_data.h:36
time_t clock
Definition: hydro_data.h:32
float value
Definition: hydro_data.h:35
struct rec96_rec rec96