check_sens.c

Go to the documentation of this file.

#include <sqlhdr.h>
#include <sqliapi.h>
#line 1 "check_sens.ec"
#include "prototypes.h"
 
int check_sens(char *stn_id,char *shef)
{
 
/* general variable definitions */
int good=1;
int bad=0;
 
/* declare informix host variables */
/*
 * exec sql begin declare section;
 */
#line 11 "check_sens.ec"
#line 12 "check_sens.ec"
  char id[6];
  char pe1[2];
  char pe2[2];
  char dur[2];
  char t[2];
  char s[2];
  char e[2];
  char p[2];
int post;
/*
 * exec sql end declare section;
 */
#line 21 "check_sens.ec"
 
 
  strcpy(id,stn_id);
  strncpy(pe1,shef+0,1);
  *(pe1+1)='\0';
  strncpy(pe2,shef+1,1);
  *(pe2+1)='\0';
  strncpy(dur,shef+2,1);
  *(dur+1)='\0';
  strncpy(t,"F",1);
  *(t+1)='\0';
  strncpy(s,"Z",1);
  *(s+1)='\0';
  strncpy(e,shef+5,1);
  *(e+1)='\0';
  strncpy(p,shef+6,1);
  *(p+1)='\0';
 
/*
 *   $select post into $post
 *                from sens
 *                where id=$id and
 *                      pe1=$pe1 and pe2=$pe2 and
 *                      dur=$dur and t=$t and s=$s and
 *                      e=$e and p=$p;
 */
#line 39 "check_sens.ec"
  {
#line 44 "check_sens.ec"
  static const char *sqlcmdtxt[] =
#line 44 "check_sens.ec"
    {
#line 44 "check_sens.ec"
    "select post from sens where id = ? and pe1 = ? and pe2 = ? and dur = ? and t = ? and s = ? and e = ? and p = ?",
    0
    };
#line 44 "check_sens.ec"
static ifx_cursor_t _SQ0 = {0};
  static ifx_sqlvar_t _sqibind[] = 
    {
      { 100, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
      { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
      { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
      { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
      { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
      { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
      { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
      { 100, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
#line 44 "check_sens.ec"
    };
  static ifx_sqlvar_t _sqobind[] = 
    {
      { 102, sizeof(post), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
#line 44 "check_sens.ec"
    };
#line 44 "check_sens.ec"
  _sqibind[0].sqldata = id;
#line 44 "check_sens.ec"
  _sqibind[1].sqldata = pe1;
#line 44 "check_sens.ec"
  _sqibind[2].sqldata = pe2;
#line 44 "check_sens.ec"
  _sqibind[3].sqldata = dur;
#line 44 "check_sens.ec"
  _sqibind[4].sqldata = t;
#line 44 "check_sens.ec"
  _sqibind[5].sqldata = s;
#line 44 "check_sens.ec"
  _sqibind[6].sqldata = e;
#line 44 "check_sens.ec"
  _sqibind[7].sqldata = p;
#line 44 "check_sens.ec"
  _sqobind[0].sqldata = (char *) &post;
#line 44 "check_sens.ec"
  sqli_slct(ESQLINTVERSION, &_SQ0,sqlcmdtxt,8,_sqibind,1,_sqobind,0,(ifx_literal_t *)0,(ifx_namelist_t *)0,0);
#line 44 "check_sens.ec"
  }
  if(!sqlca.sqlcode)
    return(good);
  else
    return(bad);
}
 
 
#line 50 "check_sens.ec"