int F847123(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret=0;
int card_id=0;
char sSeedKey[17] = ""; //种子密钥
char sPwd[7] = ""; //卡密码
char logicdate[11]="";
char sysdate[11]="";
char systime[9]="";
double dSerialno=0;
T_t_pif_card tCard;
T_t_cif_customer tCustomer;
T_t_pif_spefee tSpeFee;
T_t_aif_account tAccount;
T_t_tif_tradeserial tTradeserial;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
memset(&tCard,0,sizeof(tCard));
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tSpeFee,0,sizeof(tSpeFee));
memset(&tAccount,0,sizeof(tAccount));
memset(&tTradeserial,0,sizeof(tTradeserial));
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_LVOL0,F_LVOL1,F_LVOL10,F_LVOL5,
F_SCUST_NO, F_SCUST_NO2,F_SCUST_AUTH,F_SCUST_AUTH2,
F_SDATE0,F_SNAME,F_SNAME2,
F_SOPEN_EMP,F_SSTATUS0,
F_DAMT2,F_LSERIAL1,F_VSMESS,0);
card_id=rPack->lvol0;
if(card_id<1)
{
*pRetCode=E_INPUT_CARDNO;
goto L_RETU;
}
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
//判断卡状态是否为写卡未成功状态
ret=DB_t_pif_card_read_lock_by_cur_and_card_id(card_id, &tCard);
if(ret)
{
writelog(LOG_ERR,"card_id[%d]",card_id);
if(DB_NOTFOUND==ret)
*pRetCode= E_CARDNO_NOT_EXIST;
else
*pRetCode= E_DB_CARD_R;
goto L_RETU;
}
if(card_id!=tCard.card_id)
{
writelog(LOG_ERR,"card_id[%d] db card_id[%d]",card_id,tCard.card_id);
DB_t_pif_card_free_lock_by_cur();
*pRetCode=E_DB_CARD_R;
goto L_RETU;
}
if('3'!=tCard.state_id[CARDSTAT_TYPE_REG])
{
DB_t_pif_card_free_lock_by_cur();
if('2'==tCard.state_id[CARDSTAT_TYPE_REG])
*pRetCode=E_CARDNO_LOGOUT;
else if(STATE_TRUE==tCard.state_id[CARDSTAT_TYPE_LOST])
*pRetCode=E_CARDNO_LOST;
else if(STATE_TRUE==tCard.state_id[CARDSTAT_TYPE_FREEZE])
*pRetCode=E_CARDNO_FREEZE;
else if(STATE_TRUE==tCard.state_id[CARDSTAT_TYPE_WFAIL])
*pRetCode=E_CARDNO_WFAIL;
else if(STATE_TRUE==tCard.state_id[CARDSTAT_TYPE_REG])
*pRetCode=E_OLDCARDINFO_NOSAVE;
goto L_RETU;
}
trim(rPack->sbank_acc);
trim(rPack->scust_no);
trim(rPack->sdate0);
if(strlen(rPack->scust_no))
{
ret=IsExistShowCardNo(rPack->scust_no);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
}
if(strcmp(tCard.physical_no,rPack->sbank_acc)!=0)
{
ret=IsExistCardByPhyCardNo(rPack->sbank_acc);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
}
ret=IsInvalidDateTime(rPack->sdate0,"YYYYMMDD");
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
des2src(tCard.physical_no, rPack->sbank_acc); //物理卡号
des2src(tCard.showid,rPack->scust_no); //显示卡号
des2src(tCard.end_time,rPack->sdate0); //到期日期
ret=DB_t_pif_card_update_lock_by_cur(&tCard);
if(ret)
{
writelog(LOG_ERR,"card_id[%d]",card_id);
if(DB_NOTFOUND==ret)
*pRetCode= E_CARDNO_NOT_EXIST;
else
*pRetCode= E_DB_CARD_U;
goto L_RETU;
}
DB_t_pif_card_free_lock_by_cur();
memcpy(sSeedKey,STATIC_SEED_KEY,16); //读种子密钥
EncodePwd(sSeedKey,sPwd,tCard.password,1); //卡密码
//注销帐户
ret=DB_t_aif_account_read_by_card_id_and_purse_id(card_id,PURSE_NO_ONE, &tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_read_by_card_id_and_purse_id ret[%d]card_id[%d]",ret,card_id);
if(DB_NOTFOUND==ret)
*pRetCode= E_ACTNO_NOT_EXIST;
else
*pRetCode= E_DB_ACCOUNT_R;
goto L_RETU;
}
if(tAccount.consume_count<1)
{
*pRetCode=E_CARD_TXCNT;
goto L_RETU;
}
if(amtcmp(tAccount.card_balance,0)<0)
{
*pRetCode=E_CARD_BALA;
goto L_RETU;
}
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(tCard.cosumer_id, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",tCard.cosumer_id);
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_R;
goto L_RETU;
}
//得到收费类别
if(tCustomer.fee_type<1)
{
ret=DB_t_pif_spefee_read_by_dept_code_and_cut_type(tCustomer.classdept_no, tCustomer.cut_type,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.fee_type=tCustomer.cut_type;
}
else
{
DB_t_cif_customer_free_lock_cur();
*pRetCode=E_DB_SPEFEE_R;
goto L_RETU;
}
}
else
{
tCustomer.fee_type=tSpeFee.fee_type;
}
//更新客户表的收费类别字段
ret=DB_t_cif_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_U;
goto L_RETU;
}
}
DB_t_cif_customer_free_lock_cur();
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&dSerialno); //获得流水号
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR,"ret [%d]",ret);
goto L_RETU;
}
tTradeserial.serial_no = (int)dSerialno; //流水号
tTradeserial.other_seri_no = 0; //上传端流水号
tTradeserial.serial_type = 847123; //交易代码；备注：发卡+充值 用一个交易码，即847101； 发卡（不充值）另用一个交易码，即新的发卡程序文件名，从而区分发卡充值与发卡不充值的卡操作信息。
tTradeserial.serial_state = SERISTAT_DEBT; //流水状态
des2src(tTradeserial.operate_date,sysdate); //发生日期
des2src(tTradeserial.operate_time,systime); //发生时间
des2src(tTradeserial.collect_date,sysdate); //采集日期
des2src(tTradeserial.collect_time,systime); //采集时间
des2src(tTradeserial.enteract_date,logicdate); //处理日期
des2src(tTradeserial.enteract_time,systime); //处理时间
des2src(tTradeserial.oper_code , rPack->scust_limit);
tTradeserial.maindevice_id = rPack->lvol6; //上传工作站标识
tTradeserial.device_id = rPack->lvol7; //采集设备标识
tTradeserial.card_id = tCard.card_id; //卡号
des2src(tTradeserial.showid,tCard.showid); //显示卡号
tTradeserial.purse_id = PURSE_NO_ONE; //钱包号
tTradeserial.customer_id = tCard.cosumer_id; //客户标识
//插入交易流水表
ret = DB_t_tif_tradeserial_add(&tTradeserial);
if (ret)
{
writelog(LOG_ERR,"ret[%d]",ret);
if(DB_REPEAT==ret)
*pRetCode = E_DB_TRADESERIAL_E;
else
*pRetCode = E_DB_TRADESERIAL_I;
goto L_RETU;
}
out_pack->lvol0 = card_id; //交易卡号
out_pack->lvol1 = tCustomer.cut_type; //客户类别
out_pack->lvol5 = tCustomer.fee_type; //收费类别
des2src(out_pack->scust_no,tCard.showid); //显示卡号
des2src(out_pack->scust_no2,tCustomer.classdept_no); //部门号
des2src(out_pack->scust_auth,tCustomer.stuemp_no); //学号
des2src(out_pack->scust_auth2,tCustomer.man_id); //身份证号
des2src(out_pack->sname,tCustomer.cut_name); //客户姓名
des2src(out_pack->sname2,tCustomer.lib_cardid); //图书证号
des2src(out_pack->sstatus0,tCustomer.sex); //性别
des2src(out_pack->sopen_emp,sPwd); //卡密码
des2src(out_pack->sdate0,tCard.end_time); //有效截至日期
out_pack->damt2=D4U5(tAccount.card_balance,2); //卡余额
out_pack->lvol10=tAccount.consume_count; //消费次数
out_pack->lserial1=tTradeserial.serial_no; //流水号
sprintf(out_pack->vsmess,"流水号:%d 卡号:%d 学工号:%s 姓名:%s 卡余额:%.2lf元",tTradeserial.serial_no,card_id,tCustomer.stuemp_no,tCustomer.cut_name,tAccount.card_balance);
writelog(LOG_DEBUG,out_pack->vsmess);
// add by 汤成 2005-8-8
// 增加向名单表写入记录
ret = InsertToBlkList(card_id,CHCARD_BLACKLIST);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F847124(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int hi_cutid = 0; //客户ID
int hi_cuttype = 0; //客户类型
int i=0;
int ret = 0;
int len = 0;
char h_showcardid[11] = ""; //显示卡号
char h_password[7] = ""; //卡密码
double h_temp_Card_id = 0; //卡号
char seed_key[17] = ""; //种子密钥
char card_endtime[8 + 1] = ""; //卡的有效截至日期
char logicdate[11]=""; //业务日期
char sysdate[11]="";
char systime[9]="";
char sMsg[256]="";
char sMaxCardBalance[20]="";
double dMaxCardBalance=0;
int type=0; //充值类型
T_t_pif_card tCard;
T_t_cif_customer tCustomer;
T_t_aif_account tAccount;
T_t_tif_tradeserial tradeserial;
T_t_tif_savdtl tSavdtl;
T_t_pif_spefee tSpeFee;
int custid = 0;
double paymoney = 0;
T_tab_card_info tCardInf;
double h_temp_Serial_no = 0;
InAcc IA;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
memset(&IA,0,sizeof(IA));
memset(&tCard, 0, sizeof(tCard));
memset(&tAccount,0,sizeof(tAccount));
memset(&tradeserial,0,sizeof(tradeserial));
memset(&tSpeFee,0,sizeof(tSpeFee));
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tSavdtl,0,sizeof(tSavdtl));
#ifdef DEBUG
writelog(LOG_DEBUG,"rPack->scust_auth2[%s]",rPack->scust_auth2);
#endif
ResetNormalCPack(&aPack,0,1);
SetCol(handle,F_LVOL0,F_LVOL1,F_LVOL5,
F_SCUST_NO, F_SCUST_NO2,F_SCUST_AUTH,F_SCUST_AUTH2,
F_SDATE0,F_SNAME,F_SNAME2,
F_SOPEN_EMP,F_SSTATUS0,
F_DAMT2,F_LSERIAL1,F_VSMESS,0);
hi_cutid = rPack->lvol0; //客户ID
hi_cuttype = rPack->lvol3; //客户类别
des2src(h_showcardid,rPack->scust_no); //显示卡号
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
//检查客户信息，判断是否可以发行卡
des2src(tCard.physical_no, rPack->sbank_acc); //物理卡号
trim(h_showcardid);
if(strlen(h_showcardid))
{
ret=IsExistShowCardNo(h_showcardid);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
}
ret=IsExistCardByPhyCardNo(tCard.physical_no);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
memset(&tCardInf,0,sizeof tCardInf);
ret = queryCustidAndExpTime(tCard.physical_no,CARDINF_NEW_STATE,&custid,&tCardInf);
if(ret)
{
writelog(LOG_DEBUG,"卡信息未找到 ");
*pRetCode = ret;
goto L_RETU;
}
if(custid <= 0)
{
*pRetCode = E_DB_CUSTOMER_N;
goto L_RETU;
}
hi_cutid = custid;
// TODO: 设置金额
paymoney = tCardInf.fee;
ret=IsExistCardByCustomId(hi_cutid);
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(hi_cutid, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",hi_cutid);
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_R;
goto L_RETU;
}
//得到收费类别
if(tCustomer.fee_type<1)
{
ret=DB_t_pif_spefee_read_by_dept_code_and_cut_type(tCustomer.classdept_no, tCustomer.cut_type,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.fee_type=tCustomer.cut_type;
}
else
{
DB_t_cif_customer_free_lock_cur();
*pRetCode=E_DB_SPEFEE_R;
goto L_RETU;
}
}
else
{
tCustomer.fee_type=tSpeFee.fee_type;
}
//更新客户表的收费类别字段
ret=DB_t_cif_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_U;
goto L_RETU;
}
}
DB_t_cif_customer_free_lock_cur();
tradeserial.trade_fee =rPack->damt0;
//检查金额是否超过最大额度
ret=GetParameter(GLOBE_MAXCARDBALANCE,sMaxCardBalance);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
dMaxCardBalance=atof(sMaxCardBalance);
if(amtcmp(tradeserial.trade_fee,dMaxCardBalance)>0)
{
writelog(LOG_ERR,"tradeserial.trade_fee[%lf]",tradeserial.trade_fee);
*pRetCode=E_AMT_EXCEED_MAX;
goto L_RETU;
}
// 准备数据插入卡信息表
memcpy(seed_key,STATIC_SEED_KEY,sizeof(seed_key)); //读种子密钥
ret=IsInvalidDateTime(rPack->sdate0,"YYYYMMDD");
if(ret)
{
*pRetCode = E_INPUT_DATE;
goto L_RETU;
}
if(strncmp(rPack->sdate0,sysdate,8)<=0)
{
*pRetCode=E_INPUT_DATE;
goto L_RETU;
}
des2src(card_endtime,rPack->sdate0);
/*
ret = GetCardValiddate(hi_cuttype,logicdate,card_endtime); //计算卡的有效期
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
*/
// 默认密码, 初始取身份证的后6位, 没有身份证号用666666.
trim(rPack->sname2);
len=strlen(rPack->sname2) ;
CheckPwdChar(rPack->sname,h_password);
/*
if (len >= 6)
{
strncpy(h_password,&(rPack->sname2[len-6]),6);
if(h_password[5]>'9'||h_password[5]<'0')
h_password[5]='0';
}
else
{
strcpy(h_password,"666666");
}
*/
ret = getNewUniqNo(KEYTYPE_CARD_ID,&h_temp_Card_id); //获取最大卡号
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
tCard.card_id = (int)h_temp_Card_id; //卡号
des2src(tCard.showid,h_showcardid); //显示卡号
des2src(tCard.is_main,TYPE_YES); //是否为主卡
des2src(tCard.state_id,CARDSTAT_REG); //卡状态
tCard.type_id = CT_TEMP_NAME; //卡类别
EncodePwd(seed_key,h_password,tCard.password,0); //卡密码
tCard.cosumer_id = hi_cutid; //客户标识
tCard.account_count = ACCOUNT_COUNT_ONE; //卡对应帐户个数
des2src(tCard.begin_time,logicdate); //注册时间
des2src(tCard.end_time, card_endtime); //截至时间
tCard.phytype = PHYTYPE_NO_ONE; //设备物理型号;默认为1
// 插入卡信息
ret = DB_t_pif_card_add(&tCard);
if (ret)
{
if(DB_REPEAT==ret)
*pRetCode = E_DB_CARD_E;
else
*pRetCode = E_DB_CARD_I;
goto L_RETU;
}
// 准备数据插入帐户信息表
ret = getNewActno(tAccount.account_id); //获得最大帐号
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
des2src(tAccount.open_date,sysdate); //开户时间
des2src(tAccount.open_time,systime);
tAccount.current_state = ACCOUNTSTAT_REGIST; //当前状态
tAccount.act_type = ACCTYPE_PERMAIN; //帐号类别
tAccount.customer_id = rPack->lvol0; //客户号
des2src(tAccount.cut_name,rPack->sname); //客户名称
tAccount.cut_type = hi_cuttype; //客户类别
des2src(tAccount.stuemp_no,rPack->scust_auth2); //客户学号或员工号
tAccount.card_id = tCard.card_id; //关联卡号
tAccount.purse_id = PURSE_NO_ONE; //关联卡钱包号
tAccount.card_type = CT_NORMAL; //卡类别
des2src(tAccount.subno,SUBJECT_INDIVIDUALSAVING); //所属科目
des2src(tAccount.isautotra,TYPE_NO); //是否自动转帐
// 插入帐户信息表
ret = DB_t_aif_account_add(&tAccount);
if (ret)
{
writelog(LOG_ERR,"ret [%d]",ret);
if(DB_REPEAT==ret)
*pRetCode = E_DB_ACCOUNT_E;
else
*pRetCode = E_DB_ACCOUNT_I;
goto L_RETU;
}
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&h_temp_Serial_no); //获得最大流水号
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR,"ret [%d]",ret);
goto L_RETU;
}
tradeserial.serial_no = (int)h_temp_Serial_no; //流水号
tradeserial.other_seri_no = 0; //上传端流水号
tradeserial.serial_type=TXCODE_CARD_OPEN_TMP_CASH; //交易码
tradeserial.serial_state = SERISTAT_DEBT; //流水状态
des2src(tradeserial.operate_date,sysdate); //发生日期
des2src(tradeserial.operate_time,systime); //发生时间
des2src(tradeserial.collect_date,sysdate); //采集日期
des2src(tradeserial.collect_time,systime); //采集时间
des2src(tradeserial.enteract_date,logicdate); //处理日期
des2src(tradeserial.enteract_time,systime); //处理时间
tradeserial.maindevice_id = rPack->lvol6; //上传工作站标识
tradeserial.device_id = rPack->lvol7; //采集设备标识
tradeserial.card_id = tCard.card_id; //卡号
des2src(tradeserial.showid,tCard.showid); //显示卡号
tradeserial.purse_id = PURSE_NO_ONE; //钱包号
tradeserial.customer_id = hi_cutid; //客户标识
des2src(tradeserial.oper_code , rPack->scust_limit); //操作员代码
tradeserial.sys_id = 0; //外部系统标识
tradeserial.trade_count=1; //当前卡交易次数
type=rPack->lvol4; //交易类型
IA.dArrInAmt[0]=tradeserial.trade_fee;
IA.dArrInAmt[1]=paymoney;
switch(type)
{
case TYPE_CASH: //现金
IA.iArrInFeeSwitch[1]=1;
break;
case TYPE_BILL: //支票
IA.iArrInFeeSwitch[2]=1;
break;
case TYPE_FUNDBOOK: //经费本
IA.iArrInFeeSwitch[3]=1;
break;
default:
*pRetCode=E_INPUT_DEPOSIT_TYPE;
goto L_RETU;
}
switch(type)
{
case TYPE_CASH: //现金
break;
case TYPE_BILL: //支票
case TYPE_FUNDBOOK: //经费本
tSavdtl.amount=rPack->damt0; //发生额
if(amtcmp(tSavdtl.amount,0)<=0)
break;
des2src(tSavdtl.bill_no,rPack->sphone); //票据号码
if(strlen(tSavdtl.bill_no)<1)
{
*pRetCode=E_INPUT_BILLNO;
goto L_RETU;
}
tSavdtl.card_no=tCard.card_id; //卡号
des2src(tSavdtl.oper_no,rPack->scust_limit); //操作员
tSavdtl.seqno=tradeserial.serial_no; //流水号
des2src(tSavdtl.tx_date,logicdate); //发生日期
des2src(tSavdtl.tx_time,systime); //发生时间
tSavdtl.cnt=1; //票据数量
tSavdtl.bill_type=type; //票据类型
tSavdtl.tx_code=tradeserial.serial_type; //交易码
ret=DB_t_tif_savdtl_add(&tSavdtl);
if(ret)
{
if(DB_REPEAT==ret)
*pRetCode = E_DB_SAVDTL_E;
else
*pRetCode = E_DB_SAVDTL_I;
goto L_RETU;
}
break;
default:
*pRetCode=E_TXCODE_NOT_EXIST;
goto L_RETU;
}
des2src(IA.sArrInActno[0],tAccount.account_id); //帐户
IA.iCardNo=tCard.card_id;
IA.iFeeType=tCustomer.fee_type;
//调用入账子模块
ret=process(&IA,&tradeserial);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"process ret[%d]",ret);
goto L_RETU;
}
sprintf(out_pack->vsmess,"流水号:%d 卡号:%d ",IA.iSerialNo,IA.iCardNo);
for(i=1;i<=IA.iOutTxTypeCnt;i++)
{
switch(IA.iArrOutTxType[i])
{
case TXTYPE_TOLL_DEPOSIT:
case TXTYPE_TOLL_DEPOSIT_BILL:
case TXTYPE_TOLL_DEPOSIT_FUNDBOOK:
case TXTYPE_DEDUCT_DEPOSIT:
case TXTYPE_RETURN_DEPOSIT:
tradeserial.deposit_fee=IA.dArrOutAmt[i];
break;
case TXTYPE_PRE_TOLL_BOARD:
case TXTYPE_PRE_TOLL_BOARD_BILL:
case TXTYPE_PRE_TOLL_BOARD_FUNDBOOK:
case TXTYPE_TOLL_BOARD:
case TXTYPE_DEDUCT_BOARD:
case TXTYPE_RETURN_BOARD:
case TXTYPE_RETURN_BOARD_BILL:
case TXTYPE_RETURN_BOARD_FUNDBOOK:
tradeserial.boardfee=IA.dArrOutAmt[i];
break;
case TXTYPE_TOLL_CHARGE:
case TXTYPE_TOLL_CHARGE_BILL:
case TXTYPE_TOLL_CHARGE_FUNDBOOK:
tradeserial.in_fee=IA.dArrOutAmt[i];
break;
case TXTYPE_TOLL_CARDCOST:
case TXTYPE_TOLL_CARDCOST_BILL:
case TXTYPE_TOLL_CARDCOST_FUNDBOOK:
tradeserial.cost_fee=IA.dArrOutAmt[i];
break;
default:
break;
}
if(amtcmp(IA.dArrOutAmt[i],0)!=0)
{
sprintf(sMsg,"%s:%.2lf元 ",IA.sArrOutTxName[i],IA.dArrOutAmt[i]);
strcat(out_pack->vsmess,sMsg);
}
}
sprintf(sMsg,"卡当前余额:%.2lf元",tradeserial.out_balance);
strcat(out_pack->vsmess,sMsg);
writelog(LOG_DEBUG,out_pack->vsmess);
// 插入交易流水表
ret = DB_t_tif_tradeserial_add(&tradeserial);
if (ret)
{
writelog(LOG_ERR,"ret[%d]",ret);
if(DB_REPEAT==ret)
*pRetCode = E_DB_TRADESERIAL_E;
else
*pRetCode = E_DB_TRADESERIAL_I;
goto L_RETU;
}
if(amtcmp(tradeserial.out_balance,0)<0)
{
*pRetCode=E_ENTER_ACCOUNT;
goto L_RETU;
}
// 返回卡号\密码\显示卡号\客户类型\图书证号\有效截至日期
out_pack->lvol0 = (int)h_temp_Card_id; //交易卡号
out_pack->lvol1 = tCustomer.cut_type; //客户类别
out_pack->lvol5 = tCustomer.fee_type; //收费类别
des2src(out_pack->scust_no,h_showcardid); //显示卡号
des2src(out_pack->scust_no2,tCustomer.classdept_no); //部门号
des2src(out_pack->scust_auth,tCustomer.stuemp_no); //学号
des2src(out_pack->scust_auth2,tCustomer.man_id); //身份证号
des2src(out_pack->sname,tCustomer.cut_name); //客户姓名
des2src(out_pack->sname2,tCustomer.lib_cardid); //图书证号
des2src(out_pack->sstatus0,tCustomer.sex); //性别
des2src(out_pack->sopen_emp,h_password); //卡密码
des2src(out_pack->sdate0,card_endtime); //有效截至日期
out_pack->damt2=tradeserial.out_balance; //出卡值
out_pack->lserial1=tradeserial.serial_no; //流水号
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
static int process(ST_PACK *rPack,InAcc *IA,T_t_tif_tradeserial *p)
{
int ret =0;
int *ptype=NULL;
double dSerialNo=0;
int upd_flag=0;
T_t_aif_account tAccount;
T_t_cif_customer tCustomer;
T_t_pif_card tCard;
T_t_pif_spefee tSpeFee;
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tAccount,0,sizeof(tAccount));
memset(&tCard,0,sizeof(tCard));
memset(&tSpeFee,0,sizeof(tSpeFee));
//注销原卡
ret=DB_t_pif_card_read_lock_by_cur_and_card_id(p->card_id, &tCard);
if(ret)
{
if(DB_NOTFOUND==ret)
return E_CARDNO_NOT_EXIST;
else
return E_DB_CARD_R;
}
if(p->card_id!=tCard.card_id)
{
DB_t_pif_card_free_lock_by_cur();
writelog(LOG_ERR,"card_id[%d] db card_id[%d]",p->card_id,tCard.card_id);
return E_DB_CARD_R;
}
p->deposit_fee =tCard.deposit_fee; //押金
// tCard.deposit_fee=0;
des2src(tCard.state_id,CARDSTAT_LOGOUT); //注销
des2src(tCard.end_time,p->operate_date); //注销日期
ret=DB_t_pif_card_update_lock_by_cur(&tCard);
if(ret)
{
writelog(LOG_ERR,"card_id[%d]",tCard.card_id);
return E_DB_CARD_U;
}
DB_t_pif_card_free_lock_by_cur();
//如果是非记名临时卡则注销客户
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(tCard.cosumer_id,&tCustomer);
if(ret)
{
writelog(LOG_ERR,"cosumer_id[%d]",tCard.cosumer_id);
if(DB_NOTFOUND==ret)
return E_CUSTOMER_NOT_EXIST;
else
return E_DB_CUSTOMER_R;
}
if(CT_TEMP_NONAME==tCard.type_id)
{
tCustomer.cut_state=CUSTSTAT_LOGOUT; //注销
upd_flag=1;
}
if(tCustomer.fee_type<1)
{
ret=DB_t_pif_spefee_read_by_dept_code_and_cut_type(tCustomer.classdept_no, tCustomer.cut_type,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.fee_type=tCustomer.cut_type;
}
else
{
DB_t_cif_customer_free_lock_cur();
return E_DB_SPEFEE_R;
}
}
else
{
tCustomer.fee_type=tSpeFee.fee_type;
}
upd_flag=1;
}
if(upd_flag)
{
ret=DB_t_cif_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
writelog(LOG_ERR,"cosumer_id[%d]",tCard.cosumer_id);
return E_DB_CUSTOMER_U;
}
}
DB_t_cif_customer_free_lock_cur();
IA->iFeeType=tCustomer.fee_type;
ret=DB_t_aif_account_read_by_card_id_and_purse_id(tCard.card_id,PURSE_NO_ONE, &tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_read_by_card_id_and_purse_id ret[%d]card_id[%d]",ret,tCard.card_id);
if(DB_NOTFOUND==ret)
return E_ACTNO_NOT_EXIST;
else
return E_DB_ACCOUNT_R;
}
/*Changed by hhd at 2005-10-22 14:21
处理卡库不平的退卡问题，如果卡库不等，则判断卡余额
是否小于库余额，如果不是这程序退出，否则按照库余额
和卡余额的差值进行退卡。搭伙费按照差值进行计算的余
额进行退还，该账户不注销，等待未上传得流水
*/
if(USE_CARD_TYPE_ONLINE==IA->iUseCardFlag) //有卡交易
{
if(amtcmp(D4U5(tAccount.cur_freebala,2),IA->dInCardBala)<0)
{
writelog(LOG_ERR,"card_id[%d] act_id[%s] cur_freebala[%lf],input card_balance[%lf]",tCard.card_id,tAccount.account_id,tAccount.cur_freebala,IA->dInCardBala);
return E_CARD_ACC_NO_EQ;
}
if(amtcmp(D4U5(tAccount.cur_freebala,2),IA->dInCardBala)>0)
{
writelog(LOG_ERR,"card_id[%d] act_id[%s] cur_freebala[%lf],input card_balance[%lf]",tCard.card_id,tAccount.account_id,tAccount.cur_freebala,IA->dInCardBala);
//只修改发生额，搭伙费全退，流水入账模块进行处理吧
p->trade_fee = IA->dInCardBala; //可用余额//Changed by hhd at 2005-10-22 14:21
strcpy(p->reserve_2,"卡库不符|按卡余额退卡");
//p->boardfee = (D4U5(tAccount.cur_freebala,2)-IA->dInCardBala);
}
else p->trade_fee = tAccount.cur_freebala;
}
else
{
p->trade_fee = tAccount.cur_freebala; //可用余额//Changed by hhd at 2005-10-22 14:21
}
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&dSerialNo); //获得最大流水号
if(ret)
{
return ret;
}
//把预提费用转为学校收益
p->serial_no=D2I(dSerialNo);
des2src(p->showid,tCard.showid); //显示卡号
p->in_fee = 0; //管理费/手续费
//p->trade_fee = tAccount.cur_freebala; //可用余额//Changed by hhd at 2005-10-22 14:21
p->boardfee = tAccount.cur_frozebala; //冻结金额//Changed by hhd at 2005-10-22 14:21
IA->iTradeNo=p->serial_type; //交易码
IA->iMainDevId=p->maindevice_id; //工作站标识
IA->iDevId=p->device_id; //设备ID
IA->iSerialNo=p->serial_no; //流水号
des2src(IA->sTxDate,p->operate_date); //交易日期
des2src(IA->sTxTime,p->operate_time); //交易时间
des2src(IA->sTxCollectDate,p->collect_date); //采集日期
des2src(IA->sTxCollectTime,p->collect_time); //采集时间
des2src(IA->sTxAccDate,p->enteract_date); //记账日期
des2src(IA->sTxAccTime,p->enteract_time); //记账时间
des2src(IA->sMdeOper,p->oper_code); //操作员
strcpy(IA->sChkOper,p->reserve_1); //复核操作员
des2src(IA->sArrInActno[0],tAccount.account_id); //卡帐户
ptype=(int*)IA->pVoidPointer;
switch(*ptype)
{
case TYPE_CASH: //现金
IA->iArrInFeeSwitch[1]=1;
break;
case TYPE_BILL: //支票
IA->iArrInFeeSwitch[2]=1;
break;
case TYPE_FUNDBOOK: //经费本
IA->iArrInFeeSwitch[3]=1;
break;
default:
writelog(LOG_ERR,"type[%d]",*ptype);
IA->iArrInFeeSwitch[1]=1;
break;
}
IA->pVoidPointer=NULL;
//是否退卡余额和搭伙费
if(IS_YES==rPack->lvol3)
{
IA->iArrInFeeSwitch[5]=1;
}
//是否退押金
if(IS_YES==rPack->lvol2)
{
IA->iArrInFeeSwitch[6]=1;
}
IA->dArrInAmt[0]=p->trade_fee; //卡余额
IA->dArrInAmt[1]=p->boardfee; //搭伙费
IA->dArrInAmt[2]=p->deposit_fee; //押金
ret=AccountProcess(IA);
if(ret)
{
writelog(LOG_ERR,"AccountProcess ret[%d]",ret);
return ret;
}
//注销帐户
memset(&tAccount,0,sizeof(tAccount));
ret=DB_t_aif_account_read_lock_by_cur_and_account_id(IA->sArrInActno[0],&tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_read_lock_by_cur_and_account_id ret[%d]account_id[%s]",ret,IA->sArrInActno[0]);
if(DB_NOTFOUND==ret)
return E_ACTNO_NOT_EXIST;
else
return E_DB_ACCOUNT_R;
}
//Changed by hhd at 2005-10-22 14:21
//修改账户状态时，这些账户置为4临时状态
//等待未上传流水回传入账
if(strcmp(p->reserve_2,"卡库不符|按卡余额退卡")==0)
{
tAccount.current_state= ACCOUNTSTAT_TEMP; //临时状态
}
else
{
tAccount.current_state= ACCOUNTSTAT_LOGOUT; //注销
}
des2src(tAccount.close_date,p->operate_date); //销户日期
des2src(tAccount.close_time,p->operate_time); //销户时间
ret=DB_t_aif_account_update_lock_by_cur(&tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_update_lock_by_cur ret[%d]account_id[%s]",ret,tAccount.account_id);
if(DB_NOTFOUND==ret)
return E_ACTNO_NOT_EXIST;
else
return E_DB_ACCOUNT_U;
}
DB_t_aif_account_free_lock_cur();
writelog(LOG_ERR,"out_balance= [%f]",IA->dOutCardBala);
if(amtcmp(IA->dOutCardBala,0)>0)
{
return E_ENTER_ACCOUNT;
}
p->out_balance=0; //出卡值
ret = process_change_card(&tCustomer,&tCard);
return ret;
}
int F847104(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret =0;
int len = 0;
int i=0;
int hi_cutid=0;
char h_showcardid[11] = ""; //显示卡号
char h_password[7] = ""; //卡密码
double h_temp_Card_id = 0; //卡号
double dSerialNo=0;
char seed_key[17] = ""; //种子密钥
char card_endtime[8 + 1] = ""; //卡的有效截至日期
char logicdate[11]=""; //业务日期
char sysdate[11]="";
char systime[9]="";
char sEndDate[9]="";
char sMsg[256]="";
char sMaxCardBalance[20]="";
char lost_date[11]="";
double dMaxCardBalance=0;
int lost_card_id=0;
T_t_pif_card tCard;
T_t_pif_card tOldCard;
T_t_cif_customer tCustomer;
T_t_pif_spefee tSpeFee;
// T_t_pif_cardlossinfo tCardLossInfo;
T_t_tif_tradeserial tradeserial;
T_t_aif_account tAccount;
InAcc IA;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_LVOL0,F_LVOL1,F_LVOL5,
F_SCUST_NO, F_SCUST_NO2,F_SCUST_AUTH,F_SCUST_AUTH2,
F_SDATE0,F_SNAME,F_SNAME2,
F_SOPEN_EMP,F_SSTATUS0,
F_DAMT2,F_LSERIAL1,F_VSMESS,0);
memset(&tCard,0,sizeof(tCard));
memset(&tOldCard,0,sizeof(tOldCard));
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tSpeFee,0,sizeof(tSpeFee));
// memset(&tCardLossInfo,0,sizeof(tCardLossInfo));
memset(&tAccount,0,sizeof(tAccount));
memset(&tradeserial,0,sizeof(tradeserial));
memset(&IA,0,sizeof(IA));
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
//检查客户信息，判断是否可以发行卡
hi_cutid=rPack->lvol0; //客户号
des2src(tCard.physical_no, rPack->sbank_acc); //物理卡号
trim(h_showcardid);
ret=IsExistFreezeCardByCustomId(hi_cutid);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
ret=IsExistNoLostCardByCustomId(hi_cutid);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
if(strlen(h_showcardid))
{
ret=IsExistShowCardNo(h_showcardid);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
}
ret=IsExistCardByPhyCardNo(tCard.physical_no);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
ret=GetLostCardIdByCustomId_TypeId(hi_cutid,CT_NORMAL,&lost_card_id);
if(ret)
{
writelog(LOG_ERR,"customer[%d]tCard type_id[%d]",hi_cutid,CT_NORMAL);
*pRetCode = ret;
goto L_RETU;
}
/*
ret=DB_t_pif_cardlossinfo_read_by_card_id_and_state_id(lost_card_id, STATE_VALID, &tCardLossInfo);
if(ret)
{
writelog(LOG_ERR,"lost_card_id[%d]",lost_card_id);
if(DB_NOTFOUND==ret)
*pRetCode = E_CARDNO_NOT_EXIST;
else
*pRetCode = E_DB_CARD_R;
goto L_RETU;
}
*/
ret=get_latest_lost_date_by_card_no(lost_card_id,lost_date);
if(ret)
{
writelog(LOG_ERR,"lost_card_id[%d]",lost_card_id);
*pRetCode =ret;
goto L_RETU;
}
//先检查客户的挂失的正式卡是否到了补办日期
ret=GetLostCardValiddate(lost_date,sEndDate);
if(ret)
{
*pRetCode =ret;
goto L_RETU;
}
if(strncmp(sEndDate,sysdate,8)>0)
{
writelog(LOG_ERR,"lost_normal_card_id[%d]lost_date[%s]end_date[%s]",lost_card_id,lost_date,sEndDate);
*pRetCode = E_NORMALCARD_NOT_REACH_ENDDATE;
goto L_RETU;
}
/*
//更新卡挂失日期表中该卡状态为无效
ret=UpdateCardLossInfoState(lost_card_id,STATE_VALID,STATE_INVALID);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
*/
//注销原卡
ret=DB_t_pif_card_read_lock_by_cur_and_card_id(lost_card_id,&tOldCard);
if(ret)
{
writelog(LOG_ERR,"lost_card_id[%d]",lost_card_id);
if(DB_NOTFOUND==ret)
*pRetCode = E_CARDNO_NOT_EXIST;
else
*pRetCode = E_DB_CARD_R;
goto L_RETU;
}
des2src(tOldCard.state_id,CARDSTAT_LOGOUT); //注销
des2src(tOldCard.end_time,sysdate); //注销日期
ret=DB_t_pif_card_update_lock_by_cur(&tOldCard);
if(ret)
{
writelog(LOG_ERR,"lost_card_id[%d]",lost_card_id);
if(DB_NOTFOUND==ret)
*pRetCode = E_CARDNO_NOT_EXIST;
else
*pRetCode = E_DB_CARD_R;
goto L_RETU;
}
DB_t_pif_card_free_lock_by_cur();
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(hi_cutid, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",hi_cutid);
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_R;
goto L_RETU;
}
//得到收费类别
if(tCustomer.fee_type<1)
{
ret=DB_t_pif_spefee_read_by_dept_code_and_cut_type(tCustomer.classdept_no, tCustomer.cut_type,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.fee_type=tCustomer.cut_type;
}
else
{
DB_t_cif_customer_free_lock_cur();
*pRetCode=E_DB_SPEFEE_R;
goto L_RETU;
}
}
else
{
tCustomer.fee_type=tSpeFee.fee_type;
}
//更新客户表的收费类别字段
ret=DB_t_cif_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_U;
goto L_RETU;
}
}
DB_t_cif_customer_free_lock_cur();
tradeserial.trade_fee =D4U5(rPack->damt0,2);
// 准备数据插入卡信息表
memcpy(seed_key,STATIC_SEED_KEY,16); //读种子密钥
if(strlen(tCustomer.can_time)==8)
{
ret=IsInvalidDateTime(tCustomer.can_time,"YYYYMMDD");
if(ret)
{
*pRetCode=E_TB_CUSTOMER_ENDTIME;
goto L_RETU;
}
if(strncmp(tCustomer.can_time,sysdate,8)<=0)
{
*pRetCode=E_TB_CUSTOMER_ENDTIME;
goto L_RETU;
}
des2src(card_endtime,tCustomer.can_time);
}
else if(strlen(rPack->sdate0)==0)
{
*pRetCode=E_TB_CUSTOMER_NO_ENDTIME;
goto L_RETU;
}
else
{
ret=IsInvalidDateTime(rPack->sdate0,"YYYYMMDD");
if(ret)
{
*pRetCode = E_INPUT_DATE;
goto L_RETU;
}
if(strncmp(rPack->sdate0,sysdate,8)<=0)
{
*pRetCode=E_INPUT_DATE;
goto L_RETU;
}
des2src(card_endtime,rPack->sdate0);
}
tradeserial.trade_fee = rPack->damt0; //金额
tradeserial.other_seri_no = 0; //上传端流水号
tradeserial.serial_state = SERISTAT_DEBT; //流水状态
des2src(tradeserial.operate_date,sysdate); //发生日期
des2src(tradeserial.operate_time,systime); //发生时间
des2src(tradeserial.collect_date,sysdate); //采集日期
des2src(tradeserial.collect_time,systime); //采集时间
des2src(tradeserial.enteract_date,logicdate); //处理日期
des2src(tradeserial.enteract_time,systime); //处理时间
tradeserial.maindevice_id = rPack->lvol6; //上传工作站标识
tradeserial.device_id = rPack->lvol7; //采集设备标识
tradeserial.purse_id = PURSE_NO_ONE; //钱包号
tradeserial.customer_id = tCustomer.cut_id; //客户标识
tradeserial.sys_id = 0; //外部系统标识
des2src(tradeserial.oper_code, rPack->scust_limit); //操作员号
len=strlen(tCustomer.man_id) ;
if (len >= 6)
{
strncpy(h_password,&(tCustomer.man_id[len-6]),6);
if(h_password[5]>'9'||h_password[5]<'0')
h_password[5]='0';
}
else
{
strcpy(h_password,DEFAULT_CUST_PWD);
}
ret = getNewUniqNo(KEYTYPE_CARD_ID,&h_temp_Card_id); //获取最大卡号
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
tCard.card_id = (int)h_temp_Card_id; //卡号
des2src(tCard.showid,h_showcardid); //显示卡号
des2src(tCard.is_main,TYPE_YES); //是否为主卡
des2src(tCard.state_id,CARDSTAT_REG); //卡状态
tCard.type_id = CT_NORMAL; //卡类别
EncodePwd(seed_key,h_password,tCard.password,0); //卡密码
tCard.cosumer_id = hi_cutid; //客户标识
tCard.account_count = ACCOUNT_COUNT_ONE; //卡对应帐户个数
des2src(tCard.begin_time,sysdate); //注册时间
des2src(tCard.end_time, card_endtime); //截至时间
tCard.phytype = PHYTYPE_NO_ONE; //设备物理型号;默认为1
// 插入卡信息
ret = DB_t_pif_card_add(&tCard);
if (ret)
{
if(DB_REPEAT==ret)
*pRetCode = E_DB_CARD_E;
else
*pRetCode = E_DB_CARD_I;
goto L_RETU;
}
//修改帐户表中对应的卡号,类型,状态
ret=DB_t_aif_account_read_lock_by_c0_and_card_id_and_purse_id(lost_card_id,PURSE_NO_ONE,&tAccount);
if (ret)
{
writelog(LOG_ERR,"normalcard_account_id[%s]",lost_card_id);
if(DB_NOTFOUND==ret)
*pRetCode = E_ACTNO_NOT_EXIST;
else
*pRetCode = E_DB_ACCOUNT_R;
}
if(tAccount.current_state!=1)
{
*pRetCode=E_ACTNO_LOGOUT;
goto L_RETU;
}
tAccount.card_id=tCard.card_id;
tAccount.card_balance=tAccount.cur_freebala; //更新卡余额与库余额一致
tAccount.consume_count=0;
ret=DB_t_aif_account_update_lock_by_c0(&tAccount);
if (ret)
{
writelog(LOG_ERR,"DB_t_aif_account_update_lock_by_cur4 ret[%d]account_id[%s]",ret,tAccount.account_id);
if(DB_NOTFOUND==ret)
*pRetCode = E_ACTNO_EXIST;
else
*pRetCode = E_DB_ACCOUNT_U;
}
DB_t_aif_account_free_lock_c0();
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&dSerialNo); //获得最大流水号
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
tradeserial.serial_no=(int)dSerialNo;
tradeserial.serial_type=TXCODE_CHANGE_CARD;
tradeserial.card_id=tCard.card_id; //新卡号
des2src(tradeserial.showid,tCard.showid); //显示卡号
strcpy(IA.sArrInActno[0],tAccount.account_id); //账号
IA.dArrInAmt[0]=tradeserial.trade_fee; //交易金额
IA.iUseCardFlag=USE_CARD_TYPE_ONLINE; //联机交易
IA.dInCardBala=tAccount.cur_freebala; //入卡值
IA.iTxCnt=1;
IA.iCardNo=tCard.card_id;
IA.iFeeType=tCustomer.fee_type;
IA.iArrInFeeSwitch[0]=rPack->lvol0;
IA.iArrInFeeSwitch[1]=rPack->lvol1;
IA.iArrInFeeSwitch[2]=rPack->lvol2;
IA.iArrInFeeSwitch[3]=rPack->lvol3;
IA.iArrInFeeSwitch[4]=rPack->lvol4;
IA.iArrInFeeSwitch[5]=rPack->lvol5;
IA.iArrInFeeSwitch[6]=rPack->lvol6;
IA.iArrInFeeSwitch[7]=rPack->lvol7;
IA.iArrInFeeSwitch[8]=rPack->lvol8;
IA.iArrInFeeSwitch[9]=rPack->lvol9;
IA.iArrInFeeSwitch[10]=rPack->lvol10;
ret=process(&IA,&tradeserial);
if(ret)
{
writelog(LOG_ERR,"process ret[%d]",ret);
*pRetCode=ret;
goto L_RETU;
}
sprintf(out_pack->vsmess,"流水号:%d 卡号:%d ",IA.iSerialNo,IA.iCardNo);
for(i=1;i<=IA.iOutTxTypeCnt;i++)
{
switch(IA.iArrOutTxType[i])
{
case TXTYPE_TOLL_DEPOSIT:
case TXTYPE_DEDUCT_DEPOSIT:
case TXTYPE_RETURN_DEPOSIT:
tradeserial.deposit_fee=IA.dArrOutAmt[i];
break;
case TXTYPE_PRE_TOLL_BOARD:
case TXTYPE_TOLL_BOARD:
case TXTYPE_DEDUCT_BOARD:
case TXTYPE_RETURN_BOARD:
tradeserial.boardfee=IA.dArrOutAmt[i];
break;
case TXTYPE_TOLL_CHARGE:
tradeserial.in_fee=IA.dArrOutAmt[i];
break;
case TXTYPE_TOLL_CARDCOST:
tradeserial.cost_fee=IA.dArrOutAmt[i];
break;
default:
break;
}
if(amtcmp(IA.dArrOutAmt[i],0)!=0)
{
sprintf(sMsg,"%s:%.2lf元 ",IA.sArrOutTxName[i],IA.dArrOutAmt[i]);
strcat(out_pack->vsmess,sMsg);
}
}
sprintf(sMsg,"卡当前余额:%.2lf元",tradeserial.out_balance);
strcat(out_pack->vsmess,sMsg);
writelog(LOG_DEBUG,out_pack->vsmess);
ret = DB_t_tif_tradeserial_add(&tradeserial);
if (ret)
{
writelog(LOG_ERR,"ret[%d]",ret);
if(DB_REPEAT==ret)
*pRetCode = E_DB_TRADESERIAL_E;
else
*pRetCode = E_DB_TRADESERIAL_I;
goto L_RETU;
}
if(amtcmp(tradeserial.out_balance,0)<0)
{
*pRetCode=E_ENTER_ACCOUNT;
goto L_RETU;
}
//检查金额是否超过最大额度
ret=GetParameter(GLOBE_MAXCARDBALANCE,sMaxCardBalance);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
dMaxCardBalance=atof(sMaxCardBalance);
if(amtcmp(tradeserial.out_balance,dMaxCardBalance)>0)
{
writelog(LOG_ERR,"tradeserial.out_balance[%lf]",tradeserial.out_balance);
*pRetCode=E_AMT_EXCEED_MAX;
goto L_RETU;
}
// 增加发行新卡时的门禁名单表检查
ret = CheckNewCardHook(&tCustomer, tCard.card_id);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
//返回卡号\密码\显示卡号\客户类型\图书证号\有效截至日期
out_pack->lvol0 = (int)h_temp_Card_id; //交易卡号
out_pack->lvol1 = tCustomer.cut_type; //客户类别
out_pack->lvol5 = tCustomer.fee_type; //收费类别
des2src(out_pack->scust_no,h_showcardid); //显示卡号
des2src(out_pack->scust_no2,tCustomer.classdept_no); //部门号
des2src(out_pack->scust_auth,tCustomer.stuemp_no); //学号
des2src(out_pack->scust_auth2,tCustomer.man_id); //身份证号
des2src(out_pack->sname,tCustomer.cut_name); //客户姓名
des2src(out_pack->sname2,tCustomer.lib_cardid); //图书证号
des2src(out_pack->sstatus0,tCustomer.sex); //性别
des2src(out_pack->sopen_emp,h_password); //卡密码
des2src(out_pack->sdate0,card_endtime); //有效截至日期
out_pack->damt2=tradeserial.out_balance; //出卡值
out_pack->lserial1=tradeserial.serial_no; //流水号
// add by 汤成 2005-8-8
// 增加向名单表写入记录
ret = InsertToBlkList((int)h_temp_Card_id,CHCARD_BLACKLIST);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F240002(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret=0;
double unique=0;
int temp_serial_no=0;
char logicdate[11]="";
char buffer[16]="";
int i=0;
double trans_amt=0.0;
char sMsg[255]="";
char sDebugMsg[255]="";
char sMaxCardBalance[20]="";
double dMaxCardBalance=0;
T_t_aif_account tAccount; //帐户表
T_t_cif_customer tCustomer;
T_t_pif_spefee tSpeFee;
T_t_tif_tradeserial tradeserial; //卡操作流水表
T_t_pif_card card;
InAcc IA;
memset(&tSpeFee,0,sizeof(tSpeFee));
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tAccount,0,sizeof(tAccount));
memset(&IA,0,sizeof(IA));
memset(&tradeserial,0,sizeof(tradeserial));
memset(&card,0,sizeof(card));
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_DAMT0,F_DAMT1,F_DAMT2,F_LVOL1,F_LVOL2,F_SBANK_CODE,F_SEMP_NO,0);
//memset(&tradeserial_bak,0,sizeof(tradeserial_bak));
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=E_TRANS_UNKNOW_ERROR;
writelog(LOG_ERR,"GetLogicDate error,errcode=[%d]",ret);
goto L_RETU;
}
//判断设备是否登陆
if(0!=device_login_yes_or_no(atoi(rPack->sorder2)))
{
*pRetCode=E_TRANS_TERM_NOLOGIN;
writelog(LOG_ERR,"Device don't login");
goto L_RETU;
}
//判断是否处于日终结算状态
ret=GetParameter(GLOBE_FLAG_BALANCE,buffer);
if(ret)
{
*pRetCode=E_TRANS_UNKNOW_ERROR;
writelog(LOG_ERR,"GetParameter error,errcode=[%d]",ret);
goto L_RETU;
}
else if(strncmp(buffer,"0",1)!=0)
{
*pRetCode=E_TRANS_BANK_SERVICE_NOEXIT;
writelog(LOG_ERR,"System is balance now!");
goto L_RETU;
}
ret=DB_t_pif_card_read_by_card_id(atoi(rPack->sserial0),&card);
if(ret)
{
*pRetCode=E_TRANS_SCHACC_NOEXIT;
writelog(LOG_ERR,"Create serial_no error,error code=[%d]",ret);
goto L_RETU;
}
if(strncmp(card.state_id,CARDSTAT_LOGOUT,4)==0)
{
*pRetCode=E_TRANS_SCHACC_DESTORY;
writelog(LOG_ERR,"card.state_id=[%d]",card.card_id);
goto L_RETU;
}
if(STATE_TRUE==card.state_id[CARDSTAT_TYPE_LOST])
{
DB_t_pif_card_free_lock_by_cur();
*pRetCode=E_TRANS_SCHCARD_LOSTING;
writelog(LOG_ERR,"card_state=[%s]",card.state_id);
goto L_RETU;
}
if(STATE_TRUE==card.state_id[CARDSTAT_TYPE_FREEZE])
{
DB_t_pif_card_free_lock_by_cur();
*pRetCode=E_TRANS_SCHCARD_FREEZE;
writelog(LOG_ERR,"card_state=[%s]",card.state_id);
goto L_RETU;
}
if(STATE_TRUE==card.state_id[CARDSTAT_TYPE_WFAIL])
{
DB_t_pif_card_free_lock_by_cur();
*pRetCode=E_TRANS_SCHCARD_WFAIL;
writelog(LOG_ERR,"card_state=[%s]",card.state_id);
goto L_RETU;
}
//转账不允许转小数金额
if((rPack->lvol5)%100>0)
{
*pRetCode=E_TRANS_TRANSMONEY_OUTRANGE;
writelog(LOG_ERR,"Trans money is not a integer!,transmoney=[%f]",rPack->lvol5/100.0);
goto L_RETU;
}
//开始填充流水数据
//流水号
ret=getNewUniqNo(KEYTYPE_TRADESERIAL, &unique);
if(ret)
{
*pRetCode=E_TRANS_UNKNOW_ERROR;
writelog(LOG_ERR,"Create serial_no error,error code=[%d]",ret);
goto L_RETU;
}
tradeserial.serial_no=D2I(unique);
//记录流水号，作为冲正使用
temp_serial_no=tradeserial.serial_no;
tradeserial.other_seri_no=rPack->lvol0; //上传端流水号
tradeserial.serial_type=TXCODE_BANK_SCHOOL; //交易代码
tradeserial.serial_state=SERISTAT_NODEBT; //流水状态
tradeserial.card_id=atoi(rPack->sserial0);
tradeserial.purse_id=0;
tradeserial.in_balance=double((rPack->lvol6)/100.00); //入卡金额
tradeserial.out_balance=tradeserial.in_balance; //出卡金额
tradeserial.trade_count=rPack->lvol1+1; //当前卡中交易次数
ret=get_datetime_from_db(tradeserial.operate_date,tradeserial.operate_time);
if(ret)
{
writelog(LOG_ERR,"get_datetime_from_db error,error code=[%d]",ret);
getsysdate(tradeserial.operate_date);
getsystime(tradeserial.operate_time);
}
Strncpy_t(tradeserial.collect_date,tradeserial.operate_date,sizeof(tradeserial.collect_date)); //采集日期
Strncpy_t(tradeserial.collect_time,tradeserial.operate_time,sizeof(tradeserial.collect_time)); //采集时间
Strncpy_t(tradeserial.enteract_date,logicdate,sizeof(tradeserial.enteract_date)); //入帐日期
Strncpy_t(tradeserial.enteract_time,tradeserial.operate_time,sizeof(tradeserial.enteract_time)); //入帐时间
tradeserial.maindevice_id=GetTransferSystemId(); //子系统号码
tradeserial.device_id=atoi(rPack->sorder2); //终端ID
tradeserial.trade_fee=(rPack->lvol5)/100.0; //转帐金额
Strncpy_t(tradeserial.b_act_id,rPack->scust_auth,sizeof(tradeserial.b_act_id));
tradeserial.sys_id=rPack->lvol2; //表示银行
tradeserial.condition_id=SELF_TRANS; //自动/自助转帐标识
tradeserial.customer_id=card.cosumer_id;
Strncpy_t(tradeserial.oper_code,OPER_SYSTEM_KEY,sizeof(tradeserial.oper_code)); //操作员代码
//判断转帐金额是否超出钱包最大限额
ret=DB_t_aif_account_read_by_card_id_and_purse_id(card.card_id, PURSE_NO_ONE,&tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_read_by_card_id_and_purse_id ret[%d]card_id[%d]",ret,card.card_id);
if(DB_NOTFOUND==ret)
{
*pRetCode=E_TRANS_SCHACC_NOEXIT;
goto L_RETU;
}
else
{
*pRetCode=E_TRANS_UNKNOW_ERROR;
goto L_RETU;
}
}
ret=GetParameter(GLOBE_MAXCARDBALANCE,sMaxCardBalance);
if(ret)
{
writelog(LOG_ERR,"GetParameter GLOBE_MAXCARDBALANCE error,errcode=[%d]",ret);
*pRetCode=E_TRANS_UNKNOW_ERROR;
goto L_RETU;
}
dMaxCardBalance=atof(sMaxCardBalance);
if(amtcmp(tAccount.cur_bala+tradeserial.trade_fee,dMaxCardBalance)>0)
{
*pRetCode=E_TRANS_TRANSMONEY_OUTRANGE;
goto L_RETU;
}
//读取客户收费类别字段
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(card.cosumer_id, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",card.cosumer_id);
if(DB_NOTFOUND==ret)
{
*pRetCode=E_TRANS_UNKNOW_ERROR;
goto L_RETU;
}
else
{
*pRetCode=E_TRANS_UNKNOW_ERROR;
goto L_RETU;
}
}
if(0==tCustomer.fee_type)
{
ret=DB_t_pif_spefee_read_by_dept_code_and_cut_type(tCustomer.classdept_no, tCustomer.cut_type,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.fee_type=tCustomer.cut_type;
}
else
{
DB_t_cif_customer_free_lock_cur();
writelog(LOG_ERR,"DB_t_pif_spefee_read_by_dept_code_and_cut_type error,errcode=[%d]",ret);
*pRetCode=E_TRANS_UNKNOW_ERROR;
goto L_RETU;
}
}
else
{
tCustomer.fee_type=tSpeFee.fee_type;
}
}
DB_t_cif_customer_free_lock_cur();
//记录流水数据，用于提供正确的流水号，以及银行业务不成功供查询
ret=DB_t_tif_tradeserial_add(&tradeserial);
if(ret)
{
*pRetCode=E_TRANS_UNKNOW_ERROR;
writelog(LOG_ERR,"Insert t_tif_tradeserial table error,error code=[%d]",ret);
goto L_RETU;
}
ret=db_commit();
if(ret)
{
*pRetCode=E_DB_COMMIT;
writelog(LOG_ERR,"db_commit error,error code=[%d]",ret);
goto L_RETU;
}
//填写入账结构,问问闻剑
memset(&IA,0,sizeof(IA));
des2src(IA.sArrInActno[0],tAccount.account_id); //贷方帐户,持卡人账户
des2src(IA.sArrInActno[2],rPack->sstation0); //借方帐号，由前置机上传
switch (rPack->lvol3)
{
case 4:
IA.iArrInFeeSwitch[1] = 1;
break;
case 5:
IA.iArrInFeeSwitch[1] = 0;
break;
default:
break;
}
IA.iCardNo=card.card_id;
IA.iFeeType=tCustomer.fee_type;
IA.dArrInAmt[0]=tradeserial.trade_fee;
writelog(LOG_ERR,"借方帐号=[%d]",atoi(rPack->sstation0));
ret=process(&IA,&tradeserial);
if(ret)
{
writelog(LOG_ERR,"process err,errcode[%d]",ret);
*pRetCode=E_TRANS_UNKNOW_ERROR;
goto L_RETU;
}
sprintf(sDebugMsg,"流水号:%d ",IA.iSerialNo);
for(i=1;i<=IA.iOutTxTypeCnt;i++)
{
switch(IA.iArrOutTxType[i])
{
case TXTYPE_TOLL_DEPOSIT:
case TXTYPE_DEDUCT_DEPOSIT:
case TXTYPE_RETURN_DEPOSIT:
tradeserial.deposit_fee=IA.dArrOutAmt[i];
break;
case TXTYPE_PRE_TOLL_BOARD:
case TXTYPE_TOLL_BOARD:
case TXTYPE_DEDUCT_BOARD:
case TXTYPE_RETURN_BOARD:
case TXTYPE_BANK_PRE_TOLL_BOARD:
tradeserial.boardfee=IA.dArrOutAmt[i];
break;
case TXTYPE_TOLL_CHARGE:
tradeserial.in_fee=IA.dArrOutAmt[i];
break;
case TXTYPE_BANK_TRANSFER:
trans_amt=IA.dArrOutAmt[i];
break;
default:
break;
}
if(amtcmp(IA.dArrOutAmt[i],0)!=0)
{
sprintf(sMsg,"%s:%.2lf元 ",IA.sArrOutTxName[i],IA.dArrOutAmt[i]);
strcat(sDebugMsg,sMsg);
}
}
sprintf(sMsg,"充值前卡余额:%.2lf 转帐后卡余额:%.2lf ",IA.dInCardBala,IA.dOutCardBala);
strcat(sDebugMsg,sMsg);
writelog(LOG_DEBUG,sDebugMsg);
out_pack->damt0=tradeserial.out_balance;
out_pack->damt1=tradeserial.trade_fee;
out_pack->damt2=tradeserial.boardfee;
out_pack->lvol1=tradeserial.serial_no;
out_pack->lvol2=D2I(tradeserial.out_balance*100.0);
des2src(out_pack->semp_no, tradeserial.operate_date);
des2src(out_pack->sbank_code, tradeserial.operate_time);
PutRow(handle,out_pack,pRetCode,szMsg);
//业务结束后，回滚事务
ret=db_rollback();
if(ret)
{
*pRetCode=E_DB_ROLLBACK;
writelog(LOG_ERR,"db_rollback error,error code=[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F847106(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int i=0;
int ret =0;
char logicdate[11]=""; //业务日期
char sysdate[11]="";
char systime[9]="";
int type=0;
InAcc IA;
double dSerialNo = 0;
int card_id=0;
char physical_no[41]="";
char sMaxCardBalance[20]="";
char sMsg[256]="";
double dMaxCardBalance=0;
T_t_tif_tradeserial tradeserial;
T_t_pif_card tCard;
T_t_tif_savdtl tSavdtl;
T_t_cif_customer tCustomer;
T_t_pif_spefee tSpeFee;
T_t_aif_account tAccount; //帐户表
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
memset(&tSavdtl,0,sizeof(tSavdtl));
memset(&tCard,0,sizeof(tCard));
memset(&tAccount,0,sizeof(tAccount));
memset(&tradeserial,0,sizeof(tradeserial));
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tSpeFee,0,sizeof(tSpeFee));
memset(&IA,0,sizeof(IA));
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_LSERIAL1,F_DAMT2,F_DAMT3,F_VSMESS,0);
if(amtcmp(rPack->damt0,0)<=0)
{
*pRetCode=E_INPUT_AMT;
goto L_RETU;
}
if(amtcmp(rPack->damt1,0)<0)
{
*pRetCode=E_INPUT_CARD_BALA;
goto L_RETU;
}
if(rPack->lvol10<1)
{
*pRetCode=E_INPUT_CARD_TXCNT;
goto L_RETU;
}
card_id=rPack->lvol0;
tradeserial.trade_fee = rPack->damt0; //充值金额
des2src(physical_no, rPack->sbank_acc); //物理卡号
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
ret=DB_t_pif_card_read_by_card_id(card_id, &tCard);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode=E_CARDNO_NOT_EXIST;
else
*pRetCode=E_DB_CARD_R;
goto L_RETU;
}
if(strncmp(tCard.state_id,CARDSTAT_REG,4)!=0)
{
if('2'==tCard.state_id[CARDSTAT_TYPE_REG])
*pRetCode = E_CARDNO_LOGOUT;
else if('3'==tCard.state_id[CARDSTAT_TYPE_REG])
*pRetCode = E_CARD_CHANGE;
else if(tCard.state_id[CARDSTAT_TYPE_LOST]==STATE_TRUE)
*pRetCode=E_CARDNO_LOST;
else if(tCard.state_id[CARDSTAT_TYPE_FREEZE]==STATE_TRUE)
*pRetCode=E_CARDNO_FREEZE;
else if(tCard.state_id[CARDSTAT_TYPE_WFAIL]==STATE_TRUE)
*pRetCode=E_CARDNO_WFAIL;
goto L_RETU;
}
trim(physical_no);
trim(tCard.physical_no);
if(strcmp(tCard.physical_no,physical_no)!=0)
{
writelog(LOG_ERR,"db physical_no[%s],input physical_no[%s]",tCard.physical_no,physical_no);
*pRetCode= E_CARD_PHYNO_DIFFER;
goto L_RETU;
}
//根据卡号和钱包号得到消费者账号(借方)
ret=DB_t_aif_account_read_by_card_id_and_purse_id(card_id, PURSE_NO_ONE,&tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_read_by_card_id_and_purse_id ret[%d]card_id[%d]",ret,card_id);
if(DB_NOTFOUND==ret)
*pRetCode=E_ACTNO_NOT_EXIST;
else
*pRetCode=E_DB_ACCOUNT_R;
goto L_RETU;
}
ret=GetParameter(GLOBE_MAXCARDBALANCE,sMaxCardBalance);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
dMaxCardBalance=atof(sMaxCardBalance);
if(amtcmp(tAccount.cur_bala+tradeserial.trade_fee,dMaxCardBalance)>0)
{
*pRetCode= E_AMT_EXCEED_MAX;
goto L_RETU;
}
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(tCard.cosumer_id, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",tCard.cosumer_id);
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_R;
goto L_RETU;
}
//得到收费类别
if(0==tCustomer.fee_type)
{
ret=DB_t_pif_spefee_read_by_dept_code_and_cut_type(tCustomer.classdept_no, tCustomer.cut_type,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.fee_type=tCustomer.cut_type;
}
else
{
DB_t_cif_customer_free_lock_cur();
*pRetCode=E_DB_SPEFEE_R;
goto L_RETU;
}
}
else
{
tCustomer.fee_type=tSpeFee.fee_type;
}
//更新客户表的收费类别字段
ret=DB_t_cif_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_U;
goto L_RETU;
}
}
DB_t_cif_customer_free_lock_cur();
type=rPack->lvol4; //交易类型
IA.dArrInAmt[0]=tradeserial.trade_fee;
switch(type)
{
case TYPE_CASH: //现金
IA.iArrInFeeSwitch[1]=1;
break;
case TYPE_BILL: //支票
IA.iArrInFeeSwitch[2]=1;
break;
case TYPE_FUNDBOOK: //经费本
IA.iArrInFeeSwitch[3]=1;
break;
case TYPE_TRAD: //财务收款
IA.iArrInFeeSwitch[4]=1;
break;
default:
*pRetCode=E_INPUT_DEPOSIT_TYPE;
goto L_RETU;
}
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&dSerialNo); //获得最大流水号
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR," ERRCODE = [%d]",ret);
goto L_RETU;
}
tradeserial.serial_no = D2I(dSerialNo); //流水号
tradeserial.other_seri_no = 0; //上传端流水号
tradeserial.serial_type = TXCODE_SAVING_CASH;
tradeserial.serial_state = SERISTAT_DEBT; //流水状态
des2src(tradeserial.operate_date,sysdate); //发生日期
des2src(tradeserial.operate_time,systime); //发生时间
des2src(tradeserial.collect_date,sysdate); //采集日期
des2src(tradeserial.collect_time,systime); //采集时间
des2src(tradeserial.enteract_date,logicdate); //处理日期
des2src(tradeserial.enteract_time,systime); //处理时间
tradeserial.maindevice_id = rPack->lvol6; //上传工作站标识
tradeserial.device_id = rPack->lvol7; //采集设备标识
tradeserial.card_id =card_id; //卡号
tradeserial.purse_id = rPack->lvol1; //钱包号
//tradeserial.customer_id = rPack->lvol2; //客户标识
tradeserial.customer_id = tCustomer.cut_id;
tradeserial.in_balance=rPack->damt1;
tradeserial.trade_count=rPack->lvol10+1; //交易次数
Strncpy_t(tradeserial.oper_code , rPack->scust_limit, sizeof(tradeserial.oper_code)); //操作员代码
tradeserial.sys_id = 0; //外部系统标识
switch(type)
{
case TYPE_CASH: //现金
break;
case TYPE_BILL: //支票
case TYPE_FUNDBOOK: //经费本
case TYPE_TRAD:
case TYPE_OTHER: //其他
tSavdtl.amount=rPack->damt0; //发生额
if(amtcmp(tSavdtl.amount,0)<=0)
break;
des2src(tSavdtl.bill_no,rPack->sphone); //票据号码
if(strlen(tSavdtl.bill_no)<1)
{
*pRetCode=E_INPUT_BILLNO;
goto L_RETU;
}
tSavdtl.card_no=tCard.card_id; //卡号
des2src(tSavdtl.oper_no,rPack->scust_limit); //操作员
tSavdtl.seqno=tradeserial.serial_no; //流水号
des2src(tSavdtl.tx_date,sysdate); //发生日期
des2src(tSavdtl.tx_time,systime); //发生时间
tSavdtl.cnt=1; //票据数量
tSavdtl.bill_type=type; //票据类型
tSavdtl.tx_code=tradeserial.serial_type; //交易码
ret=DB_t_tif_savdtl_add(&tSavdtl);
if(ret)
{
if(DB_REPEAT==ret)
*pRetCode = E_DB_SAVDTL_E;
else
*pRetCode = E_DB_SAVDTL_I;
goto L_RETU;
}
break;
default:
*pRetCode=E_TXCODE_NOT_EXIST;
goto L_RETU;
}
des2src(IA.sArrInActno[0],tAccount.account_id); //帐户
IA.iCardNo=tCard.card_id;
IA.iFeeType=tCustomer.fee_type;
IA.dArrInAmt[0]=tradeserial.trade_fee;
IA.iArrInFeeSwitch[0]=rPack->lvol0;
IA.iArrInFeeSwitch[5]=rPack->lvol5;
IA.iArrInFeeSwitch[6]=rPack->lvol6;
IA.iArrInFeeSwitch[7]=rPack->lvol7;
IA.iArrInFeeSwitch[8]=rPack->lvol8;
IA.iArrInFeeSwitch[9]=rPack->lvol9;
IA.iArrInFeeSwitch[10]=rPack->lvol10;
ret=process(&IA,&tradeserial);
if(ret)
{
writelog(LOG_ERR,"process ret[%d]",ret);
*pRetCode=ret;
goto L_RETU;
}
sprintf(out_pack->vsmess,"流水号:%d 卡号:%d ",IA.iSerialNo,IA.iCardNo);
for(i=1;i<=IA.iOutTxTypeCnt;i++)
{
switch(IA.iArrOutTxType[i])
{
case TXTYPE_TOLL_DEPOSIT:
case TXTYPE_TOLL_DEPOSIT_BILL:
case TXTYPE_TOLL_DEPOSIT_FUNDBOOK:
case TXTYPE_TOLL_DEPOSIT_TRAD:
case TXTYPE_DEDUCT_DEPOSIT:
case TXTYPE_RETURN_DEPOSIT:
tradeserial.deposit_fee=IA.dArrOutAmt[i];
break;
case TXTYPE_PRE_TOLL_BOARD:
case TXTYPE_PRE_TOLL_BOARD_BILL:
case TXTYPE_PRE_TOLL_BOARD_FUNDBOOK:
case TXTYPE_PRE_TOLL_BOARD_TRAD:
case TXTYPE_TOLL_BOARD:
case TXTYPE_DEDUCT_BOARD:
case TXTYPE_RETURN_BOARD:
case TXTYPE_RETURN_BOARD_BILL:
case TXTYPE_RETURN_BOARD_FUNDBOOK:
case TXTYPE_RETURN_BOARD_TRAD:
tradeserial.boardfee=IA.dArrOutAmt[i];
break;
case TXTYPE_TOLL_CHARGE:
case TXTYPE_TOLL_CHARGE_BILL:
case TXTYPE_TOLL_CHARGE_FUNDBOOK:
case TXTYPE_TOLL_CHARGE_TRAD:
tradeserial.in_fee=IA.dArrOutAmt[i];
break;
case TXTYPE_TOLL_CARDCOST:
case TXTYPE_TOLL_CARDCOST_BILL:
case TXTYPE_TOLL_CARDCOST_FUNDBOOK:
case TXTYPE_TOLL_CARDCOST_TRAD:
tradeserial.cost_fee=IA.dArrOutAmt[i];
break;
default:
break;
}
if(amtcmp(IA.dArrOutAmt[i],0)!=0)
{
sprintf(sMsg,"%s:%.2lf元 ",IA.sArrOutTxName[i],IA.dArrOutAmt[i]);
strcat(out_pack->vsmess,sMsg);
}
}
sprintf(sMsg,"充值前卡余额:%.2lf元 卡当前余额:%.2lf元",tradeserial.in_balance,tradeserial.out_balance);
strcat(out_pack->vsmess,sMsg);
writelog(LOG_DEBUG,out_pack->vsmess);
ret = DB_t_tif_tradeserial_add(&tradeserial);
if (ret)
{
writelog(LOG_ERR,"ret[%d]",ret);
if(DB_REPEAT==ret)
*pRetCode = E_DB_TRADESERIAL_E;
else
*pRetCode = E_DB_TRADESERIAL_I;
goto L_RETU;
}
if(amtcmp(tradeserial.out_balance,0)<0)
{
*pRetCode=E_ENTER_ACCOUNT;
goto L_RETU;
}
out_pack->damt2=tradeserial.out_balance; //出卡值
out_pack->damt3=tradeserial.boardfee; //搭伙费
out_pack->lserial1=tradeserial.serial_no; //流水号
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F847110(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret=0;
int card_id=0;
T_t_pif_card tCard;
T_t_pif_spefee tSpeFee;
T_t_cif_customer tCustomer;
T_t_aif_account tAccount;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
memset(&tCard,0,sizeof(tCard));
memset(&tSpeFee,0,sizeof(tSpeFee));
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tAccount,0,sizeof(tAccount));
card_id = in_pack->lvol0; //卡标识
//判断卡状态是否为写卡未成功状态
ret=DB_t_pif_card_read_by_card_id(card_id, &tCard);
if(ret)
{
writelog(LOG_ERR,"card_id[%d]",card_id);
if(DB_NOTFOUND==ret)
*pRetCode= E_CARDNO_NOT_EXIST;
else
*pRetCode= E_DB_CARD_R;
goto L_RETU;
}
if(card_id!=tCard.card_id)
{
writelog(LOG_ERR,"card_id[%d] db card_id[%d]",card_id,tCard.card_id);
*pRetCode=E_DB_CARD_R;
goto L_RETU;
}
if(strncmp(tCard.state_id,CARDSTAT_REG,4)!=0)
{
if(tCard.state_id[CARDSTAT_TYPE_REG]!=STATE_TRUE)
{
*pRetCode=E_CARDNO_LOGOUT;
goto L_RETU;
}
else if(tCard.state_id[CARDSTAT_TYPE_LOST]==STATE_TRUE)
{
*pRetCode=E_CARDNO_LOST;
goto L_RETU;
}
else if(tCard.state_id[CARDSTAT_TYPE_FREEZE]==STATE_TRUE)
{
*pRetCode=E_CARDNO_FREEZE;
goto L_RETU;
}
//else if(tCard.state_id[CARDSTAT_TYPE_WFAIL]==STATE_TRUE)
//*pRetCode=E_CARDNO_WFAIL;
}
//得到收费类别
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(tCard.cosumer_id, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",tCard.cosumer_id);
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_R;
goto L_RETU;
}
if(tCustomer.fee_type<1)
{
ret=DB_t_pif_spefee_read_by_dept_code_and_cut_type(tCustomer.classdept_no, tCustomer.cut_type,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.fee_type=tCustomer.cut_type;
}
else
{
DB_t_cif_customer_free_lock_cur();
*pRetCode=E_DB_SPEFEE_R;
goto L_RETU;
}
}
else
{
tCustomer.fee_type=tSpeFee.fee_type;
}
//更新客户表的收费类别字段
ret=DB_t_cif_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_U;
goto L_RETU;
}
}
DB_t_cif_customer_free_lock_cur();
ret=DB_t_aif_account_read_by_card_id_and_purse_id(card_id,0,&tAccount);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode= E_ACTNO_NOT_EXIST;
else
*pRetCode= E_DB_ACCOUNT_R;
goto L_RETU;
}
SetCol(handle,0);
SetCol(handle,F_DAMT0,F_LVOL1,F_LVOL5,F_SDATE0,F_LVOL0,F_SNAME,F_SNAME2,F_SCUST_AUTH,F_SSERIAL0,F_SCUST_AUTH2,F_SCUST_TYPE,F_SCUST_LIMIT,F_SCUST_NO,F_SBANK_ACC,0);
out_pack->lvol0 = tCard.card_id; //卡标识
out_pack->damt0=D4U5(tAccount.cur_freebala,2); //卡余额
des2src(out_pack->sdate0,tCard.end_time); //有效截止日期
out_pack->lvol1 = tCustomer.cut_type; //客户类别
out_pack->lvol5 = tCustomer.fee_type; //收费类别
des2src(out_pack->sname,tCustomer.cut_name); //学生\员工姓名
des2src(out_pack->sserial0,tCustomer.classdept_no); //单位代码
des2src(out_pack->scust_auth2,tCustomer.man_id); //身份证号
des2src(out_pack->scust_type,tCustomer.sex); //性别
des2src(out_pack->scust_limit,tCustomer.stuemp_no); //学号\员工号
des2src(out_pack->sname2,tCustomer.lib_cardid); //图书证号
des2src(out_pack->scust_no,tCard.showid); //显示卡号
des2src(out_pack->sbank_acc,tCard.physical_no); //物理卡号
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F240157(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int i=0;
int ret =0;
char logicdate[11]=""; //业务日期
char sysdate[11]="";
char systime[9]="";
InAcc IA;
double dUniqno = 0;
int card_id=0;
int iSerialno=0;
char physical_no[41]="";
char sMaxCardBalance[20]="";
char sMsg[256]="";
double dMaxCardBalance=0;
T_t_pif_card tCard;
T_t_cif_customer tCustomer;
T_t_pif_spefee tSpeFee;
T_t_aif_account tAccount; //帐户表
T_t_tif_tradeserial tradeserial;
T_t_tif_diff_transfer tDiffTransfer;
T_t_tif_report_trans_comp rpttrans_comp;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
memset(&tCard,0,sizeof(tCard));
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tSpeFee,0,sizeof(tSpeFee));
memset(&tAccount,0,sizeof(tAccount));
memset(&tDiffTransfer,0,sizeof(tDiffTransfer));
memset(&tradeserial,0,sizeof(tradeserial));
memset(&IA,0,sizeof(IA));
ResetNormalCPack(&aPack,0,1);
if(amtcmp(rPack->damt1,0)==0)
{
*pRetCode=E_INPUT_AMT;
goto L_RETU;
}
trim(rPack->scust_limit);
trim(rPack->scust_limit2);
trim(rPack->semp_pwd);
if(strlen(rPack->scust_limit)==0)
{
*pRetCode=E_OPER_NOT_EXIST;
goto L_RETU;
}
if(strlen(rPack->scust_limit2)==0)
{
*pRetCode=E_INPUT_AUTH_OPER_NULL;
goto L_RETU;
}
if(strcmp(rPack->scust_limit,rPack->scust_limit2)==0)
{
writelog(LOG_ERR,"oper[%s]auth_oper[%s]",rPack->scust_limit,rPack->scust_limit2);
*pRetCode=E_OPER_AND_AUTH_OPER_EQ;
goto L_RETU;
}
ret=chk_oper_pwd(rPack->scust_limit2,rPack->semp_pwd);
if(ret)
{
if(E_OPER_NOT_EXIST==ret)
*pRetCode=E_AUTH_OPER_NOT_EXIST;
else if(E_PASSWORD_WRONG==ret)
*pRetCode=E_AUTH_OPER_PWD;
else
*pRetCode=ret;
goto L_RETU;
}
card_id=rPack->lvol0;
des2src(physical_no, rPack->sbank_acc); //物理卡号
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
ret=DB_t_pif_card_read_by_card_id(card_id, &tCard);
if(ret)
{
writelog(LOG_ERR,"card_id[%d]",card_id);
if(DB_NOTFOUND==ret)
*pRetCode=E_CARDNO_NOT_EXIST;
else
*pRetCode=E_DB_CARD_R;
goto L_RETU;
}
if(card_id!=tCard.card_id)
{
writelog(LOG_ERR,"card_id[%d] db card_id[%d]",card_id,tCard.card_id);
*pRetCode=E_DB_CARD_R;
goto L_RETU;
}
if(strncmp(tCard.state_id,CARDSTAT_REG,4)!=0)
{
if('2'==tCard.state_id[CARDSTAT_TYPE_REG])
*pRetCode=E_CARDNO_LOGOUT;
else if('3'==tCard.state_id[CARDSTAT_TYPE_REG])
*pRetCode=E_CARD_CHANGE;
else if(STATE_TRUE==tCard.state_id[CARDSTAT_TYPE_LOST])
*pRetCode=E_CARDNO_LOST;
else if(STATE_TRUE==tCard.state_id[CARDSTAT_TYPE_FREEZE])
*pRetCode=E_CARDNO_FREEZE;
else if(STATE_TRUE==tCard.state_id[CARDSTAT_TYPE_WFAIL])
*pRetCode=E_CARDNO_WFAIL;
goto L_RETU;
}
trim(physical_no);
trim(tCard.physical_no);
if(strcmp(tCard.physical_no,physical_no)!=0)
{
writelog(LOG_ERR,"db physical_no[%s],input physical_no[%s]",tCard.physical_no,physical_no);
*pRetCode= E_CARD_PHYNO_DIFFER;
goto L_RETU;
}
iSerialno=rPack->lserial0;
ret=DB_t_tif_diff_transfer_read_lock_by_c0_and_op_date_and_local_sn(rPack->sdate0,iSerialno,&tDiffTransfer);
if(ret)
{
writelog(LOG_ERR,"operater_date[%s]Serialno[%d]",rPack->sdate0,iSerialno);
if(DB_NOTFOUND==ret)
*pRetCode=E_SERIALNO_NOT_EXIST;
else
*pRetCode=E_DB_TRADESERIAL_R;
goto L_RETU;
}
if(card_id!=tDiffTransfer.card_id)
{
writelog(LOG_ERR,"input card_id [%d],DiffTransfer card_id[%d]",card_id,tDiffTransfer.card_id);
DB_t_tif_diff_transfer_free_lock_by_c0();
*pRetCode=E_CARDNO_SERIAL_NE;
goto L_RETU;
}
if(SERISTAT_NODEBT!=tDiffTransfer.status)
{
DB_t_tif_diff_transfer_free_lock_by_c0();
*pRetCode=E_TX_SERIAL_CANNOT_CZ;
goto L_RETU;
}
if(amtcmp(tDiffTransfer.diff_amt,rPack->damt1)!=0)
{
DB_t_tif_diff_transfer_free_lock_by_c0();
*pRetCode=E_INPUT_AMT;
goto L_RETU;
}
tDiffTransfer.status=SERISTAT_DEBT;
ret=DB_t_tif_diff_transfer_update_lock_by_c0(&tDiffTransfer);
if(ret)
{
*pRetCode=E_DB_DIFF_TRANSFER_U;
goto L_RETU;
}
DB_t_tif_diff_transfer_free_lock_by_c0();
//根据卡号和钱包号得到消费者账号(借方)
ret=DB_t_aif_account_read_by_card_id_and_purse_id(card_id, PURSE_NO_ONE,&tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_read_by_card_id_and_purse_id ret[%d]card_id[%d]",ret,card_id);
if(DB_NOTFOUND==ret)
*pRetCode=E_ACTNO_NOT_EXIST;
else
*pRetCode=E_DB_ACCOUNT_R;
goto L_RETU;
}
ret=GetParameter(GLOBE_MAXCARDBALANCE,sMaxCardBalance);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
dMaxCardBalance=atof(sMaxCardBalance);
tradeserial.trade_fee = rPack->damt1; //充值金额
if(amtcmp(tAccount.cur_bala+tradeserial.trade_fee,dMaxCardBalance)>0)
{
*pRetCode= E_AMT_EXCEED_MAX;
goto L_RETU;
}
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(tCard.cosumer_id, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",tCard.cosumer_id);
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_R;
goto L_RETU;
}
//得到收费类别
if(tCustomer.fee_type<1)
{
ret=DB_t_pif_spefee_read_by_dept_code_and_cut_type(tCustomer.classdept_no, tCustomer.cut_type,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.fee_type=tCustomer.cut_type;
}
else
{
DB_t_cif_customer_free_lock_cur();
*pRetCode=E_DB_SPEFEE_R;
goto L_RETU;
}
}
else
{
tCustomer.fee_type=tSpeFee.fee_type;
}
//更新客户表的收费类别字段
ret=DB_t_cif_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_U;
goto L_RETU;
}
}
DB_t_cif_customer_free_lock_cur();
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&dUniqno); //获得最大流水号
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR," ERRCODE = [%d]",ret);
goto L_RETU;
}
tradeserial.serial_no = D2I(dUniqno); //流水号
tradeserial.other_seri_no = 0; //上传端流水号
tradeserial.serial_type = TXCODE_MAKEUPSERIAL;
tradeserial.serial_state = SERISTAT_DEBT; //流水状态
des2src(tradeserial.operate_date,sysdate); //发生日期
des2src(tradeserial.operate_time,systime); //发生时间
des2src(tradeserial.collect_date,sysdate); //采集日期
des2src(tradeserial.collect_time,systime); //采集时间
des2src(tradeserial.enteract_date,logicdate); //处理日期
des2src(tradeserial.enteract_time,systime); //处理时间
tradeserial.maindevice_id = rPack->lvol6; //上传工作站标识
// tradeserial.device_id = rPack->lvol7; //采集设备标识
tradeserial.card_id =card_id; //卡号
tradeserial.purse_id = PURSE_NO_ONE; //钱包号
tradeserial.customer_id = tCard.cosumer_id; //客户标识
tradeserial.in_balance=rPack->damt0; //入卡值
tradeserial.trade_count=rPack->lvol1+1; //交易次数
des2src(tradeserial.oper_code,rPack->scust_limit); //操作员代码
tradeserial.sys_id = 0; //外部系统标识
des2src(IA.sArrInActno[0],tAccount.account_id); //帐户
IA.iCardNo=tCard.card_id;
IA.iFeeType=tCustomer.fee_type;
IA.dArrInAmt[0]=tradeserial.trade_fee;
IA.iArrInFeeSwitch[0]=rPack->lvol0;
IA.iArrInFeeSwitch[1]=rPack->lvol1;
IA.iArrInFeeSwitch[2]=rPack->lvol2;
IA.iArrInFeeSwitch[3]=rPack->lvol3;
IA.iArrInFeeSwitch[4]=rPack->lvol4;
IA.iArrInFeeSwitch[5]=rPack->lvol5;
ret=process(&IA,&tradeserial);
if(ret)
{
writelog(LOG_ERR,"process ret[%d]",ret);
*pRetCode=ret;
goto L_RETU;
}
sprintf(out_pack->vsmess,"流水号:%d ",IA.iSerialNo);
for(i=1;i<=IA.iOutTxTypeCnt;i++)
{
switch(IA.iArrOutTxType[i])
{
case TXTYPE_TOLL_DEPOSIT:
case TXTYPE_DEDUCT_DEPOSIT:
case TXTYPE_RETURN_DEPOSIT:
tradeserial.deposit_fee=IA.dArrOutAmt[i];
break;
case TXTYPE_PRE_TOLL_BOARD:
case TXTYPE_TOLL_BOARD:
case TXTYPE_DEDUCT_BOARD:
case TXTYPE_RETURN_BOARD:
tradeserial.boardfee=IA.dArrOutAmt[i];
break;
case TXTYPE_TOLL_CHARGE:
tradeserial.in_fee=IA.dArrOutAmt[i];
break;
default:
break;
}
if(amtcmp(IA.dArrOutAmt[i],0)!=0)
{
sprintf(sMsg,"%s:%.2lf元 ",IA.sArrOutTxName[i],IA.dArrOutAmt[i]);
strcat(out_pack->vsmess,sMsg);
}
}
writelog(LOG_DEBUG,out_pack->vsmess);
SetCol(handle,0);
SetCol(handle,F_LSERIAL1,F_DAMT2,F_DAMT3,F_DAMT4,F_VSMESS,0);
out_pack->lserial1=tradeserial.serial_no; //流水号
out_pack->damt2=tradeserial.trade_fee; //充值金额
out_pack->damt3=tradeserial.boardfee; //搭伙费
out_pack->damt4=tradeserial.out_balance; //出卡值
ret = DB_t_tif_tradeserial_add(&tradeserial);
if (ret)
{
writelog(LOG_ERR,"ret[%d]",ret);
if(DB_REPEAT==ret)
*pRetCode = E_DB_TRADESERIAL_E;
else
*pRetCode = E_DB_TRADESERIAL_I;
goto L_RETU;
}
memset(&rpttrans_comp,0,sizeof rpttrans_comp);
/*
ret = DB_t_tif_report_trans_comp_read_by_cmp_date(sysdate,&rpttrans_comp);
if(ret)
{
if(DB_NOTFOUND != ret)
{
*pRetCode = E_DB_RPT_TRANS_COMP_R;
goto L_RETU;
}
des2src(rpttrans_comp.cmp_date,sysdate);
rpttrans_comp.localauto_num = 1;
rpttrans_comp.localauto_amt = tradeserial.trade_fee;
ret = DB_t_tif_report_trans_comp_add(&rpttrans_comp);
if(ret)
{
*pRetCode = E_DB_RPT_TRANS_COMP_I;
goto L_RETU;
}
}
else
{
rpttrans_comp.localauto_num += 1;
rpttrans_comp.localauto_amt += tradeserial.trade_fee;
ret = DB_t_tif_report_trans_comp_update_by_cmp_date(sysdate,&rpttrans_comp);
if(ret)
{
*pRetCode = E_DB_RPT_TRANS_COMP_U;
goto L_RETU;
}
}
*/
ret = DB_t_tif_report_trans_comp_read_by_cmp_date(tDiffTransfer.op_date,&rpttrans_comp);
if(ret)
{
*pRetCode = E_DB_RPT_TRANS_COMP_R;
goto L_RETU;
}
rpttrans_comp.localauto_num += 1;
rpttrans_comp.localauto_amt += tradeserial.trade_fee;
ret = DB_t_tif_report_trans_comp_update_by_cmp_date(tDiffTransfer.op_date,&rpttrans_comp);
if(ret)
{
*pRetCode = E_DB_RPT_TRANS_COMP_U;
goto L_RETU;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F847119(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret=0;
char h_password[7] = ""; //卡密码
char seed_key[17] = ""; //种子密钥
T_t_pif_card tCard;
T_t_tif_tradeserial tradeserial;
T_t_tif_writefailed tWriteFailed;
T_t_cif_customer tCustomer;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
memset(&tCard,0,sizeof(tCard));
memset(&tradeserial,0,sizeof(tradeserial));
memset(&tWriteFailed, 0, sizeof tWriteFailed);
memcpy(seed_key,STATIC_SEED_KEY,sizeof(seed_key)); //读种子密钥
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_LVOL0,F_LVOL1,F_LVOL5,F_LVOL6,
F_SCUST_NO, F_SCUST_NO2,F_SCUST_AUTH,F_SCUST_AUTH2,
F_SDATE0,F_SNAME,F_SNAME2,
F_SOPEN_EMP,F_SSTATUS0,
F_DAMT2,F_LSERIAL1,F_VSMESS,
F_SORDER0,F_SORDER1,F_SORDER2,
F_SHOLDER_AC_NO,F_SSTAT_TYPE,F_SSTAT_TYPE2,
F_SNATION_CODE,F_SBRANCH_CODE0,
0);
/************************************************************************/
ret = do_process(&tCard, &tWriteFailed, rPack, &tradeserial);
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(tCard.cosumer_id, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",tCard.cosumer_id);
if(DB_NOTFOUND==ret)
*pRetCode = E_CUSTOMER_NOT_EXIST;
else
*pRetCode = E_DB_CUSTOMER_R;
goto L_RETU;
}
EncodePwd(seed_key,h_password,tCard.password,1); //卡密码
DB_t_cif_customer_free_lock_cur();
if(amtcmp(tradeserial.out_balance,0)<0)
{
*pRetCode=E_ENTER_ACCOUNT;
goto L_RETU;
}
sprintf(out_pack->vsmess,"流水号:%d 补写金额:%.2lf元 补写前卡余额:%.2lf元 卡当前余额:%.2lf元",tradeserial.serial_no,tradeserial.trade_fee,tradeserial.in_balance,tradeserial.out_balance);
writelog(LOG_DEBUG,out_pack->vsmess);
out_pack->lvol0 = tCard.card_id; //交易卡号
out_pack->lvol1 = tCustomer.cut_type; //客户类别
out_pack->lvol5 = tCustomer.fee_type; //收费类别
des2src(out_pack->scust_no,tCard.showid); //显示卡号
des2src(out_pack->scust_no2,tCustomer.classdept_no); //部门号
des2src(out_pack->scust_auth,tCustomer.stuemp_no); //学号
des2src(out_pack->scust_auth2,tCustomer.man_id); //身份证号
des2src(out_pack->sname,tCustomer.cut_name); //客户姓名
des2src(out_pack->sname2,tCustomer.lib_cardid); //图书证号
des2src(out_pack->sstatus0,tCustomer.sex); //性别
des2src(out_pack->sopen_emp,h_password); //卡密码
des2src(out_pack->sdate0,tCard.end_time); //有效截至日期
strcpy(out_pack->sorder0,CARD_STRUCT_VERSION); //制卡版本号
strcpy(out_pack->sorder1,CARD_REGISTER_PUBLISH_CODE); //发卡注册标识号
strcpy(out_pack->sorder2,CARD_REGISTER_SERVICE_CODE); //服务注册标识号
sprintf(out_pack->sholder_ac_no,"%d",tCustomer.cut_id); //客户号
des2src(out_pack->sstat_type,tCustomer.man_idtype); //证件类型
des2src(out_pack->snation_code,tCustomer.country); //国籍
sprintf(out_pack->sstat_type2,"%d",tCustomer.nation); //民族
des2src(out_pack->sbranch_code0,tCustomer.school_code); //院校代码
out_pack->damt2=tradeserial.out_balance; //出卡值=入卡值+发生额
out_pack->lserial1=tradeserial.serial_no; //流水号
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
static int elect_request_changzhou(ST_PACK *in_pack,char ext_msg[256]){
int ret = 0;
char c_drtbranch[10]="";
char c_bccbasefuncno[10]="";
int DRTP_BRANCH =0;
int BCC_BASEFUNCNO =0;
ST_PACK ArrayPack; // 设置返回包
ST_CPACK aPack; // 设置应答包
ST_CPACK sPack; // 设置发送包
int card_id;
T_t_cif_customer tCustomer;
T_t_pif_spefee tSpeFee;
T_t_aif_account tAccount;
T_t_pif_card tCard;
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tSpeFee,0,sizeof(tSpeFee));
memset(&tAccount,0,sizeof(tAccount));
memset(&tCard,0,sizeof(tCard));
card_id=in_pack->lvol0;
ret=DB_t_pif_card_read_by_card_id(card_id, &tCard);
if(ret)
{
if(DB_NOTFOUND==ret)
ret=E_CARDNO_NOT_EXIST;
else
ret=E_DB_CARD_R;
return ret;
}
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(tCard.cosumer_id, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",tCard.cosumer_id);
if(DB_NOTFOUND==ret)
ret= E_CUSTOMER_NOT_EXIST;
else
ret= E_DB_CUSTOMER_R;
return ret;
}
ret=GetParameter(2501, c_drtbranch);
if(ret){
writelog(LOG_ERR,"get_parameter error,error code=[%d]",ret);
return ret;
}
ret=GetParameter(2502, c_bccbasefuncno);
if(ret){
writelog(LOG_ERR,"get_parameter error,error code=[%d]",ret);
return ret;
}
DRTP_BRANCH = atoi(c_drtbranch);
BCC_BASEFUNCNO = atoi(c_bccbasefuncno);
ResetNormalCPack(&aPack, 0, 1);
memset(&ArrayPack, 0, sizeof(ArrayPack));
ResetNormalCPack(&sPack, 0, 1);
SetHeadCol(&sPack, F_SSECTYPES,F_LVOL0,F_LVOL1,F_SORDER0,F_SCUST_AUTH,0); // 设置发送windows BU的头部视图信息
sPack.head.RequestType = 847357;
sPack.pack.lvol0=in_pack->lvol10;//房间号
sPack.pack.lvol1=D2I(in_pack->damt1*100);//转账金额(分)
memcpy(sPack.pack.sorder0,tCustomer.cut_name,11);
ret = ExtCall(0, DRTP_BRANCH, BCC_BASEFUNCNO, 0, TIMEOUT, &sPack, &aPack, &ArrayPack);
if (ret < 0||aPack.head.retCode!=0)
{
if(ret<0)
{
writelog(LOG_ERR,"Call 847357 error,errcode=[%d],retCode=[%d]",ret,aPack.head.retCode);
return ret;
}
else
{
writelog(LOG_ERR,"Call 847357 error,errcode=[%d],retCode=[%d]",ret,aPack.head.retCode);
return aPack.head.retCode;
}
}
return 0;
}
//系统正式入账
int enter_account(ST_PACK *in_pack,InAcc *IA,ST_PACK *out_pack,T_t_tif_tradeserial *tradeserial){
int ret = 0;
int i=0;
int card_id = 0;
char logicdate[11]="";
char sysdate[11]="";
char systime[9]="";
char sMsg[256]="";
T_t_cif_customer tCustomer;
T_t_pif_spefee tSpeFee;
T_t_aif_account tAccount;
T_t_pif_card tCard;
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tSpeFee,0,sizeof(tSpeFee));
memset(&tAccount,0,sizeof(tAccount));
memset(&tCard,0,sizeof(tCard));
// memset(&tradeserial,0,sizeof tradeserial);
card_id=in_pack->lvol0;
ret=get_datetime_from_db(sysdate,systime);
if(ret)
{
writelog(LOG_ERR,"get_datetime_from_db error,error code=[%d]",ret);
getsysdate(sysdate);
getsystime(systime);
return ret;
}
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
writelog(LOG_ERR,"GetLogicDate error,errcode=[%d]",ret);
return ret;
}
ret=DB_t_pif_card_read_by_card_id(card_id, &tCard);
if(ret)
{
if(DB_NOTFOUND==ret)
ret=E_CARDNO_NOT_EXIST;
else
ret=E_DB_CARD_R;
return ret;
}
if(strncmp(tCard.state_id,CARDSTAT_REG,4)!=0)
{
if('2'==tCard.state_id[CARDSTAT_TYPE_REG])
ret= E_CARDNO_LOGOUT;
else if('3'==tCard.state_id[CARDSTAT_TYPE_REG])
ret = E_CARD_CHANGE;
else if(tCard.state_id[CARDSTAT_TYPE_LOST]==STATE_TRUE)
ret=E_CARDNO_LOST;
else if(tCard.state_id[CARDSTAT_TYPE_FREEZE]==STATE_TRUE)
ret=E_CARDNO_FREEZE;
else if(tCard.state_id[CARDSTAT_TYPE_WFAIL]==STATE_TRUE)
ret=E_CARDNO_WFAIL;
return ret;
}
//根据卡号和钱包号得到消费者账号(借方)
ret=DB_t_aif_account_read_by_card_id_and_purse_id(card_id, PURSE_NO_ONE,&tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_read_by_card_id_and_purse_id ret[%d]card_id[%d]",ret,card_id);
if(DB_NOTFOUND==ret)
ret=E_ACTNO_NOT_EXIST;
else
ret=E_DB_ACCOUNT_R;
return ret;
}
ret=DB_t_cif_customer_read_lock_by_cur_and_cut_id(tCard.cosumer_id, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"cut_id[%d]",tCard.cosumer_id);
if(DB_NOTFOUND==ret)
ret= E_CUSTOMER_NOT_EXIST;
else
ret= E_DB_CUSTOMER_R;
return ret;
}
//得到收费类别
if(0==tCustomer.fee_type)
{
ret=DB_t_pif_spefee_read_by_dept_code_and_cut_type(tCustomer.classdept_no, tCustomer.cut_type,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.fee_type=tCustomer.cut_type;
}
else
{
DB_t_cif_customer_free_lock_cur();
return E_DB_SPEFEE_R;
}
}
else
{
tCustomer.fee_type=tSpeFee.fee_type;
}
//更新客户表的收费类别字段
ret=DB_t_cif_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
ret= E_CUSTOMER_NOT_EXIST;
else
ret= E_DB_CUSTOMER_U;
return ret;
}
}
DB_t_cif_customer_free_lock_cur();
//已经入账了
if(tradeserial->serial_state == SERISTAT_DEBT)
goto L_RET;
IA->iCardNo=tCard.card_id;
IA->iFeeType=tCustomer.fee_type;
if(amtcmp(tradeserial->trade_fee, 0) <=0)
return E_INPUT_AMT_NULL;
IA->dArrInAmt[0]=tradeserial->trade_fee;
IA->iMainDevId=tradeserial->maindevice_id; //工作站标识
IA->iDevId=tradeserial->device_id; //设备ID
IA->iSerialNo=tradeserial->serial_no; //流水号
IA->iTradeNo=tradeserial->serial_type; //交易码
strcpy(IA->sTxDate,tradeserial->operate_date); //交易日期
strcpy(IA->sTxTime,tradeserial->operate_time); //交易时间
strcpy(IA->sTxCollectDate,tradeserial->collect_date); //采集日期
strcpy(IA->sTxCollectTime,tradeserial->collect_time); //采集时间
strcpy(IA->sTxAccDate,tradeserial->enteract_date); //记账日期
strcpy(IA->sTxAccTime,tradeserial->enteract_time); //记账时间
strcpy(IA->sMdeOper,tradeserial->oper_code); //操作员
strcpy(IA->sChkOper,tradeserial->reserve_1); //复核操作员
IA->iUseCardFlag=USE_CARD_TYPE_ONLINE; //联机交易
IA->iTxCnt=tradeserial->trade_count; //交易次数
IA->dInCardBala=tradeserial->in_balance; //入卡值
IA->dOutCardBala=-1; //出卡值
//修改借方和贷方帐户余额，记会计分录帐
ret=AccountProcess(IA);
if(ret)
{
writelog(LOG_ERR,"AccountProcess ret[%d]",ret);
return ret;
}
tradeserial->out_balance=IA->dOutCardBala; //出卡值
if(amtcmp(tradeserial->out_balance,0)<0)
{
return E_ENTER_ACCOUNT;
}
for(i=1;i<=IA->iOutTxTypeCnt;i++)
{
switch(IA->iArrOutTxType[i])
{
case TXTYPE_TOLL_DEPOSIT:
case TXTYPE_TOLL_DEPOSIT_BILL:
case TXTYPE_TOLL_DEPOSIT_FUNDBOOK:
case TXTYPE_DEDUCT_DEPOSIT:
case TXTYPE_RETURN_DEPOSIT:
tradeserial->deposit_fee=IA->dArrOutAmt[i];
break;
case TXTYPE_PRE_TOLL_BOARD:
case TXTYPE_PRE_TOLL_BOARD_BILL:
case TXTYPE_BANK_PRE_TOLL_BOARD:
case TXTYPE_PRE_TOLL_BOARD_FUNDBOOK:
case TXTYPE_SUBSIDY_PRE_TOLL_BOARD_CASH:
case TXTYPE_SUBSIDY_PRE_TOLL_BOARD_BILL:
case TXTYPE_SUBSIDY_PRE_TOLL_BOARD_FUNDBOOK:
case TXTYPE_TOLL_BOARD:
case TXTYPE_DEDUCT_BOARD:
case TXTYPE_RETURN_BOARD:
case TXTYPE_RETURN_BOARD_BILL:
case TXTYPE_RETURN_BOARD_FUNDBOOK:
tradeserial->boardfee=IA->dArrOutAmt[i];
break;
case TXTYPE_TOLL_CHARGE:
case TXTYPE_TOLL_CHARGE_BILL:
case TXTYPE_TOLL_CHARGE_FUNDBOOK:
tradeserial->in_fee=IA->dArrOutAmt[i];
break;
case TXTYPE_TOLL_CARDCOST:
case TXTYPE_TOLL_CARDCOST_BILL:
case TXTYPE_TOLL_CARDCOST_FUNDBOOK:
tradeserial->cost_fee=IA->dArrOutAmt[i];
break;
default:
break;
}
if(amtcmp(IA->dArrOutAmt[i],0)!=0)
{
sprintf(sMsg,"%s:%.2lf元 ",IA->sArrOutTxName[i],IA->dArrOutAmt[i]);
}
}
tradeserial->serial_state=SERISTAT_DEBT;
/*
ret = DB_t_tif_tradeserial_update_lock_by_cur(&tradeserial);
if(ret)
{
writelog(LOG_ERR,"db update t_tif_tradeserial error,errcode=[%d]",ret);
return E_DB_TRADESERIAL_U;
}
*/
L_RET:
out_pack->damt0=tradeserial->out_balance; //出卡值
out_pack->damt1=tradeserial->trade_fee; //交易金额
out_pack->lvol0 = tradeserial->serial_no; //流水号
sprintf(sMsg,"交易前卡余额:%.2lf元 卡当前余额:%.2lf元",tradeserial->in_balance,tradeserial->out_balance);
strcat(out_pack->vsmess,sMsg);
writelog(LOG_DEBUG,out_pack->vsmess);
return 0;
}
