cms514.sqc

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

/********************************************************************
 **   源码文件名称 : cms514.SQC
 **   所属子系统   : CMS 
 **   当前文件版本 : 1.0.0.0
 **   作者         : UCCB	ALEX
 **   版本创建日期 : 2004/10/11
 **   功能描述     : 保号换卡起用子交易
 **   修改记录     :
 **   修改人       修改日期     修改日期
*********************************************************************/

#include "code.h"
#include "attrdef.h"
#include "sysdef.h"
#include "pubcom.h"

#include "cmscode.h"
#include "cmscardinfo.h"
#include "cmschgm.h"
#include "cmsacctm.h"

EXEC SQL INCLUDE SQLCA;

int cmsKeepCardNoChgBeginPro( PUBCOM *pstPubcom )
{
	/*定义局部变量*/
	struct	cmscardinfo		 stCardInfo	  ; /*卡片信息表*/
	struct	cmschgm     	 stCmsChgM	  ; /*换卡登记簿*/
	struct	cmsacctm    	 stCmsAcctM   ; /*卡账户登记簿*/
	char	acPreCharCode[PRECHARCODE_LEN +1];

	strcpy( g_acTrcMsg, "子交易: 保号换卡启用开始.." );
	TRCLOG4
	strcpy( g_acRspCode, RSP_OK );

	memset( &stCardInfo,    0x00, sizeof ( struct cmscardinfo      ) ); 
	memset( &stCmsChgM ,    0x00, sizeof ( struct cmschgm          ) ); 
	memset( &stCmsAcctM,    0x00, sizeof ( struct cmsacctm         ) ); 
	memset( acPreCharCode,  0x00, sizeof ( acPreCharCode		   ) );

	/* 取数据字典值 */
	getstring("CardNo", stCardInfo.cardno);
	sprintf( g_acTrcMsg, "CardNo=[%s]", stCardInfo.cardno );
	TRCLOG3
	
	/* 获取卡片信息表 */ 
	if( pubReadCmscardinfo( &stCardInfo ) ) 
	{
		if ( SQLCODE == SQLNOTFOUND )
			sprintf( g_acRspMsg, "卡号[%s]不存在", stCardInfo.cardno );
		ERRLOG
		goto Exit;
	}

	/*修改卡片信息表    */
	strcpy(cmscardinfo_cardno,stCardInfo.cardno);
	cmscardinfo_cardstat[BIT14_LEN]=BIT14_CARDOK;
	cmscardinfo_crdsts[BIT1_LEN]=CARDOKSTS;
	EXEC SQL	UPDATE cmscardinfo 
				SET	cardstat=:cmscardinfo_cardstat,
					crdsts  =:cmscardinfo_crdsts
				WHERE	cardno=:cmscardinfo_cardno;
	if( SQLCODE )
	{
		sprintf(g_acRspMsg,"UPDATE 卡片信息表错SQLCODE[%d]cardno[%s]", SQLCODE,cmscardinfo_cardno);
		TRCLOG3
		sprintf(g_acRspCode,"999997");
		pubCrtRspInfo( "cmscardinfo", SQLCODE );
		ERRLOG;
		goto Exit;
	}


	/*登记换卡登记簿*/
	strcpy (stCmsChgM.oldcardno,stCardInfo.cardno);			/*旧卡号*/
	strcpy (stCmsChgM.newcardno,stCardInfo.cardno);			/*新卡号*/
	strcpy (stCmsChgM.chgdate,pstPubcom->acTranDate);	    /*换卡日期*/
	stCmsChgM.serseqno=pstPubcom->lSerSeqNo;				/*流水号*/
	sprintf(stCmsChgM.vouchno  ,"%s%08ld",pstPubcom->acTranDate8,stCmsChgM.serseqno);
	getstring("IdType"		, stCmsChgM.idtype			); 	/*证件类型*/
	getstring("IdNo"		, stCmsChgM.idcode			); 	/*证件号码*/
	getstring("CustName"	, stCmsChgM.custname		);	/*名称   */
	strcpy (stCmsChgM.issuebrc	, stCardInfo.issuebrc	);	/*发卡机构*/
	strcpy (stCmsChgM.chgbrc	, pstPubcom->acBrc		);	/*换卡机构*/
	strcpy (stCmsChgM.chgteller	, pstPubcom->acTeller	);/*换卡柜员*/
	stCmsChgM.chgflg[BIT1_LEN]=HOLDCHGCARD;
	stCmsChgM.status[BIT1_LEN]=NORMAL_STS;

	/*插入换卡登记簿*/
	if( pubInstCmschgm( &stCmsChgM) )
	{
		ERRLOG
		goto Exit;
	}
	
	/*写子交易流水*/
	if( cmsApiInsTranLog( pstPubcom, &stCardInfo, &stCmsAcctM, "换卡", "保号换卡启用" ) )
	{
		ERRLOG
		goto Exit;
	}

	/* 子交易出口 */ 
	
	strcpy( g_acTrcMsg, "子交易: 保号换卡启用结束.." );
	TRCLOG4

Exit:
	if( !strcmp( g_acRspCode, RSP_OK ) )
		return SUCCESS;
	else 
		return FAILED ;
}