pcs_snd_yx1.c

unix 下用pro*c tuxedo 开发的东西

/* Result Sets Interface */
#ifndef SQL_CRSR
#  define SQL_CRSR
  struct sql_cursor
  {
    unsigned int curocn;
    void *ptr1;
    void *ptr2;
    unsigned long magic;
  };
  typedef struct sql_cursor sql_cursor;
  typedef struct sql_cursor SQL_CURSOR;
#endif /* SQL_CRSR */

/* Thread Safety */
typedef void * sql_context;
typedef void * SQL_CONTEXT;

/* File name & Package Name */
struct sqlcxp
{
  unsigned short fillen;
           char  filnam[15];
};
static struct sqlcxp sqlfpn =
{
    14,
    "Pcs_Snd_YX1.pc"
};


static unsigned long sqlctx = 1279363;


static struct sqlexd {
   unsigned int   sqlvsn;
   unsigned int   arrsiz;
   unsigned int   iters;
   unsigned int   offset;
   unsigned short selerr;
   unsigned short sqlety;
   unsigned int   unused;
            short *cud;
   unsigned char  *sqlest;
            char  *stmt;
   unsigned char  **sqphsv;
   unsigned int   *sqphsl;
            short **sqpind;
   unsigned int   *sqparm;
   unsigned int   **sqparc;
   unsigned char  *sqhstv[1];
   unsigned int   sqhstl[1];
            short *sqindv[1];
   unsigned int   sqharm[1];
   unsigned int   *sqharc[1];
} sqlstm = {8,1};

/* Prototypes */
extern sqlcxt (/*_ void **, unsigned long *,
                   struct sqlexd *, struct sqlcxp * _*/);
extern sqlcx2t(/*_ void **, unsigned long *,
                   struct sqlexd *, struct sqlcxp * _*/);
extern sqlbuft(/*_ void **, char * _*/);
extern sqlgs2t(/*_ void **, char * _*/);
extern sqlorat(/*_ void **, unsigned long *, void * _*/);

/* Forms Interface */
static int IAPSUCC = 0;
static int IAPFAIL = 1403;
static int IAPFTL  = 535;
extern void sqliem(/*_ char *, int * _*/);

typedef struct { unsigned short len; unsigned char arr[1]; } VARCHAR;
typedef struct { unsigned short len; unsigned char arr[1]; } varchar;

/* cud (compilation unit data) array */
static short sqlcud0[] =
{8,4130,
2,0,0,1,39,0,4,60,0,1,0,0,1,0,2,3,0,0,
20,0,0,2,0,0,30,62,0,0,0,0,1,0,
};


/********************************************************************************
*	File Name			:	PCSSndYX1.pc 			*
*	Module ID			:	MD_P05_01		    	*
*	Module Name			:	PCSSNDYX1.pc			*
*	Purpose			  	:	Read YX file,write YX DB    	*
*	Auther				:	lix			*
*	Date Created			:	07/20/1999  			*
*	Version				:	Version 1.0			*
*	Environment		 	:	OSF1 Compaq V4.0 (Alpha)	*
*	Portability			:	Unix platform			*
*	Warnings		 	:					*
*	References			:	  				*
*	Calling Syntax		 	:					*
*	Parameters		  	:					*
*	Returns			 	:	integer				*
*                              	0  success					*
*                       	-1 failure					*
*	Calling Functions	  	:                                       *
*                                               InitPCSSndYX1()                 *
*                                               OpenYXFileForRead()             *
*                                               ReadYXFileForData()             *
*                                               getyxfilelen()                  *
* 						CreateSndLogAndHZRec()          *
*   						UpdateSndLogStatus()		*
*   						InsertSndYXDBRec()		*
*   						InsertSndTMPDBRec()		*
*	Called Functions	  	:       Forked by PCSFileDepart.xx      *
*	Data Stores and Usages	：              				*
*				(a) Input  :					*
*				(b) Output :    T_FSRZ,T_HZ,T_FSYXSJ,T_ZCFSSJ   *
*	Report				:	none				*
*	Screens				:	none				*
*	Message Files			:	none				*
*										*
*	Change Log    			:					*
*	Change No. Date		Auther		Reason for Change		*
*******************************************************************************/

#include <stdio.h>
#include <math.h>
#include <stdlib.h>

#include <sqlca.h>
#include <sqlcpr.h>

#include <signal.h>
#include "/usr/bkfx/include/Pcs_Snd_YX1/cmYXStr.h"
#include "/usr/bkfx/include/Pcs_Snd_YX1/cmdef.h"
#include "/usr/bkfx/include/Pcs_Snd_YX1/Pcs_Snd_YX1.h"
#include "/usr/bkfx/include/Pcs_Snd_YX1/yx1api.h"


/*  Usage :  PCSSndYX1.x filename   */ 
main(int argc,char *argv[])
{    char sjbh[3];
	int flag,flag2;
printf("ddddd");
	flag=InitPCSSndYX1();
printf("eeeee\n");
	/* EXEC SQL SELECT count(*) INTO :flag2 FROM T_SJBH ; */ 

{
 struct sqlexd sqlstm;

 sqlstm.sqlvsn = 8;
 sqlstm.arrsiz = 1;
 sqlstm.stmt = "select count(*)  into :b0  from T_SJBH ";
 sqlstm.iters = (unsigned int  )1;
 sqlstm.offset = (unsigned int  )2;
 sqlstm.selerr = (unsigned short)1;
 sqlstm.cud = sqlcud0;
 sqlstm.sqlest = (unsigned char  *)&sqlca;
 sqlstm.sqlety = (unsigned short)0;
 sqlstm.sqhstv[0] = (unsigned char  *)&flag2;
 sqlstm.sqhstl[0] = (unsigned int  )4;
 sqlstm.sqindv[0] = (         short *)0;
 sqlstm.sqharm[0] = (unsigned int  )0;
 sqlstm.sqphsv = sqlstm.sqhstv;
 sqlstm.sqphsl = sqlstm.sqhstl;
 sqlstm.sqpind = sqlstm.sqindv;
 sqlstm.sqparm = sqlstm.sqharm;
 sqlstm.sqparc = sqlstm.sqharc;
 sqlcxt((void **)0, &sqlctx, &sqlstm, &sqlfpn);
}


	printf("sjbh is %d\nflag is %d\n",flag2,flag);
	/* EXEC SQL COMMIT WORK RELEASE; */ 

{
 struct sqlexd sqlstm;

 sqlstm.sqlvsn = 8;
 sqlstm.arrsiz = 1;
 sqlstm.iters = (unsigned int  )1;
 sqlstm.offset = (unsigned int  )20;
 sqlstm.cud = sqlcud0;
 sqlstm.sqlest = (unsigned char  *)&sqlca;
 sqlstm.sqlety = (unsigned short)0;
 sqlcxt((void **)0, &sqlctx, &sqlstm, &sqlfpn);
}


}