tbcms005.sqc

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

/*
** 注    意: 此文件由平台自动生成，禁止任何人以任何方式修改!
** 生成日期: 2004-9-1
** 版 本 号: V1.0.0
** 初始作者: ShiBin Hu
*/

#include	"sysdefine.h"
#include	"code.h"
#include	"attrdef.h"
#include	"revglob.h"
EXEC SQL INCLUDE sqlca;

EXEC SQL BEGIN DECLARE SECTION ;
	char cmsglob_num[4];
	short cmsglob_num_id;
	char cmsglob_val[101];
	short cmsglob_val_id;
	char cmsglob_note[41];
	short cmsglob_note_id;
EXEC SQL END DECLARE SECTION ;

#define RR_CMSGLOB \
		:cmsglob_num:cmsglob_num_id, \
		:cmsglob_val:cmsglob_val_id, \
		:cmsglob_note:cmsglob_note_id

#define UU_CMSGLOB \
		num, \
		val, \
		note

#define WW_CMSGLOB \
		:cmsglob_num, \
		:cmsglob_val, \
		:cmsglob_note

struct cmsglob
{
	char	num[4];
	char	val[101];
	char	note[41];
};

void pubInitCmsglob()
{
	memset( cmsglob_num, 0x00, sizeof( cmsglob_num ) ) ;
	cmsglob_num_id = 0 ;
	memset( cmsglob_val, 0x00, sizeof( cmsglob_val ) ) ;
	cmsglob_val_id = 0 ;
	memset( cmsglob_note, 0x00, sizeof( cmsglob_note ) ) ;
	cmsglob_note_id = 0 ;
}

void pubStoVCmsglob( struct cmsglob * pstCmsglob )
{
	pubInitCmsglob();
	if( !strlen( pstCmsglob->num ) )
		strcpy( pstCmsglob->num, " " );
	strcpy( cmsglob_num, pstCmsglob->num );
	if( !strlen( pstCmsglob->val ) )
		strcpy( pstCmsglob->val, " " );
	strcpy( cmsglob_val, pstCmsglob->val );
	if( !strlen( pstCmsglob->note ) )
		strcpy( pstCmsglob->note, " " );
	strcpy( cmsglob_note, pstCmsglob->note );
}

void pubVtoSCmsglob( struct cmsglob * pstCmsglob )
{
	strcpy( pstCmsglob->num, cmsglob_num );
	strpack( pstCmsglob->num );
	strcpy( pstCmsglob->val, cmsglob_val );
	strpack( pstCmsglob->val );
	strcpy( pstCmsglob->note, cmsglob_note );
	strpack( pstCmsglob->note );
}

int pubReadCmsglob( struct cmsglob * pstCmsglob )
{
	pubInitCmsglob();
	pubStoVCmsglob(pstCmsglob);
	EXEC SQL SELECT * INTO RR_CMSGLOB 
		FROM cmsglob  
		WHERE  
		 num = :cmsglob_num  
		 ; 
	if ( SQLCODE ) 
	{ 
		strcpy( g_acRspCode, "999996" ); 
		/* 数据库读错误 */ 
		pubCrtRspInfo( "cmsglob",SQLCODE ); 
		pubErrLog( __LINE__, __FILE__, g_acRspMsg ); 
		return -1; 
	}; 
	pubVtoSCmsglob(pstCmsglob);
	return 0; 
} 
 
int pubModiCmsglob( struct cmsglob * pstCmsglob )
{
	pubInitCmsglob();
	pubStoVCmsglob(pstCmsglob);
	EXEC SQL UPDATE cmsglob 
		SET ( UU_CMSGLOB ) = ( WW_CMSGLOB ) 
		WHERE  
		 num = :cmsglob_num  
		 ; 
	if ( SQLCODE ) 
	{ 
		strcpy( g_acRspCode, "999997" ); 
		/* 数据库更新错误 */ 
		pubCrtRspInfo( "cmsglob",SQLCODE ); 
		pubErrLog( __LINE__, __FILE__, g_acRspMsg ); 
		return -1; 
	}; 
	return 0; 
}
  
int pubInstCmsglob( struct cmsglob * pstCmsglob )
{
	pubInitCmsglob();
	pubStoVCmsglob(pstCmsglob);
	EXEC SQL INSERT INTO cmsglob VALUES ( RR_CMSGLOB ) ;
	if ( SQLCODE ) 
	{ 
		strcpy( g_acRspCode, "999998" ); 
		/* 数据库插入错误 */ 
		pubCrtRspInfo( "cmsglob",SQLCODE ); 
		pubErrLog( __LINE__, __FILE__, g_acRspMsg ); 
		return -1; 
	}; 
	return 0; 
}