tbcms048.sqc

一整套完整的银行卡系统源代码

/*
** 注    意: 此文件由平台自动生成，禁止任何人以任何方式修改!
** 生成日期: 2004-9-1
** 版 本 号: V1.0.0
** 初始作者: ShiBin Hu
*/

#include	"sysdefine.h"
#include	"code.h"
#include	"attrdef.h"
#include	"revglob.h"
EXEC SQL INCLUDE sqlca;

EXEC SQL BEGIN DECLARE SECTION ;
	char cmsclsacctbalreg_acctno[33];
	short cmsclsacctbalreg_acctno_id;
	char cmsclsacctbalreg_settledate[11];
	short cmsclsacctbalreg_settledate_id;
	double cmsclsacctbalreg_balance;
	short cmsclsacctbalreg_balance_id;
EXEC SQL END DECLARE SECTION ;

#define RR_CMSCLSACCTBALREG \
		:cmsclsacctbalreg_acctno:cmsclsacctbalreg_acctno_id, \
		:cmsclsacctbalreg_settledate:cmsclsacctbalreg_settledate_id, \
		:cmsclsacctbalreg_balance:cmsclsacctbalreg_balance_id

#define UU_CMSCLSACCTBALREG \
		acctno, \
		settledate, \
		balance

#define WW_CMSCLSACCTBALREG \
		:cmsclsacctbalreg_acctno, \
		:cmsclsacctbalreg_settledate, \
		:cmsclsacctbalreg_balance

struct cmsclsacctbalreg
{
	char	acctno[33];
	char	settledate[11];
	double	balance;
};

void pubInitCmsclsacctbalreg()
{
	memset( cmsclsacctbalreg_acctno, 0x00, sizeof( cmsclsacctbalreg_acctno ) ) ;
	cmsclsacctbalreg_acctno_id = 0 ;
	memset( cmsclsacctbalreg_settledate, 0x00, sizeof( cmsclsacctbalreg_settledate ) ) ;
	cmsclsacctbalreg_settledate_id = 0 ;
	memset( &cmsclsacctbalreg_balance, 0x00, sizeof( cmsclsacctbalreg_balance ) ) ;
	cmsclsacctbalreg_balance_id = 0 ;
}

void pubStoVCmsclsacctbalreg( struct cmsclsacctbalreg * pstCmsclsacctbalreg )
{
	pubInitCmsclsacctbalreg();
	if( !strlen( pstCmsclsacctbalreg->acctno ) )
		strcpy( pstCmsclsacctbalreg->acctno, " " );
	strcpy( cmsclsacctbalreg_acctno, pstCmsclsacctbalreg->acctno );
	if( !strlen( pstCmsclsacctbalreg->settledate ) )
		strcpy( pstCmsclsacctbalreg->settledate, " " );
	strcpy( cmsclsacctbalreg_settledate, pstCmsclsacctbalreg->settledate );
	cmsclsacctbalreg_balance = pstCmsclsacctbalreg->balance ;
	pubDround( &cmsclsacctbalreg_balance, 2 );
}

void pubVtoSCmsclsacctbalreg( struct cmsclsacctbalreg * pstCmsclsacctbalreg )
{
	strcpy( pstCmsclsacctbalreg->acctno, cmsclsacctbalreg_acctno );
	strpack( pstCmsclsacctbalreg->acctno );
	strcpy( pstCmsclsacctbalreg->settledate, cmsclsacctbalreg_settledate );
	strpack( pstCmsclsacctbalreg->settledate );
	pstCmsclsacctbalreg->balance = cmsclsacctbalreg_balance ;
	pubDround( &pstCmsclsacctbalreg->balance, 2 );
}

int pubReadCmsclsacctbalreg( struct cmsclsacctbalreg * pstCmsclsacctbalreg )
{
	pubInitCmsclsacctbalreg();
	pubStoVCmsclsacctbalreg(pstCmsclsacctbalreg);
	EXEC SQL SELECT * INTO RR_CMSCLSACCTBALREG 
		FROM cmsclsacctbalreg  
		WHERE  
		 acctno = :cmsclsacctbalreg_acctno and 
		 settledate = :cmsclsacctbalreg_settledate  
		 ; 
	if ( SQLCODE ) 
	{ 
		strcpy( g_acRspCode, "999996" ); 
		/* 数据库读错误 */ 
		pubCrtRspInfo( "cmsclsacctbalreg",SQLCODE ); 
		pubErrLog( __LINE__, __FILE__, g_acRspMsg ); 
		return -1; 
	}; 
	pubVtoSCmsclsacctbalreg(pstCmsclsacctbalreg);
	return 0; 
} 
 
int pubModiCmsclsacctbalreg( struct cmsclsacctbalreg * pstCmsclsacctbalreg )
{
	pubInitCmsclsacctbalreg();
	pubStoVCmsclsacctbalreg(pstCmsclsacctbalreg);
	EXEC SQL UPDATE cmsclsacctbalreg 
		SET ( UU_CMSCLSACCTBALREG ) = ( WW_CMSCLSACCTBALREG ) 
		WHERE  
		 acctno = :cmsclsacctbalreg_acctno and 
		 settledate = :cmsclsacctbalreg_settledate  
		 ; 
	if ( SQLCODE ) 
	{ 
		strcpy( g_acRspCode, "999997" ); 
		/* 数据库更新错误 */ 
		pubCrtRspInfo( "cmsclsacctbalreg",SQLCODE ); 
		pubErrLog( __LINE__, __FILE__, g_acRspMsg ); 
		return -1; 
	}; 
	return 0; 
}
  
int pubInstCmsclsacctbalreg( struct cmsclsacctbalreg * pstCmsclsacctbalreg )
{
	pubInitCmsclsacctbalreg();
	pubStoVCmsclsacctbalreg(pstCmsclsacctbalreg);
	EXEC SQL INSERT INTO cmsclsacctbalreg VALUES ( RR_CMSCLSACCTBALREG ) ;
	if ( SQLCODE ) 
	{ 
		strcpy( g_acRspCode, "999998" ); 
		/* 数据库插入错误 */ 
		pubCrtRspInfo( "cmsclsacctbalreg",SQLCODE ); 
		pubErrLog( __LINE__, __FILE__, g_acRspMsg ); 
		return -1; 
	}; 
	return 0; 
}