cms611.sqc

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

/********************************************************************
 **   源码文件名称 : cms611.SQC
 **   所属子系统   : CMS 
 **   当前文件版本 : 1.0.0.0
 **   作        者 : XL 
 **   版本创建日期 : 2004/10/19
 **   功能描述     : 卡片交易限额查询
 **   修改记录     :
 **   修改人       修改日期     修改日期
*********************************************************************/
#include    "sysdefine.h"
#include    <stdio.h>
#include	"pubcom.h"
#include	"funcapi.h"

#include    "code.h"
#include    "attrdef.h"
#include    "cmscode.h"
#include    "cmscardinfo.h"

#include	"cmstlimt.h"

EXEC SQL INCLUDE SQLCA;

/*******************************************************
**   函数名称: cms216011
**   功能描述：卡片交易限额查询
**   输入参数：
**            acCardNo       ----  卡号
**            acTrandevType  ----  业务发生地类型
**   输出参数:
**     acCardNo      ----  卡号           acTrandevType ----  业务发生地类型
**     acCCY         ----  币种           acperiod      ----  周期长度
**     accashlimitamt----  本周期取现限额 acdepolimitamt ---- 本周期存款限额收进
机构码
**     acconlimitamt ----  本周期消费限额 actranoutlimitamt ----本周期转出限额
**     accashlimittime ----本周期取现次数 acdepolimittime ----本周期存款次数
**     acconlimittime ---- 本周期消费次数 actranoutlimittime ----本周期转出次数
**   返回结果: 
**   作        者 : XL 
**   版本创建日期 : 2004/10/19
**   修改记录     :
**   修改人       修改日期     修改位置
*******************************************************/
int cms216011(pstPubcom)
struct          pubcom          *pstPubcom;
{
	EXEC SQL BEGIN DECLARE SECTION;
	EXEC SQL END DECLARE SECTION;
	FILE	*fp;							          /* 文件指针  	  */
	char    acCardNo[ CARDNO_LEN + 1 ];               /* 卡号   */
	char    acTrandevType[ CHANNELID_LEN + 1 ];       /* 业务发生地类型 */

    char    acTableName[PRDCODE_LEN + 1];             /* 表名称 */
	char    acFileName[FILENAME_LEN + 1];             /* 文件名称 */ 

	char    acSelStr[ CONDITION_LEN + 1 ];
    char    acWhrStr[ CONDITION_LEN + 1 ];

	struct cmstlimt	   stCmstlimt;	               /* 卡片交易限额登记簿 */

	sprintf( g_acTrcMsg,"卡片交易限额查询开始");
	TRCLOG4

	memset( acCardNo,      0x00, sizeof( acCardNo ) );
	memset( acTrandevType, 0x00, sizeof( acTrandevType ) );

    memset( acFileName,0x00,   sizeof( acFileName ) );
	memset( acTableName,0x00,   sizeof( acTableName ) );

	memset( acSelStr,0x00, sizeof( acSelStr ) );
	memset( acWhrStr,0x00, sizeof( acWhrStr ) );
	memset( &stCmstlimt,0x00, sizeof( struct cmstlimt ) );

    /* 取数据字典 */
    getstring( "CardNo", acCardNo );
    getstring( "TranDevType", acTrandevType );

    sprintf( g_acTrcMsg,"CardNo[%s]TranDevType[%s]",acCardNo,acTrandevType);
	TRCLOG3
   
    if(GenSqlCmd( "216011" , acSelStr ) )
	{	
		ERRLOG		
		goto Exit;	
	}
   
	sprintf( acWhrStr, " where 1=1");

	if ( strlen ( acCardNo ) > 0 )
	{
		sprintf( acWhrStr+strlen(acWhrStr), " and cardno = '%s'", acCardNo );
	}

	if ( strlen ( acTrandevType ) > 0 )
	{
		sprintf( acWhrStr+strlen(acWhrStr), " and trandevtype = '%s'", acTrandevType );
	}

    strcpy( acTableName, "cms611" );
	sprintf(acFileName, "%s%s%s", acTableName, pstPubcom->acBrc,pstPubcom->acTeller); 

	fp = (FILE *)BeginFile( pstPubcom, acFileName );
	if ( fp == NULL )
	{
		strcpy( g_acRspMsg, "打开文件句柄出错!" );
		pubCrtRspInfo( );
		ERRLOG
		goto Exit;
	}

    /*组织查询字典*/
	if(GetInqDict( fp , "216011" ) )
	{	
		ERRLOG		
		goto Exit;	
	}

	/* 准备数据 */
	sprintf( g_acTrcMsg, "%s%s" ,acSelStr,acWhrStr);
	TRCLOG3	
	if ( DBSelect( "cmstlimt", acSelStr ,acWhrStr , fp ) )	
	{	
		ERRLOG		
		goto Exit;	
	}
	if ( strlen ( acCardNo ) > 0 )
	{
		pubInitCmstlimt();
		strcpy( cmstlimt_cardno, acCardNo );
		EXEC SQL	SELECT	*
					INTO	R_CMSTLIMT
					FROM	cmstlimt
					WHERE	cardno = :cmstlimt_cardno;
		if ( SQLCODE == SQLNOTFOUND )
		{
			strcpy( g_acRspCode, "pub400" );
        	sprintf( g_acRspMsg, "无相应记录可修改" );
		}
		if ( strlen ( acTrandevType ) > 0 )
		{
			pubInitCmstlimt();
			strcpy( cmstlimt_cardno, acCardNo );
			strcpy( cmstlimt_trandevtype, acTrandevType );
			EXEC SQL	SELECT	*
						INTO	R_CMSTLIMT
						FROM	cmstlimt
						WHERE	cardno = :cmstlimt_cardno
						AND		trandevtype = :cmstlimt_trandevtype;
			if ( SQLCODE == SQLNOTFOUND )
			{
				strcpy( g_acRspCode, "pub400" );
       		 	sprintf( g_acRspMsg, "无相应记录可修改" );
			}
		}
	}
    /* 出口赋值 */ 
Exit:
	EndFile( fp );

	if( !strcmp( g_acRspCode, RSP_OK ) )
	{
		SetInqFormid(pstPubcom, "216011") ; 
        sprintf( g_acTrcMsg,"卡片交易限额查询正常结束");
		TRCLOG4
		return SUCCESS;
    }
	else 
	{
		sprintf( g_acTrcMsg,"卡片交易限额查询失败");
		TRCLOG4
		return FAILED ;
    }
}