cms544.sqc

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

/********************************************************************
 **   源码文件名称 : cms544.SQC
 **   所属子系统   : CMS 
 **   当前文件版本 : 4.0.0.0
 **   作者         : Feng
 **   版本创建日期 : 2006/01/11
 **   功能描述     : 单张选号预制卡申请撤销子交易
 **   修改记录     :
 **   修改人       修改日期     修改日期
*********************************************************************/
#include "code.h"
#include "attrdef.h"
#include "sysdef.h"
#include "pubcom.h"

#include "cmscode.h"
#include "cmspcdreg.h"
#include "cmscardinfo.h"
#include "cmsacctm.h"
#include "cmschoosereg.h"

EXEC SQL INCLUDE SQLCA;

int cmsSingleMakeCardCanReq( PUBCOM *pstPubcom )
{
	/*定义局部变量*/

	struct	cmspcdreg  		stPcdReg	;
	struct	cmscardinfo		stCmsCardInfo;
	struct	cmsacctm  		stCmsAcctM	;

	strcpy( g_acTrcMsg, "子交易: 单张选号预制卡申请删除子交易开始.....");
	TRCLOG4;
	strcpy( g_acRspCode, RSP_OK );

	memset( &stPcdReg  , 0x00, sizeof ( struct cmspcdreg   ) ); 
	memset( &stCmsCardInfo , 0x00, sizeof ( struct cmscardinfo ) ); 
	memset( &stCmsAcctM    , 0x00, sizeof ( struct cmsacctm ) ); 

	/* 取数据字典值 */
	getstring( "AplyDate"	, stPcdReg.aplydate 	); /*申请日期*/
	getlong  ( "AcqSerStan" , &stPcdReg.serseqno	); /*流水号*/
	
	sprintf( g_acTrcMsg, "aplydate[%s]serseqno[%ld]",stPcdReg.aplydate,stPcdReg.serseqno);
	TRCLOG3;
	/* 获取预制卡登记簿*/
	if( pubReadCmspcdreg( &stPcdReg ) ) 
	{
		ERRLOG
		goto Exit;
	}

	/*检查记录状态*/
	if(stPcdReg.applflg[BIT1_LEN]==CANCEL_APPLYREG)
	{
		sprintf(g_acRspCode,"999999");
		sprintf(g_acRspMsg,"预制卡登记簿该记录已删除");
		ERRLOG
		goto Exit;
	}

	/*检查记录状态*/
	if(stPcdReg.processflg[BIT1_LEN]==MKFILE_DONE)
	{
		sprintf(g_acRspCode,"999999");
		sprintf(g_acRspMsg,"预制卡登记簿该记录已生成制卡文件");
		ERRLOG
		goto Exit;
	}

	/*修改记录为申请撤销*/
	cmspcdreg_applflg[BIT1_LEN]=CANCEL_APPLYREG;
	EXEC SQL	UPDATE cmspcdreg
				SET applflg=:cmspcdreg_applflg
				WHERE aplydate=:cmspcdreg_aplydate
				AND	  serseqno=:cmspcdreg_serseqno;
	if( SQLCODE )
	{
		sprintf(g_acRspCode,"CMS114");
		pubCrtRspInfo("cmspcdreg",SQLCODE);
		ERRLOG;
		goto Exit;
	}

	/* 获取选号登记簿 */
	pubInitCmschoosereg( );
	strcpy( cmschoosereg_trandate,	cmspcdreg_aplydate );
	cmschoosereg_serseqno = cmspcdreg_serseqno ;
	EXEC SQL	SELECT	*
				INTO	R_CMSCHOOSEREG
				FROM	cmschoosereg
				WHERE	trandate = :cmschoosereg_trandate
				AND		serseqno = :cmschoosereg_serseqno;
	if ( SQLCODE )
	{
		strcpy( g_acRspCode, "999996" );
		if ( SQLCODE == SQLNOTFOUND )
			sprintf( g_acRspMsg, "单笔选号记录不存在" );
		else
			pubCrtRspInfo( "cmschoosereg", SQLCODE );
		ERRLOG
		goto Exit;
	}

	/* 检查记录是否有效 */
	if( cmschoosereg_validf[BIT1_LEN]!=SUCCESS_FLAG)
	{
		sprintf(g_acRspCode,"999999");
		sprintf(g_acRspMsg,"选号登记簿该记录已撤销");
		ERRLOG
		goto Exit;
	}

	/*修改记录为申请撤销*/
	cmschoosereg_validf[BIT1_LEN]= CANCEL_FALG;
	EXEC SQL	UPDATE cmschoosereg
				SET validf=:cmschoosereg_validf
				WHERE trandate=:cmschoosereg_trandate
				AND	  serseqno=:cmschoosereg_serseqno;
	if( SQLCODE )
	{
		sprintf(g_acRspCode,"CMS114");
		pubCrtRspInfo("cmschoosereg",SQLCODE);
		ERRLOG;
		goto Exit;
	}
	
	/*写子交易流水*/
	if( cmsApiInsTranLog( pstPubcom, &stCmsCardInfo, &stCmsAcctM, "制卡", "预制卡申请删除" ) )
	{
		ERRLOG
		goto Exit;
	}

	/* 子交易出口 */ 
	sprintf( g_acTrcMsg, "aplyteller[%s]aplynum[%ld]",stPcdReg.aplyteller,stPcdReg.aplynum);
	TRCLOG3;
	strpack(stPcdReg.aplyteller);
	sprintf( stPcdReg.svouno, "%.*ld", CARDSEQNO_LEN, cmschoosereg_cardseqno );
	setstring( "AplyTel",	stPcdReg.aplyteller		); /* 申请柜员 */
	setstring( "CardKind",	stPcdReg.cardkind  		); /* 卡片种类 */
	setstring( "CardNo",	cmschoosereg_cardno 	); /* 卡号     */
	setstring( "CardSeq",	stPcdReg.svouno  		); /* 卡顺序号 */
	setstring( "VouNo",		cmschoosereg_vouno  	); /* 卡凭证号 */
	
	strcpy( g_acTrcMsg, "子交易: 单张选号预制卡申请删除子交易结束.....");
	TRCLOG4;

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