cms018.sqc

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

/********************************************************************
 **   源码文件名称 : cms018.SQC
 **   所属子系统   : CMS 
 **   当前文件版本 : 4.0.0.0
 **   作者         : UCCB	ALEX
 **   版本创建日期 : 2004/10/11
 **   功能描述     : 卡作废检查子交易     
 **   修改记录     :
 **   修改人       修改日期     修改说明
 **   Feng         2006-01-16   凭证信息的输出
*********************************************************************/

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

#include "cmscode.h"
#include "cmscardinfo.h"
#include "cmscardkind.h"
#include "pubvouinfo.h"

EXEC SQL INCLUDE SQLCA;

int cmsCardCancelChkPro( PUBCOM *pstPubcom )
{
	/*定义局部变量*/
	char    acCheckFlag[BIT21_LEN][BIT11_LEN];  /*卡状态检查标志*/
	long	lNum;
	struct	cmscardinfo		stCardInfo;
	struct	cmscardkind		stCardKind;
	int		iRtn;

	strcpy( g_acTrcMsg, "子交易: 卡作废检查开始.." );
	TRCLOG4

	memset( &stCardInfo, 0x00, sizeof ( struct cmscardinfo ) ); 
	memset( &stCardKind, 0x00, sizeof ( struct cmscardkind ) ); 

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

    /* 获取卡片种类表 */
    iRtn = cmsApiGetCmsCardKind( stCardInfo.cardkind, &stCardKind );
    if ( iRtn )
    {
        ERRLOG
        return FAILED;
    }

	/*置卡状态检查标志*/
	acCheckFlag[BIT1_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT2_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT3_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT4_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT5_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT6_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT7_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT8_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT9_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT11_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT13_LEN][BIT1_LEN]=CHECK_YES;
	acCheckFlag[BIT14_LEN][BIT1_LEN]=CHECK_YES;

	/*检查主卡状态是否正常*/
	if( cmsApiChkCardStatIsNormal( &stCardInfo, acCheckFlag ) )
	{
		ERRLOG;
		goto Exit;
	}
	
	/*检查是否为待发卡卡状态*/
	if( cmsApiChkCardStatIsReadyOpen( &stCardInfo ) )
	{
		ERRLOG
		goto Exit;
	}

	/* 获取凭证名称 */
	pubInitPubvouinfo();
	strcpy( pubvouinfo_voukind, stCardInfo.voukind );
	EXEC SQL	SELECT	vouname 
				INTO	:pubvouinfo_vouname
				FROM	pubvouinfo
				WHERE	voukind = :pubvouinfo_voukind;
	if ( SQLCODE )
	{
		strcpy( g_acRspCode, "999996" );
		/* 数据库读错误 */
		pubCrtRspInfo( "pubvouinfo",SQLCODE );
		ERRLOG
		return FAILED;
	}
	strpack( pubvouinfo_vouname );

	/* 子交易出口 */ 
	lNum=1;
	setstring( "Flag"		, "1"						);
	setstring( "VouKind"	, stCardInfo.voukind		);
	/* Feng Modify in 2006-01-16 Begin */
	setstring( "Beginno"	, stCardInfo.vouno			);
	setstring( "Endno"		, stCardInfo.vouno			);
	setstring( "PreCharCode", stCardInfo.precharcode			);
	setstring( "VouType1"	, stCardKind.blankvoukind );/* 废卡凭证种类		*/
	setstring( "VouNo1"		, stCardInfo.vouno );		/* 废卡凭证号码		*/
	/* Feng Modify in 2006-01-16 End */
	setint	 ( "Num"		, &lNum						);
	setstring( "VouName"	, pubvouinfo_vouname  		);
	
	strcpy( g_acTrcMsg, "子交易: 卡作废检查结束.." );
	TRCLOG4

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