tbcms024.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 cmsactiom_cardno[20];
	short cmsactiom_cardno_id;
	char cmsactiom_trandate[11];
	short cmsactiom_trandate_id;
	long cmsactiom_serseqno;
	short cmsactiom_serseqno_id;
	char cmsactiom_vouchno[17];
	short cmsactiom_vouchno_id;
	char cmsactiom_acctseqno[5];
	short cmsactiom_acctseqno_id;
	char cmsactiom_busskind[6];
	short cmsactiom_busskind_id;
	char cmsactiom_opflg[2];
	short cmsactiom_opflg_id;
	char cmsactiom_ccy[4];
	short cmsactiom_ccy_id;
	char cmsactiom_prdcod[8];
	short cmsactiom_prdcod_id;
	char cmsactiom_acctno[33];
	short cmsactiom_acctno_id;
	char cmsactiom_subacct[33];
	short cmsactiom_subacct_id;
	double cmsactiom_balance;
	short cmsactiom_balance_id;
	char cmsactiom_acctsts[3];
	short cmsactiom_acctsts_id;
	char cmsactiom_idtype[3];
	short cmsactiom_idtype_id;
	char cmsactiom_idcode[21];
	short cmsactiom_idcode_id;
	char cmsactiom_custname[71];
	short cmsactiom_custname_id;
	char cmsactiom_issuebrc[10];
	short cmsactiom_issuebrc_id;
	char cmsactiom_brc[10];
	short cmsactiom_brc_id;
	char cmsactiom_teller[11];
	short cmsactiom_teller_id;
EXEC SQL END DECLARE SECTION ;

#define RR_CMSACTIOM \
		:cmsactiom_cardno:cmsactiom_cardno_id, \
		:cmsactiom_trandate:cmsactiom_trandate_id, \
		:cmsactiom_serseqno:cmsactiom_serseqno_id, \
		:cmsactiom_vouchno:cmsactiom_vouchno_id, \
		:cmsactiom_acctseqno:cmsactiom_acctseqno_id, \
		:cmsactiom_busskind:cmsactiom_busskind_id, \
		:cmsactiom_opflg:cmsactiom_opflg_id, \
		:cmsactiom_ccy:cmsactiom_ccy_id, \
		:cmsactiom_prdcod:cmsactiom_prdcod_id, \
		:cmsactiom_acctno:cmsactiom_acctno_id, \
		:cmsactiom_subacct:cmsactiom_subacct_id, \
		:cmsactiom_balance:cmsactiom_balance_id, \
		:cmsactiom_acctsts:cmsactiom_acctsts_id, \
		:cmsactiom_idtype:cmsactiom_idtype_id, \
		:cmsactiom_idcode:cmsactiom_idcode_id, \
		:cmsactiom_custname:cmsactiom_custname_id, \
		:cmsactiom_issuebrc:cmsactiom_issuebrc_id, \
		:cmsactiom_brc:cmsactiom_brc_id, \
		:cmsactiom_teller:cmsactiom_teller_id

#define UU_CMSACTIOM \
		cardno, \
		trandate, \
		serseqno, \
		vouchno, \
		acctseqno, \
		busskind, \
		opflg, \
		ccy, \
		prdcod, \
		acctno, \
		subacct, \
		balance, \
		acctsts, \
		idtype, \
		idcode, \
		custname, \
		issuebrc, \
		brc, \
		teller

#define WW_CMSACTIOM \
		:cmsactiom_cardno, \
		:cmsactiom_trandate, \
		:cmsactiom_serseqno, \
		:cmsactiom_vouchno, \
		:cmsactiom_acctseqno, \
		:cmsactiom_busskind, \
		:cmsactiom_opflg, \
		:cmsactiom_ccy, \
		:cmsactiom_prdcod, \
		:cmsactiom_acctno, \
		:cmsactiom_subacct, \
		:cmsactiom_balance, \
		:cmsactiom_acctsts, \
		:cmsactiom_idtype, \
		:cmsactiom_idcode, \
		:cmsactiom_custname, \
		:cmsactiom_issuebrc, \
		:cmsactiom_brc, \
		:cmsactiom_teller

struct cmsactiom
{
	char	cardno[20];
	char	trandate[11];
	long	serseqno;
	char	vouchno[17];
	char	acctseqno[5];
	char	busskind[6];
	char	opflg[2];
	char	ccy[4];
	char	prdcod[8];
	char	acctno[33];
	char	subacct[33];
	double	balance;
	char	acctsts[3];
	char	idtype[3];
	char	idcode[21];
	char	custname[71];
	char	issuebrc[10];
	char	brc[10];
	char	teller[11];
};

void pubInitCmsactiom()
{
	memset( cmsactiom_cardno, 0x00, sizeof( cmsactiom_cardno ) ) ;
	cmsactiom_cardno_id = 0 ;
	memset( cmsactiom_trandate, 0x00, sizeof( cmsactiom_trandate ) ) ;
	cmsactiom_trandate_id = 0 ;
	memset( &cmsactiom_serseqno, 0x00, sizeof( cmsactiom_serseqno ) ) ;
	cmsactiom_serseqno_id = 0 ;
	memset( cmsactiom_vouchno, 0x00, sizeof( cmsactiom_vouchno ) ) ;
	cmsactiom_vouchno_id = 0 ;
	memset( cmsactiom_acctseqno, 0x00, sizeof( cmsactiom_acctseqno ) ) ;
	cmsactiom_acctseqno_id = 0 ;
	memset( cmsactiom_busskind, 0x00, sizeof( cmsactiom_busskind ) ) ;
	cmsactiom_busskind_id = 0 ;
	memset( cmsactiom_opflg, 0x00, sizeof( cmsactiom_opflg ) ) ;
	cmsactiom_opflg_id = 0 ;
	memset( cmsactiom_ccy, 0x00, sizeof( cmsactiom_ccy ) ) ;
	cmsactiom_ccy_id = 0 ;
	memset( cmsactiom_prdcod, 0x00, sizeof( cmsactiom_prdcod ) ) ;
	cmsactiom_prdcod_id = 0 ;
	memset( cmsactiom_acctno, 0x00, sizeof( cmsactiom_acctno ) ) ;
	cmsactiom_acctno_id = 0 ;
	memset( cmsactiom_subacct, 0x00, sizeof( cmsactiom_subacct ) ) ;
	cmsactiom_subacct_id = 0 ;
	memset( &cmsactiom_balance, 0x00, sizeof( cmsactiom_balance ) ) ;
	cmsactiom_balance_id = 0 ;
	memset( cmsactiom_acctsts, 0x00, sizeof( cmsactiom_acctsts ) ) ;
	cmsactiom_acctsts_id = 0 ;
	memset( cmsactiom_idtype, 0x00, sizeof( cmsactiom_idtype ) ) ;
	cmsactiom_idtype_id = 0 ;
	memset( cmsactiom_idcode, 0x00, sizeof( cmsactiom_idcode ) ) ;
	cmsactiom_idcode_id = 0 ;
	memset( cmsactiom_custname, 0x00, sizeof( cmsactiom_custname ) ) ;
	cmsactiom_custname_id = 0 ;
	memset( cmsactiom_issuebrc, 0x00, sizeof( cmsactiom_issuebrc ) ) ;
	cmsactiom_issuebrc_id = 0 ;
	memset( cmsactiom_brc, 0x00, sizeof( cmsactiom_brc ) ) ;
	cmsactiom_brc_id = 0 ;
	memset( cmsactiom_teller, 0x00, sizeof( cmsactiom_teller ) ) ;
	cmsactiom_teller_id = 0 ;
}

void pubStoVCmsactiom( struct cmsactiom * pstCmsactiom )
{
	pubInitCmsactiom();
	if( !strlen( pstCmsactiom->cardno ) )
		strcpy( pstCmsactiom->cardno, " " );
	strcpy( cmsactiom_cardno, pstCmsactiom->cardno );
	if( !strlen( pstCmsactiom->trandate ) )
		strcpy( pstCmsactiom->trandate, " " );
	strcpy( cmsactiom_trandate, pstCmsactiom->trandate );
	cmsactiom_serseqno = pstCmsactiom->serseqno ;
	if( !strlen( pstCmsactiom->vouchno ) )
		strcpy( pstCmsactiom->vouchno, " " );
	strcpy( cmsactiom_vouchno, pstCmsactiom->vouchno );
	if( !strlen( pstCmsactiom->acctseqno ) )
		strcpy( pstCmsactiom->acctseqno, " " );
	strcpy( cmsactiom_acctseqno, pstCmsactiom->acctseqno );
	if( !strlen( pstCmsactiom->busskind ) )
		strcpy( pstCmsactiom->busskind, " " );
	strcpy( cmsactiom_busskind, pstCmsactiom->busskind );
	if( !strlen( pstCmsactiom->opflg ) )
		strcpy( pstCmsactiom->opflg, " " );
	strcpy( cmsactiom_opflg, pstCmsactiom->opflg );
	if( !strlen( pstCmsactiom->ccy ) )
		strcpy( pstCmsactiom->ccy, " " );
	strcpy( cmsactiom_ccy, pstCmsactiom->ccy );
	if( !strlen( pstCmsactiom->prdcod ) )
		strcpy( pstCmsactiom->prdcod, " " );
	strcpy( cmsactiom_prdcod, pstCmsactiom->prdcod );
	if( !strlen( pstCmsactiom->acctno ) )
		strcpy( pstCmsactiom->acctno, " " );
	strcpy( cmsactiom_acctno, pstCmsactiom->acctno );
	if( !strlen( pstCmsactiom->subacct ) )
		strcpy( pstCmsactiom->subacct, " " );
	strcpy( cmsactiom_subacct, pstCmsactiom->subacct );
	cmsactiom_balance = pstCmsactiom->balance ;
	pubDround( &cmsactiom_balance, 2 );
	if( !strlen( pstCmsactiom->acctsts ) )
		strcpy( pstCmsactiom->acctsts, " " );
	strcpy( cmsactiom_acctsts, pstCmsactiom->acctsts );
	if( !strlen( pstCmsactiom->idtype ) )
		strcpy( pstCmsactiom->idtype, " " );
	strcpy( cmsactiom_idtype, pstCmsactiom->idtype );
	if( !strlen( pstCmsactiom->idcode ) )
		strcpy( pstCmsactiom->idcode, " " );
	strcpy( cmsactiom_idcode, pstCmsactiom->idcode );
	if( !strlen( pstCmsactiom->custname ) )
		strcpy( pstCmsactiom->custname, " " );
	strcpy( cmsactiom_custname, pstCmsactiom->custname );
	if( !strlen( pstCmsactiom->issuebrc ) )
		strcpy( pstCmsactiom->issuebrc, " " );
	strcpy( cmsactiom_issuebrc, pstCmsactiom->issuebrc );
	if( !strlen( pstCmsactiom->brc ) )
		strcpy( pstCmsactiom->brc, " " );
	strcpy( cmsactiom_brc, pstCmsactiom->brc );
	if( !strlen( pstCmsactiom->teller ) )
		strcpy( pstCmsactiom->teller, " " );
	strcpy( cmsactiom_teller, pstCmsactiom->teller );
}

void pubVtoSCmsactiom( struct cmsactiom * pstCmsactiom )
{
	strcpy( pstCmsactiom->cardno, cmsactiom_cardno );
	strpack( pstCmsactiom->cardno );
	strcpy( pstCmsactiom->trandate, cmsactiom_trandate );
	strpack( pstCmsactiom->trandate );
	pstCmsactiom->serseqno = cmsactiom_serseqno ;
	strcpy( pstCmsactiom->vouchno, cmsactiom_vouchno );
	strpack( pstCmsactiom->vouchno );
	strcpy( pstCmsactiom->acctseqno, cmsactiom_acctseqno );
	strpack( pstCmsactiom->acctseqno );
	strcpy( pstCmsactiom->busskind, cmsactiom_busskind );
	strpack( pstCmsactiom->busskind );
	strcpy( pstCmsactiom->opflg, cmsactiom_opflg );
	strpack( pstCmsactiom->opflg );
	strcpy( pstCmsactiom->ccy, cmsactiom_ccy );
	strpack( pstCmsactiom->ccy );
	strcpy( pstCmsactiom->prdcod, cmsactiom_prdcod );
	strpack( pstCmsactiom->prdcod );
	strcpy( pstCmsactiom->acctno, cmsactiom_acctno );
	strpack( pstCmsactiom->acctno );
	strcpy( pstCmsactiom->subacct, cmsactiom_subacct );
	strpack( pstCmsactiom->subacct );
	pstCmsactiom->balance = cmsactiom_balance ;
	pubDround( &pstCmsactiom->balance, 2 );
	strcpy( pstCmsactiom->acctsts, cmsactiom_acctsts );
	strpack( pstCmsactiom->acctsts );
	strcpy( pstCmsactiom->idtype, cmsactiom_idtype );
	strpack( pstCmsactiom->idtype );
	strcpy( pstCmsactiom->idcode, cmsactiom_idcode );
	strpack( pstCmsactiom->idcode );
	strcpy( pstCmsactiom->custname, cmsactiom_custname );
	strpack( pstCmsactiom->custname );
	strcpy( pstCmsactiom->issuebrc, cmsactiom_issuebrc );
	strpack( pstCmsactiom->issuebrc );
	strcpy( pstCmsactiom->brc, cmsactiom_brc );
	strpack( pstCmsactiom->brc );
	strcpy( pstCmsactiom->teller, cmsactiom_teller );
	strpack( pstCmsactiom->teller );
}

int pubReadCmsactiom( struct cmsactiom * pstCmsactiom )
{
	pubInitCmsactiom();
	pubStoVCmsactiom(pstCmsactiom);
	EXEC SQL SELECT * INTO RR_CMSACTIOM 
		FROM cmsactiom  
		WHERE  
		 cardno = :cmsactiom_cardno and 
		 trandate = :cmsactiom_trandate and 
		 serseqno = :cmsactiom_serseqno  
		 ; 
	if ( SQLCODE ) 
	{ 
		strcpy( g_acRspCode, "999996" ); 
		/* 数据库读错误 */ 
		pubCrtRspInfo( "cmsactiom",SQLCODE ); 
		pubErrLog( __LINE__, __FILE__, g_acRspMsg ); 
		return -1; 
	}; 
	pubVtoSCmsactiom(pstCmsactiom);
	return 0; 
} 
 
int pubModiCmsactiom( struct cmsactiom * pstCmsactiom )
{
	pubInitCmsactiom();
	pubStoVCmsactiom(pstCmsactiom);
	EXEC SQL UPDATE cmsactiom 
		SET ( UU_CMSACTIOM ) = ( WW_CMSACTIOM ) 
		WHERE  
		 cardno = :cmsactiom_cardno and 
		 trandate = :cmsactiom_trandate and 
		 serseqno = :cmsactiom_serseqno  
		 ; 
	if ( SQLCODE ) 
	{ 
		strcpy( g_acRspCode, "999997" ); 
		/* 数据库更新错误 */ 
		pubCrtRspInfo( "cmsactiom",SQLCODE ); 
		pubErrLog( __LINE__, __FILE__, g_acRspMsg ); 
		return -1; 
	}; 
	return 0; 
}
  
int pubInstCmsactiom( struct cmsactiom * pstCmsactiom )
{
	pubInitCmsactiom();
	pubStoVCmsactiom(pstCmsactiom);
	EXEC SQL INSERT INTO cmsactiom VALUES ( RR_CMSACTIOM ) ;
	if ( SQLCODE ) 
	{ 
		strcpy( g_acRspCode, "999998" ); 
		/* 数据库插入错误 */ 
		pubCrtRspInfo( "cmsactiom",SQLCODE ); 
		pubErrLog( __LINE__, __FILE__, g_acRspMsg ); 
		return -1; 
	}; 
	return 0; 
}