lwjtry.ec

富士通F150程控交换机MA接口通讯源程序

#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <stdlib.h>

EXEC SQL begin declare section;
     char telephone[10];
     char officenum[15];
     char str1[60][30];
     char chartelecount;
     int  telecount;
EXEC SQL end declare section;

#include <stdio.h>
#include <sybfront.h>
#include <sybdb.h>
#include <memory.h>
#include <time.h>
#include <sys/signal.h>

#define BUFLEN      2048
#define HEXLEN      510
#define PLEN        25 
#define ERR_CH      stderr
#define bz          "0";


char             cmdbuf[BUFLEN];
char             aaa[4],str[4],stri[10];
int              kk,k;  
long int         upsubok,upsuberr,insubok,insuberr,illsub;
FILE            *fout;
DBINT substatus,newservice,subpriority;
RETCODE          return_code;

void          informix();
void          fqquit(int i);
 
 main(argc,argv)
int           argc;
char          *argv[];
{
        time_t  ttt;

        signal(SIGUSR1,fqquit);
 	
	putenv("INFORMIXDIR=/usr/informix");
	putenv("INFORMIXSERVER=online_a");

	EXEC SQL connect to 'yl97';
	if (sqlca.sqlcode<0)
	{
    fprintf(fout,"Can not login to INFORMIX ,Please check!\n");
	  fflush(fout);
    exit(-1);
	 }
	 select_informix(); 
	 fqquit(1); 
         dbexit();
	 /*EXEC SQL commit work;*/
	 EXEC SQL close line_cursor;
	 EXEC SQL disconnect current; 
	}
void  fqquit(int i)
 {
   time_t  ttt;
   time(&ttt);
 /*
   fprintf(fout,"Illgile subcard =%d\n",illsub);
   fprintf(fout,"Insert subcard ok =%d\n",insubok);
   fprintf(fout,"Insert subcard fail =%d\n",insuberr);
   fprintf(fout,"Update subcard ok =%d\n",upsubok);
   fprintf(fout,"Update subcard fail =%d\n",upsuberr);
   fprintf(fout,"%s end process! \n",ctime(&ttt));
 */
   fflush(fout);
}
select_informix()
{
	int i,j;

	EXEC SQL DECLARE line_cursor CURSOR FOR select telephone,officenum,subname,subaddr,subpriority into :str1[0],:str1[1],:str1[2],:str1[3],:str1[4]  from subscribercard where officenum="904";
  EXEC SQL OPEN line_cursor;
	for(i=0;i<50;i++)
  {
	 /*EXEC SQL begin work;*/
	 EXEC SQL fetch line_cursor;
	 if (sqlca.sqlcode!=0)
	 {
	    /*EXEC SQL commit rollback;*/
	    printf("The database error is occured!\n");  
	    break;
	    /*continue;*/
   }
   else
     printf("The linedata telephone=%s,officenum=%s,subname=%s \n",str1[0],str1[1],str1[2]);
  }
}