mchk.c

电力与银行通讯的源码 1.应用tuxedo中间件. 2.与银行的前置机通讯. 3.proc*c 的应用

/*
	对帐：MBANKCHK
	输入参数：
	1	银行序号	2	参考确认销帐
	2	对帐日期	8	截止的对帐的日期YYYYMMDD
	3   文件名      20  发送的对帐文件名称
	4   对帐标志	20	
	Output: 
	1	返回状态(可以转换成int型)n	8	>0－操作成功，返回查询到的记录数
										 0－操作成功，无符合条件的记录；
										<0－失败
	
*/
#include "public.h"
#ifdef __cplusplus
extern "C"
#endif
void
#ifdef MW_CICS
main(MW_SVCINFO * transb)
#endif
#ifdef MW_TUXEDO
MCHK(MW_SVCINFO * transb)
#endif
{
	/*定义输入参数*/
	int  iBankSerial = 0;
	char szCheckDate[9] = "";
	char szfilename[21]="";
	char szdzflag[21]="";
	
	/*定义输出参数*/
    int   Result=0;
	
	/*定义临时变量*/
	int iReturn = 0;
	char szMsg[255];
    char szSql[1000]="";
	char *szInBuf;
	char szTemp[100] = "";
	CMiddleWare mwMidWare;
	MW_Init(&mwMidWare,transb);
	szInBuf = MW_GetInBuf(&mwMidWare);
	if (szInBuf == NULL)
	{
		gf_Return(&mwMidWare,-1,"没有输入参数!");
		return;
	}
/*	MW_Trace("OK1");*/
	MW_AllocateString(&mwMidWare,1024); 
	/*取输入的对帐数据:*/
	strncpy(szTemp,szInBuf,2);
	szTemp[2] = '\0';
	iBankSerial = atoi(szTemp);
	strncpy(szCheckDate,szInBuf + 2,8);
	szCheckDate[8] = '\0';
	strncpy(szfilename,szInBuf + 10,20);
	szfilename[20] = '\0';
	strncpy(szdzflag,szInBuf + 30,20);
	szdzflag[20] = '\0';
/*	MW_GetValue(&mwMidWare,BANK_CODE,"BANK_CODE",szBankCode,sizeof(szBankCode));
	MW_GetValue(&mwMidWare,END_FLAG,"END_FLAG",szEndFlag,sizeof(szEndFlag));
	MW_GetValue(&mwMidWare,CHECK_DATE,"CHECK_DATE",szCheckDate,sizeof(szCheckDate));
	MW_GetValueInt(&mwMidWare,ROW_COUNT,"ROW_COUNT",&nRowCount);
	MW_GetValue(&mwMidWare,CHECK_DATA,"CHECK_DATA",szCheckData,sizeof(szCheckData));
*/              
	sprintf(szSql,"insert into BANK_CHK (BANK_SERIAL,JSRQ,FILENAME,DZ_FLAG) VALUES (%d,'%8s','%20s','%20s')",iBankSerial,szCheckDate,szfilename,szdzflag);
	if (!DB_ExecuteSQL(&theDatabase,szSql))
			{
				sprintf(szMsg,"MCHK %s  执行失败!",szSql);
				gf_Return(&mwMidWare,-1,szMsg);
				return;
			}
	DB_SQLFetch(&theDatabase);
	DB_SQLDone(&theDatabase);
	gf_Return(&mwMidWare,iReturn,"");
	return;
}