Mapper
fmap_qtrly.c
Go to the documentation of this file.
1 #include <sqlhdr.h>
2 #include <sqliapi.h>
3 static const char _Cn1[] = "fmapcursor";
4 #line 1 "fmap_qtrly.ec"
5 #include "prototypes_new.h"
6 /*
7  * EXEC SQL include sqlca.h;
8  */
9 #line 2 "fmap_qtrly.ec"
10 
11 #line 2 "fmap_qtrly.ec"
12 #line 1 "/opt/informix/incl/esql/sqlca.h"
13 /****************************************************************************
14  *
15  * Licensed Material - Property Of IBM
16  *
17  * "Restricted Materials of IBM"
18  *
19  * IBM Informix Client SDK
20  * Copyright IBM Corporation 1997, 2008. All rights reserved.
21  *
22  * Title: sqlca.h
23  * Description: SQL Control Area
24  *
25  ***************************************************************************
26  */
27 
28 #ifndef SQLCA_INCL
29 #define SQLCA_INCL
30 
31 #include "ifxtypes.h"
32 
33 #ifdef __cplusplus
34 extern "C" {
35 #endif
36 
37 typedef struct sqlca_s
38  {
39  int4 sqlcode;
40 #ifdef DB2CLI
41  char sqlerrm[600]; /* error message parameters */
42 #else /* DB2CLI */
43  char sqlerrm[72]; /* error message parameters */
44 #endif /* DB2CLI */
45  char sqlerrp[8];
46  int4 sqlerrd[6];
47  /* 0 - estimated number of rows returned */
48  /* 1 - serial value after insert or ISAM error code */
49  /* 2 - number of rows processed */
50  /* 3 - estimated cost */
51  /* 4 - offset of the error into the SQL statement */
52  /* 5 - rowid after insert */
53 #ifdef _FGL_
54  char sqlawarn[8];
55 #else
56  struct sqlcaw_s
57  {
58  char sqlwarn0; /* = W if any of sqlwarn[1-7] = W */
59  char sqlwarn1; /* = W if any truncation occurred or
60  database has transactions or
61  no privileges revoked */
62  char sqlwarn2; /* = W if a null value returned or
63  ANSI database */
64  char sqlwarn3; /* = W if no. in select list != no. in into list or
65  turbo backend or no privileges granted */
66  char sqlwarn4; /* = W if no where clause on prepared update, delete or
67  incompatible float format */
68  char sqlwarn5; /* = W if non-ANSI statement */
69  char sqlwarn6; /* = W if server is in data replication secondary mode */
70  char sqlwarn7; /* = W if database locale is different from proc_locale
71  = W if backend XPS and if explain avoid_execute is set
72  (for select, insert, delete and update only)
73  */
74  } sqlwarn;
75 #endif
76  } ifx_sqlca_t;
77 
78 /* NOTE: 4gl assumes that the sqlwarn structure can be defined as
79  * sqlawarn -- an 8 character string, because single-char
80  * variables are not recognized in 4gl.
81  *
82  * If this structure should change, the code generated by 4gl compiler
83  * must also change
84  */
85 
86 #define SQLNOTFOUND 100
87 
88 #ifndef IFX_THREAD
89 #ifdef DB2CLI
90 #define sqlca ifmxsqlca
91 extern struct sqlca_s sqlca;
92 #else /* DB2CLI */
93 extern struct sqlca_s sqlca;
94 #endif /* DB2CLI */
95 
96 #ifndef DRDAHELP
97 extern int4 SQLCODE;
98 #endif
99 
100 extern char SQLSTATE[];
101 #else /* IFX_THREAD */
102 extern int4 * ifx_sqlcode(void);
103 extern struct sqlca_s * ifx_sqlca(void);
104 /* ifx_sqlstate() declared in sqlhdr.h */
105 #define SQLCODE (*(ifx_sqlcode()))
106 #define SQLSTATE ((char *)(ifx_sqlstate()))
107 #define sqlca (*(ifx_sqlca()))
108 #endif /* IFX_THREAD */
109 
110 #ifdef __cplusplus
111 }
112 #endif
113 
114 #endif /* SQLCA_INCL */
115 
116 #line 103 "/opt/informix/incl/esql/sqlca.h"
117 #line 3 "fmap_qtrly.ec"
118 
119 /*
120  * EXEC SQL BEGIN DECLARE SECTION;
121  */
122 #line 4 "fmap_qtrly.ec"
123 #line 5 "fmap_qtrly.ec"
124 int eyr, emo, edy;
125 int byr, bmo, bdy;
126 extern struct fmap_qrtly_rec
127  {
128  char id[6];
129  char drain[2];
130  char pos[2];
131  char cgroup[2];
132  char pe1[2];
133  char pe2[2];
134  char dur[2];
135  char t[2];
136  char s[2];
137  char e[2];
138  char p[2];
139  int vcal_yr;
140  int vmon;
141  int vzday;
142  int ccal_yr;
143  int cmon;
144  int czday;
145  int ctime;
146  double z00;
147  double z06;
148  double z12;
149  double z18;
150  char qz00[2];
151  char qz06[2];
152  char qz12[2];
153  char qz18[2];
154  } fmap_qtrly_rec;
155 /*
156  * EXEC SQL END DECLARE SECTION;
157  */
158 #line 40 "fmap_qtrly.ec"
159 
160 
161 extern struct data_rec {
162  char id[9];
163  char source[9];
164  char pe1;
165  char pe2;
166  char dur;
167  char t;
168  char s;
169  char e;
170  char p;
171  int zdate;
172  int ztime;
173  int czdate;
174  int cztime;
175  int idur;
176  double codp;
177  char lwal;
178  int idote;
179  int irev;
180  double value;
181  double values[96];
182  char lwals[96];
183  char pedtsep[8];
184  } data_record;
185 
186 void change_date();
187 
188 int fmap_pro_qtrly(char *hb5,char *drain,char *parm,struct stim begin_date,
189  struct stim end_date, char *qual, struct stn_values *stn_values)
190 
191 {
192 
193 int i,jtotal,k,atime;
194 int etime,btime;
195 int hour,min;
196 int zdate,hh,qlen;
197 
198 /*
199  * EXEC SQL BEGIN DECLARE SECTION;
200  */
201 #line 79 "fmap_qtrly.ec"
202 #line 80 "fmap_qtrly.ec"
203 int edate, bdate;
204 int year, month, day;
205  char sparm[10];
206 struct stat
207  {
208  char hb5[6];
209  char pe1[2];
210  char pe2[2];
211  char dur[2];
212  char t[2];
213  char s[2];
214  char e[2];
215  char p[2];
216  } stat;
217 struct vtat
218  {
219  char drain[2];
220  char pos[2];
221  char cgroup[2];
222  } vtat;
223 /*
224  * EXEC SQL END DECLARE SECTION;
225  */
226 #line 104 "fmap_qtrly.ec"
227 
228 
229 qlen=strlen(qual);
230 
231 vtat.drain[1]=0;
232 vtat.pos[1]=0;
233 vtat.cgroup[1]=0;
234 
235 vtat.drain[0]=drain[0];
236 vtat.pos[0]=drain[1];
237 vtat.cgroup[0]=drain[2];
238 
239 stat.pe1[1]=0;
240 stat.pe2[1]=0;
241 stat.dur[1]=0;
242 stat.t[1]=0;
243 stat.s[1]=0;
244 stat.e[1]=0;
245 stat.p[1]=0;
246 
247 strcpy(stat.hb5,hb5);
248 stat.pe1[0]=parm[0];
249 stat.pe2[0]=parm[1];
250 stat.dur[0]=parm[2];
251 stat.t[0]=parm[3];
252 stat.s[0]=parm[4];
253 stat.e[0]=parm[5];
254 stat.p[0]=parm[6];
255 
256 eyr=end_date.year;
257 emo=end_date.month;
258 edy=end_date.day;
259 etime=end_date.hour*10000+
260  end_date.minute*100;
261 
262 byr=begin_date.year;
263 bmo=begin_date.month;
264 bdy=begin_date.day;
265 btime=begin_date.hour*10000+
266  begin_date.minute*100;
267 
268 year=byr;
269 month=bmo;
270 day=bdy;
271 
272 jtotal=0;
273 
274 for(;;) {
275 
276 /*
277  * EXEC SQL open fmapcursor using
278  * :stat.hb5,
279  * :stat.pe1,
280  * :stat.pe2,
281  * :stat.dur,
282  * :stat.t,
283  * :stat.s,
284  * :stat.e,
285  * :stat.p,
286  * :vtat.drain,
287  * :vtat.pos,
288  * :vtat.cgroup,
289  * :year,
290  * :month,
291  * :day;
292  */
293 #line 153 "fmap_qtrly.ec"
294  {
295 #line 167 "fmap_qtrly.ec"
296  static ifx_sqlvar_t _sqibind[] =
297  {
298  { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
299  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
300  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
301  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
302  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
303  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
304  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
305  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
306  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
307  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
308  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
309  { 102, sizeof(year), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
310  { 102, sizeof(month), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
311  { 102, sizeof(day), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
312 #line 167 "fmap_qtrly.ec"
313  };
314  static ifx_sqlda_t _SD0 = { 14, _sqibind, {0}, 14, 0 };
315 #line 167 "fmap_qtrly.ec"
316  _sqibind[0].sqldata = stat.hb5;
317 #line 167 "fmap_qtrly.ec"
318  _sqibind[1].sqldata = stat.pe1;
319 #line 167 "fmap_qtrly.ec"
320  _sqibind[2].sqldata = stat.pe2;
321 #line 167 "fmap_qtrly.ec"
322  _sqibind[3].sqldata = stat.dur;
323 #line 167 "fmap_qtrly.ec"
324  _sqibind[4].sqldata = stat.t;
325 #line 167 "fmap_qtrly.ec"
326  _sqibind[5].sqldata = stat.s;
327 #line 167 "fmap_qtrly.ec"
328  _sqibind[6].sqldata = stat.e;
329 #line 167 "fmap_qtrly.ec"
330  _sqibind[7].sqldata = stat.p;
331 #line 167 "fmap_qtrly.ec"
332  _sqibind[8].sqldata = vtat.drain;
333 #line 167 "fmap_qtrly.ec"
334  _sqibind[9].sqldata = vtat.pos;
335 #line 167 "fmap_qtrly.ec"
336  _sqibind[10].sqldata = vtat.cgroup;
337 #line 167 "fmap_qtrly.ec"
338  _sqibind[11].sqldata = (char *) &year;
339 #line 167 "fmap_qtrly.ec"
340  _sqibind[12].sqldata = (char *) &month;
341 #line 167 "fmap_qtrly.ec"
342  _sqibind[13].sqldata = (char *) &day;
343  sqli_curs_open(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, _Cn1, 768), &_SD0, (char *)0, (struct value *)0, 1, 0);
344 #line 167 "fmap_qtrly.ec"
345  }
346 
347  if(sqlca.sqlcode < 0)
348  return(sqlca.sqlcode);
349 
350 
351 /*
352  * EXEC SQL fetch fmapcursor into: fmap_qtrly_rec;
353  */
354 #line 173 "fmap_qtrly.ec"
355  {
356 #line 173 "fmap_qtrly.ec"
357  static ifx_sqlvar_t _sqobind[] =
358  {
359  { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
360  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
361  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
362  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
363  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
364  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
365  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
366  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
367  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
368  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
369  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
370  { 102, sizeof((fmap_qtrly_rec).vcal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
371  { 102, sizeof((fmap_qtrly_rec).vmon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
372  { 102, sizeof((fmap_qtrly_rec).vzday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
373  { 102, sizeof((fmap_qtrly_rec).ccal_yr), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
374  { 102, sizeof((fmap_qtrly_rec).cmon), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
375  { 102, sizeof((fmap_qtrly_rec).czday), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
376  { 102, sizeof((fmap_qtrly_rec).ctime), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
377  { 105, sizeof((fmap_qtrly_rec).z00), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
378  { 105, sizeof((fmap_qtrly_rec).z06), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
379  { 105, sizeof((fmap_qtrly_rec).z12), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
380  { 105, sizeof((fmap_qtrly_rec).z18), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
381  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
382  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
383  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
384  { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
385 #line 173 "fmap_qtrly.ec"
386  };
387  static ifx_sqlda_t _SD0 = { 26, _sqobind, {0}, 26, 0 };
388  static _FetchSpec _FS1 = { 0, 1, 0 };
389 #line 173 "fmap_qtrly.ec"
390  _sqobind[0].sqldata = (fmap_qtrly_rec).id;
391 #line 173 "fmap_qtrly.ec"
392  _sqobind[1].sqldata = (fmap_qtrly_rec).drain;
393 #line 173 "fmap_qtrly.ec"
394  _sqobind[2].sqldata = (fmap_qtrly_rec).pos;
395 #line 173 "fmap_qtrly.ec"
396  _sqobind[3].sqldata = (fmap_qtrly_rec).cgroup;
397 #line 173 "fmap_qtrly.ec"
398  _sqobind[4].sqldata = (fmap_qtrly_rec).pe1;
399 #line 173 "fmap_qtrly.ec"
400  _sqobind[5].sqldata = (fmap_qtrly_rec).pe2;
401 #line 173 "fmap_qtrly.ec"
402  _sqobind[6].sqldata = (fmap_qtrly_rec).dur;
403 #line 173 "fmap_qtrly.ec"
404  _sqobind[7].sqldata = (fmap_qtrly_rec).t;
405 #line 173 "fmap_qtrly.ec"
406  _sqobind[8].sqldata = (fmap_qtrly_rec).s;
407 #line 173 "fmap_qtrly.ec"
408  _sqobind[9].sqldata = (fmap_qtrly_rec).e;
409 #line 173 "fmap_qtrly.ec"
410  _sqobind[10].sqldata = (fmap_qtrly_rec).p;
411 #line 173 "fmap_qtrly.ec"
412  _sqobind[11].sqldata = (char *) &(fmap_qtrly_rec).vcal_yr;
413 #line 173 "fmap_qtrly.ec"
414  _sqobind[12].sqldata = (char *) &(fmap_qtrly_rec).vmon;
415 #line 173 "fmap_qtrly.ec"
416  _sqobind[13].sqldata = (char *) &(fmap_qtrly_rec).vzday;
417 #line 173 "fmap_qtrly.ec"
418  _sqobind[14].sqldata = (char *) &(fmap_qtrly_rec).ccal_yr;
419 #line 173 "fmap_qtrly.ec"
420  _sqobind[15].sqldata = (char *) &(fmap_qtrly_rec).cmon;
421 #line 173 "fmap_qtrly.ec"
422  _sqobind[16].sqldata = (char *) &(fmap_qtrly_rec).czday;
423 #line 173 "fmap_qtrly.ec"
424  _sqobind[17].sqldata = (char *) &(fmap_qtrly_rec).ctime;
425 #line 173 "fmap_qtrly.ec"
426  _sqobind[18].sqldata = (char *) &(fmap_qtrly_rec).z00;
427 #line 173 "fmap_qtrly.ec"
428  _sqobind[19].sqldata = (char *) &(fmap_qtrly_rec).z06;
429 #line 173 "fmap_qtrly.ec"
430  _sqobind[20].sqldata = (char *) &(fmap_qtrly_rec).z12;
431 #line 173 "fmap_qtrly.ec"
432  _sqobind[21].sqldata = (char *) &(fmap_qtrly_rec).z18;
433 #line 173 "fmap_qtrly.ec"
434  _sqobind[22].sqldata = (fmap_qtrly_rec).qz00;
435 #line 173 "fmap_qtrly.ec"
436  _sqobind[23].sqldata = (fmap_qtrly_rec).qz06;
437 #line 173 "fmap_qtrly.ec"
438  _sqobind[24].sqldata = (fmap_qtrly_rec).qz12;
439 #line 173 "fmap_qtrly.ec"
440  _sqobind[25].sqldata = (fmap_qtrly_rec).qz18;
441  sqli_curs_fetch(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, _Cn1, 768), (ifx_sqlda_t *)0, &_SD0, (char *)0, &_FS1);
442 #line 173 "fmap_qtrly.ec"
443  }
444 
445  if(sqlca.sqlcode < 0)
446  return(sqlca.sqlcode);
447 
448  if(sqlca.sqlcode == 0) {
449 
450  get_val06_array();
451 
452  for(k=3;k>=0;k--) {
453 
454  hour=k;
455  atime=hour*60000;
456  zdate=fmap_qtrly_rec.vcal_yr*10000+fmap_qtrly_rec.vmon*100+fmap_qtrly_rec.vzday;
457 
458  if(year==eyr && month==emo && day==edy &&
459  atime < etime)
460  break;
461 
462  if(year==byr && month==bmo && day==bdy &&
463  atime > btime)
464  continue;
465 
466  if(data_record.values[k] < -98)
467  continue;
468 
469  stn_values[jtotal].value=data_record.values[k];
470  stn_values[jtotal].zdate=zdate;
471  stn_values[jtotal].qual= data_record.lwals[k];
472  stn_values[jtotal++].ztime=atime;
473 
474  }
475 
476  }
477 
478 /*
479  * EXEC SQL close fmapcursor;
480  */
481 #line 208 "fmap_qtrly.ec"
482  {
483 #line 208 "fmap_qtrly.ec"
484  sqli_curs_close(ESQLINTVERSION, sqli_curs_locate(ESQLINTVERSION, _Cn1, 768));
485 #line 208 "fmap_qtrly.ec"
486  }
487 
488 
489  if(jtotal > 9600)
490  break;
491 
492  if(year==eyr && month==emo && day==edy)
493  break;
494 
495  change_date(&year,&month,&day);
496 
497  }
498 
499 
500 return(jtotal);
501 
502 }
503 
504 int get_val06_array()
505 {
506 
507  data_record.values[0] = fmap_qtrly_rec.z00;
508  data_record.values[1] = fmap_qtrly_rec.z06;
509  data_record.values[2] = fmap_qtrly_rec.z12;
510  data_record.values[3] = fmap_qtrly_rec.z18;
511  data_record.lwals[0] = fmap_qtrly_rec.qz00[0];
512  data_record.lwals[1] = fmap_qtrly_rec.qz06[0];
513  data_record.lwals[2] = fmap_qtrly_rec.qz12[0];
514  data_record.lwals[3] = fmap_qtrly_rec.qz18[0];
515 
516  return(0);
517 }
518 
519 int mday[]={31,28,31,30,31,30,31,31,30,31,30,31} ;
520 
521 void change_date(int *year,int *month, int*day)
522 
523 {
524 
525 char buf[10];
526 XmString btn_text;
527 Arg args[10];
528 
529 if (!((*year)%4))
530  mday[1]=29;
531 else
532  mday[1]=28;
533 
534 /*
535 if ((*year)==1972 || (*year)==1976 || (*year)==1980 ||
536  (*year)==1984 || (*year)==1988 || (*year)==1992 ||
537  (*year)==1996 || (*year)==2000 || (*year)==2004 ||
538  (*year)==2008 || (*year)==2012 || (*year)==2016)
539  mday[1]=29;
540 else
541  mday[1]=28;
542 */
543 
544 (*day)--;
545 
546 if(*day <= 0) {
547 
548  (*month)--;
549  if(*month==0) {
550 
551  (*year)--;
552  *month=12;
553 
554  }
555 
556  *day=mday[*month-1];
557 
558  }
559 
560 else if(*day > mday[*month-1]) {
561 
562  *(month)++;
563 
564  if(*month > 12) {
565 
566  (*year)++;
567  *month=1;
568 
569  }
570 
571  *day=1;
572 
573  }
574 
575 
576 }
577 
578 
579 
580 #line 300 "fmap_qtrly.ec"
i
static int i
Definition: get_apps_defaults.c:110
hour
int hour
Definition: display_data.c:26
day
int day
Definition: display_data.c:26
year
int year
Definition: display_data.c:26
qual
char qual[10]
Definition: subdisplay.c:33
month
int month
Definition: display_data.c:26
get_val06_array
int get_val06_array()
Definition: fmap_qtrly.c:504
emo
int emo
Definition: fmap_qtrly.c:124
data_record
struct data_rec data_record
bdy
int bdy
Definition: fmap_qtrly.c:125
mday
int mday[]
Definition: fmap_qtrly.c:519
eyr
int eyr
Definition: fmap_qtrly.c:124
edy
int edy
Definition: fmap_qtrly.c:124
_Cn1
static const char _Cn1[]
Definition: fmap_qtrly.c:3
bmo
int bmo
Definition: fmap_qtrly.c:125
change_date
void change_date()
SQLCODE
int4 SQLCODE
ifx_sqlca_t
struct sqlca_s ifx_sqlca_t
SQLSTATE
char SQLSTATE[]
sqlca
struct sqlca_s sqlca
byr
int byr
Definition: fmap_qtrly.c:125
fmap_qtrly_rec
struct fmap_qrtly_rec fmap_qtrly_rec
fmap_pro_qtrly
int fmap_pro_qtrly(char *hb5, char *drain, char *parm, struct stim begin_date, struct stim end_date, char *qual, struct stn_values *stn_values)
Definition: fmap_qtrly.c:188
buf
struct stat buf
Definition: is_file_closed.c:8
k
int k
Definition: mapp2h.h:48
value
float value
Definition: plot_qpf_legend.c:29
args
Arg args[10]
Definition: plot_qpf_legend.c:23
prototypes_new.h
data_rec
Definition: calfma_qtrly.c:160
data_rec::idote
int idote
Definition: calfma_qtrly.c:177
data_rec::cztime
int cztime
Definition: calfma_qtrly.c:173
data_rec::source
char source[9]
Definition: calfma_qtrly.c:162
data_rec::pe2
char pe2
Definition: calfma_qtrly.c:164
data_rec::t
char t
Definition: calfma_qtrly.c:166
data_rec::s
char s
Definition: calfma_qtrly.c:167
data_rec::irev
int irev
Definition: calfma_qtrly.c:178
data_rec::p
char p
Definition: calfma_qtrly.c:169
data_rec::values
double values[96]
Definition: calfma_qtrly.c:180
data_rec::lwal
char lwal
Definition: calfma_qtrly.c:176
data_rec::zdate
int zdate
Definition: calfma_qtrly.c:170
data_rec::lwals
char lwals[96]
Definition: calfma_qtrly.c:181
data_rec::idur
int idur
Definition: calfma_qtrly.c:174
data_rec::ztime
int ztime
Definition: calfma_qtrly.c:171
data_rec::pedtsep
char pedtsep[8]
Definition: calfma_qtrly.c:182
data_rec::codp
double codp
Definition: calfma_qtrly.c:175
data_rec::dur
char dur
Definition: calfma_qtrly.c:165
data_rec::pe1
char pe1
Definition: calfma_qtrly.c:163
data_rec::value
double value
Definition: calfma_qtrly.c:179
data_rec::e
char e
Definition: calfma_qtrly.c:168
data_rec::czdate
int czdate
Definition: calfma_qtrly.c:172
fmap_qrtly_rec
Definition: fmap_qtrly.c:127
fmap_qrtly_rec::cmon
int cmon
Definition: fmap_qtrly.c:143
fmap_qrtly_rec::z12
double z12
Definition: fmap_qtrly.c:148
fmap_qrtly_rec::pos
char pos[2]
Definition: fmap_qtrly.c:130
fmap_qrtly_rec::qz00
char qz00[2]
Definition: fmap_qtrly.c:150
fmap_qrtly_rec::qz06
char qz06[2]
Definition: fmap_qtrly.c:151
fmap_qrtly_rec::vzday
int vzday
Definition: fmap_qtrly.c:141
fmap_qrtly_rec::pe1
char pe1[2]
Definition: fmap_qtrly.c:132
fmap_qrtly_rec::cgroup
char cgroup[2]
Definition: fmap_qtrly.c:131
fmap_qrtly_rec::ccal_yr
int ccal_yr
Definition: fmap_qtrly.c:142
fmap_qrtly_rec::vmon
int vmon
Definition: fmap_qtrly.c:140
fmap_qrtly_rec::dur
char dur[2]
Definition: fmap_qtrly.c:134
fmap_qrtly_rec::p
char p[2]
Definition: fmap_qtrly.c:138
fmap_qrtly_rec::qz18
char qz18[2]
Definition: fmap_qtrly.c:153
fmap_qrtly_rec::z06
double z06
Definition: fmap_qtrly.c:147
fmap_qrtly_rec::e
char e[2]
Definition: fmap_qtrly.c:137
fmap_qrtly_rec::s
char s[2]
Definition: fmap_qtrly.c:136
fmap_qrtly_rec::drain
char drain[2]
Definition: fmap_qtrly.c:129
fmap_qrtly_rec::qz12
char qz12[2]
Definition: fmap_qtrly.c:152
fmap_qrtly_rec::vcal_yr
int vcal_yr
Definition: fmap_qtrly.c:139
fmap_qrtly_rec::czday
int czday
Definition: fmap_qtrly.c:144
fmap_qrtly_rec::ctime
int ctime
Definition: fmap_qtrly.c:145
fmap_qrtly_rec::t
char t[2]
Definition: fmap_qtrly.c:135
fmap_qrtly_rec::z18
double z18
Definition: fmap_qtrly.c:149
fmap_qrtly_rec::z00
double z00
Definition: fmap_qtrly.c:146
fmap_qrtly_rec::pe2
char pe2[2]
Definition: fmap_qtrly.c:133
sqlca_s::sqlcaw_s::sqlwarn5
char sqlwarn5
Definition: db.c:65
sqlca_s::sqlcaw_s::sqlwarn3
char sqlwarn3
Definition: db.c:61
sqlca_s::sqlcaw_s::sqlwarn4
char sqlwarn4
Definition: db.c:63
sqlca_s::sqlcaw_s::sqlwarn7
char sqlwarn7
Definition: db.c:67
sqlca_s::sqlcaw_s::sqlwarn1
char sqlwarn1
Definition: db.c:57
sqlca_s::sqlcaw_s::sqlwarn6
char sqlwarn6
Definition: db.c:66
sqlca_s::sqlcaw_s::sqlwarn2
char sqlwarn2
Definition: db.c:59
sqlca_s::sqlcaw_s::sqlwarn0
char sqlwarn0
Definition: db.c:56
sqlca_s
Definition: db.c:43
sqlca_s::sqlerrd
long sqlerrd[6]
Definition: db.c:47
sqlca_s::sqlwarn
struct sqlca_s::sqlcaw_s sqlwarn
sqlca_s::sqlcode
long sqlcode
Definition: db.c:44
sqlca_s::sqlerrm
char sqlerrm[72]
Definition: db.c:45
sqlca_s::sqlerrp
char sqlerrp[8]
Definition: db.c:46
stim
Definition: misc.h:93
stim::minute
int minute
Definition: misc.h:99
stim::day
int day
Definition: misc.h:97
stim::year
int year
Definition: misc.h:95
stim::hour
int hour
Definition: misc.h:98
stim::month
int month
Definition: misc.h:96
stn_values
Definition: hydro_data.h:31
stn_values::qual
char qual
Definition: hydro_data.h:36
stn_values::zdate
int zdate
Definition: hydro_data.h:33
stn_values::ztime
int ztime
Definition: hydro_data.h:34
stn_values::value
float value
Definition: hydro_data.h:35
Generated by doxygen 1.9.1