cardkind.sqc

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

/*******************************************************
 **   源码文件名称 : cardkind.SQC
 **   所属子系统   : 卡管理
 **   功能描述     : 对表cmscardkind的处理和检查
 **					及使用卡种检查的处理
 **   当前文件版本 : 4.0.0.0
 **   作        者 : UCCB   ALex 
 **   版本创建日期 : 2004/09/15
 **   修改记录     :
 **   修改人       修改日期     修改位置
*******************************************************/

#include "sysdefine.h"
#include "code.h"
#include "attrdef.h"
#include "pubcom.h"
#include "cmscode.h"

#include "cmscardkind.h"
#include "cmsckmidref.h"

EXEC SQL INCLUDE sqlca;

/*******************************************************
 **	  函数名称：cmsApiGetCmsCardKind
 **   功能描述：按卡片种类获取卡片种类表
 **   输入参数：
 **   			pcCardKind		----	卡片种类
 **   输出参数：
 **   			pstCmsCardKind	----	卡片种类表
 **   返回结果：int
*******************************************************/
int	cmsApiGetCmsCardKind( pcCardKind, pstCmsCardKind )
char				*	pcCardKind;			/* 卡片种类		*/
struct	cmscardkind	*	pstCmsCardKind;		/* 卡片种类表		*/
{
	sprintf( g_acTrcMsg, "cmsApiGetCmsCardKind begin " );
	TRCLOG2
	strcpy( pstCmsCardKind->cardkind,pcCardKind);

	/*取卡片种类表*/
	if(pubReadCmscardkind( pstCmsCardKind ))
	{
		if( SQLCODE == SQLNOTFOUND )
		{
			memset( g_acRspMsg, 0x00, sizeof( g_acRspMsg ) );
			sprintf( g_acRspMsg, "卡片种类[%s]不存在", pcCardKind );
		}
		ERRLOG
		return FAILED;
	}
	sprintf( g_acTrcMsg, "cmsApiGetCmsCardKind end " );
	TRCLOG2

	return SUCCESS;
}


/*******************************************************
 **	  函数名称：cmsApiChkIsSameCCY
 **   功能描述：按卡片种类获取卡片种类表币种，与交易输入的币种比较
 **   输入参数：
 **   			pstCmsCardKind	----	卡片种类表
 **   			pcCcy       	----	币种     
 **   输出参数：
 **   			
 **   涉及库表： 
 **   		 cmscardkind	
 **   返回结果：int   0  成功(相同)   -1 失败(不相同)
 **   作        者 : UCCB   ALex 
 **   版本创建日期 : 2004/09/18
 **   修改记录     :
 **   修改人       修改日期     修改位置
*******************************************************/
int	cmsApiChkIsSameCCY( pstCmsCardKind, pcCcy )
struct	cmscardkind	*	pstCmsCardKind;		/* 卡片种类表		*/
char				*	pcCcy;				/* 卡片种类		*/
{
	sprintf( g_acTrcMsg, "cmsApiChkIsSameCCY begin " );
	TRCLOG2
	/*比较币种*/
	if(strcmp( pstCmsCardKind->ccy, pcCcy ) !=0 )
	{
		sprintf(g_acRspCode,"CMS206");
		pubCrtRspInfo( pcCcy, pstCmsCardKind->ccy );
		ERRLOG;
		return FAILED;
	}

	sprintf( g_acTrcMsg, "cmsApiChkIsSameCCY end " );
	TRCLOG2
	return SUCCESS;
}



/*******************************************************
 **	  函数名称：cmsApiChkCardShop
 **   功能描述:  按卡片种类查询卡种商户对照表, 当存在记录,
 **				用输入进的商户代码与查询到的记录进行比较,
 **				没有匹配记录时返回失败,
 **				当用卡片种类查询卡种商户对照表没有符合的记录存在时,
 **				返回成功
 **
 **   输入参数：
 **   			pcCardKind		----	卡片种类
 **   			pcMid       	----	商户代码 
 **   输出参数：
 **   			
 **   涉及库表： 
 **   		 cmsckmidref	
 **   返回结果：int   0  成功   -1 失败
 **   作        者 : UCCB   ALex 
 **   版本创建日期 : 2004/09/18
 **   修改记录     :
 **   修改人       修改日期     修改位置
*******************************************************/
int	cmsApiChCardKindShop( pcCardKind, pcMid )
char                *	pcCardKind;			/* 卡片种类		*/
char				*	pcMid;				/* 商户代码		*/
{
	/*定义	局部变量*/
	struct	cmsckmidref		stCmsCkMidRef;
	sprintf( g_acTrcMsg, "cmsApiChCardKindShop begin " );
	TRCLOG2

	/*初始化结构*/
	memset( &stCmsCkMidRef, 0x00, sizeof( struct cmsckmidref ) );

	/*将输入参数赋值*/
	strcpy( stCmsCkMidRef.cardkind, pcCardKind );
	strcpy( stCmsCkMidRef.mid     , pcMid      );

	/*取卡种商户表记录*/
	pubStoVCmsckmidref( &stCmsCkMidRef );
	EXEC SQL	SELECT cardkind INTO :cmsckmidref_cardkind
				FROM cmsckmidref
				WHERE cardkind=:cmsckmidref_cardkind
				AND	mid=:cmsckmidref_mid;
	if( SQLCODE && SQLCODE != SQLNOTFOUND )
	{
		sprintf( g_acRspCode, "999996");
		pubCrtRspInfo( "cmsckmidref", SQLCODE ); 
		ERRLOG;
		return FAILED;
	}
	if( SQLCODE == SQLNOTFOUND )
	{
		sprintf( g_acTrcMsg, "卡种商户表中无此记录,cardkind[%s]mid[%s]",pcCardKind,pcMid);
		TRCLOG2
		sprintf( g_acRspCode, "CMS1E6");
		pubCrtRspInfo( pcCardKind, pcMid );
		ERRLOG;
		return FAILED;
	}

	sprintf( g_acTrcMsg, "cmsApiChCardKindShop end " );
	TRCLOG2
	return SUCCESS;
}