static int doCustomer(int custid,T_t_customer& tCustomer)
{
int ret=0;
ret=DB_t_customer_read_lock_by_cur_and_custid(custid,&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
return E_NOTEXIST_CUSTOMER;
else
return E_DB_CUSTOMER_R;
}
if(tCustomer.status[0]!=STATUS_NORMAL)
return E_CUSTOMER_LOGOUT;
tCustomer.eaccflag[0]='0';
des2src(tCustomer.lastsaved,CAccTrans::getInstance()->trans.sysdatetime);
ret=DB_t_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
return E_NOTEXIST_CUSTOMER;
else
return E_DB_CUSTOMER_U;
}
return 0;
}
static int doCustomer(int custid,T_t_customer& tCustomer)
{
int ret=0;
ret=DB_t_customer_read_lock_by_cur_and_custid(custid,&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
return E_NOTEXIST_CUSTOMER;
else
return E_DB_CUSTOMER_R;
}
if(tCustomer.status[0]==STATUS_DELETE)
{
DB_t_customer_free_lock_cur();
return E_CUSTOMER_LOGOUT;
}
if(tCustomer.eaccflag[0]=='1')
{
DB_t_customer_free_lock_cur();
return E_CUST_EACC_OPENED;
}
tCustomer.useflag[0]='1';
tCustomer.eaccflag[0]='1';
getfmtsysdatetime(tCustomer.lastsaved);
ret=DB_t_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
return E_NOTEXIST_CUSTOMER;
else
return E_DB_CUSTOMER_U;
}
return 0;
}
int F847107(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 cardno=0;
char sMsg[256]="";
char cardphyid[41]="";
T_t_tif_tradeserial tradeserial;
T_t_card tCard;
T_t_tif_savdtl tSavdtl;
T_t_customer tCustomer;
T_t_spefee tSpeFee;
T_t_aif_account tAccount; //帐户表
InAcc IA;
double dSerialNo = 0;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
*pRetCode=0;
memset(&tCard,0,sizeof(tCard));
memset(&tCustomer,0,sizeof(tCustomer));
memset(&IA,0,sizeof(IA));
memset(&tSpeFee,0,sizeof(tSpeFee));
memset(&tAccount,0,sizeof(tAccount));
memset(&tradeserial,0,sizeof(tradeserial));
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_LSERIAL1,F_DAMT2,F_VSMESS,0);
cardno=rPack->lvol0;
des2src(cardphyid, rPack->sbank_acc); //物理卡号
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;
}
if(amtcmp(rPack->damt1,rPack->damt0)<0)
{
writelog(LOG_ERR,"tCard balance[%lf] amount[%lf]",rPack->damt1,rPack->damt0);
*pRetCode= E_BALANCE_SHORTAGE;
goto L_RETU;
}
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
ret=DB_t_card_read_by_cardno(cardno, &tCard);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode=E_CARDNO_NOT_EXIST;
else
*pRetCode=E_DB_CARD_R;
goto L_RETU;
}
if(strncmp(tCard.cardattr,CARDSTAT_REG,4)!=0)
{
if('2'==tCard.cardattr[CARDSTAT_TYPE_REG])
*pRetCode = E_CARD_CLOSE;
else if('3'==tCard.cardattr[CARDSTAT_TYPE_REG])
*pRetCode = E_CARD_CHANGE;
else if(tCard.cardattr[CARDSTAT_TYPE_LOST]==STATE_TRUE)
*pRetCode=E_CARD_LOST;
else if(tCard.cardattr[CARDSTAT_TYPE_FREEZE]==STATE_TRUE)
*pRetCode=E_CARD_FREEZE;
else if(tCard.cardattr[CARDSTAT_TYPE_WFAIL]==STATE_TRUE)
*pRetCode=E_CARDNO_WFAIL;
goto L_RETU;
}
trim(cardphyid);
trim(tCard.cardphyid);
if(strcmp(tCard.cardphyid,cardphyid)!=0)
{
writelog(LOG_ERR,"db cardphyid[%s],input cardphyid[%s]",tCard.cardphyid,cardphyid);
*pRetCode= E_CARD_PHYNO_DIFFER;
goto L_RETU;
}
tradeserial.trade_fee = rPack->damt0; //支取金额
ret=DB_t_aif_account_read_by_cardno_and_purseno(cardno,PURSE_NO_ONE,&tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_read_by_cardno_and_purseno ret[%d]cardno[%d]purseno[%d]",ret,cardno);
if(DB_NOTFOUND==ret)
*pRetCode= E_ACTNO_NOT_EXIST;
else
*pRetCode= E_DB_ACCOUNT_R;
goto L_RETU;
}
if(amtcmp(tradeserial.trade_fee,tAccount.cur_freebala)>0)
{
writelog(LOG_ERR,"tradeserial.trade_fee[%lf]tAccount.cur_freebala[%lf]",tradeserial.trade_fee,tAccount.cur_freebala);
*pRetCode= E_BALANCE_SHORTAGE;
goto L_RETU;
}
//查询支票经费本有无充值记录
ret=ChkSavdtl(cardno,&tSavdtl);
if(ret)
{
writelog(LOG_ERR,"ChkSavdtl ret[%d]",ret);
*pRetCode=ret;
goto L_RETU;
}
IA.dArrInAmt[0]=tradeserial.trade_fee;
switch(tSavdtl.billtype)
{
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]",tSavdtl.billtype);
IA.iArrInFeeSwitch[1]=1;
break;
}
ret=DB_t_customer_read_lock_by_cur_and_custid(tCard.custid, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"custid[%d]",tCard.custid);
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_R;
goto L_RETU;
}
//得到收费类别
if(tCustomer.feetype<1)
{
ret=DB_t_spefee_read_by_deptcode_and_custtype(tCustomer.deptcode, tCustomer.custtype,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.feetype=tCustomer.custtype;
}
else
{
DB_t_customer_free_lock_cur();
*pRetCode=E_DB_SPEFEE_R;
goto L_RETU;
}
}
else
{
tCustomer.feetype=tSpeFee.feetype;
}
//更新客户表的收费类别字段
ret=DB_t_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_customer_free_lock_cur();
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_DRAW_DEPOSIT_LOG; //交易代码
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.maindeviceid = rPack->lvol6; //上传工作站标
tradeserial.deviceid = rPack->lvol7; //采集设备标识
tradeserial.cardno = rPack->lvol0; //卡号
tradeserial.purseno = rPack->lvol1; //钱包号
tradeserial.custid = rPack->lvol2; //客户标识
tradeserial.in_balance=rPack->damt1; //入卡值
tradeserial.trade_count=rPack->lvol10+1; //交易次数
des2src(tradeserial.opercode , rPack->scust_limit); //操作员代码
tradeserial.sys_id = 0; //外部系统标识
IA.iCardNo=tCard.cardno;
IA.iFeeType=tCustomer.feetype;
strcpy(IA.sArrInActno[0],tAccount.account_id);
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;
T_t_cardbitmap tCardBitmap;
memset(&tCardBitmap,0,sizeof(tCardBitmap));
ret=DB_t_cardbitmap_read_lock_by_cur_and_cardno(cardno,&tCardBitmap);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode= E_DB_CARD_N;
else
*pRetCode= E_DB_CARD_R;
goto L_RETU;
}
if(tradeserial.trade_count-tCardBitmap.base_no%2000>2000)
{
memcpy(tCardBitmap.bitmap,tCardBitmap.bitmap+1000,1000);
memset(tCardBitmap.bitmap+1000,'0',1000);
tCardBitmap.base_no+=1000;
}
tCardBitmap.bitmap[tradeserial.trade_count-tCardBitmap.base_no-1]='1';
ret=DB_t_cardbitmap_update_lock_by_cur(&tCardBitmap);
if(ret)
{
if(DB_NOTFOUND==ret)
*pRetCode= E_DB_CARD_N;
else
*pRetCode= E_DB_CARD_U;
goto L_RETU;
}
DB_t_cardbitmap_free_lock_cur();
// 调用入账子模块
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_DEDUCT_DEPOSIT:
case TXTYPE_RETURN_DEPOSIT:
tradeserial.depositfee=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.managefee=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元 卡当前余额:%.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->lserial1=tradeserial.serial_no; //流水号
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F847126(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int hi_custid = 0; //客户ID
int hi_custtype = 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_card tCard;
T_t_customer tCustomer;
T_t_aif_account tAccount;
T_t_tif_tradeserial tradeserial;
T_t_tif_savdtl tSavdtl;
T_t_spefee tSpeFee;
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,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);
hi_custid = rPack->lvol0; //客户ID
hi_custtype = rPack->lvol3; //客户类别
des2src(h_showcardid,rPack->scust_no); //显示卡号
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
//检查客户信息，判断是否可以发行卡
des2src(tCard.cardphyid, rPack->sbank_acc); //物理卡号
trim(h_showcardid);
if(strlen(h_showcardid))
{
ret=IsExistShowCardNo(h_showcardid);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
}
ret=IsExistCardByPhyCardNo(tCard.cardphyid);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
ret=IsExistCardByCustomId(hi_custid);
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
ret=DB_t_customer_read_lock_by_cur_and_custid(hi_custid, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"custid[%d]",hi_custid);
if(DB_NOTFOUND==ret)
*pRetCode= E_CUSTOMER_NOT_EXIST;
else
*pRetCode= E_DB_CUSTOMER_R;
goto L_RETU;
}
//得到收费类别
if(tCustomer.feetype<1)
{
ret=DB_t_spefee_read_by_deptcode_and_custtype(tCustomer.deptcode, tCustomer.custtype,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.feetype=tCustomer.custtype;
}
else
{
DB_t_customer_free_lock_cur();
*pRetCode=E_DB_SPEFEE_R;
goto L_RETU;
}
}
else
{
tCustomer.feetype=tSpeFee.feetype;
}
//更新客户表的收费类别字段
ret=DB_t_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_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_custtype,logicdate,card_endtime); //计算卡的有效期
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
*/
// 默认密码, 初始取身份证的后6位, 没有身份证号用默认密码
trim(rPack->sname2);
len=strlen(rPack->sname2) ;
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,DEFAULT_CUST_PWD);
}
ret = getNewUniqNo(KEYTYPE_CARD_ID,&h_temp_Card_id); //获取最大卡号
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
tCard.cardno = D2I(h_temp_Card_id); //卡号
des2src(tCard.showid,h_showcardid); //显示卡号
des2src(tCard.is_main,TYPE_YES); //是否为主卡
des2src(tCard.cardattr,CARDSTAT_REG); //卡状态
tCard.type_id = CT_VIP; //卡类别
EncodePwd(seed_key,h_password,tCard.password,0); //卡密码
tCard.custid = hi_custid; //客户标识
tCard.account_count = ACCOUNT_COUNT_ONE; //卡对应帐户个数
des2src(tCard.begintime,logicdate); //注册时间
des2src(tCard.endtime, card_endtime); //截至时间
tCard.phytype = PHYTYPE_NO_ONE; //设备物理型号;默认为1
// 插入卡信息
ret = DB_t_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.custid = rPack->lvol0; //客户号
des2src(tAccount.custname,rPack->sname); //客户名称
tAccount.custtype = hi_custtype; //客户类别
des2src(tAccount.stuempno,rPack->scust_auth2); //客户学号或员工号
tAccount.cardno = tCard.cardno; //关联卡号
tAccount.purseno = PURSE_NO_ONE; //关联卡钱包号
tAccount.card_type = tCard.type_id; //卡类别
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;
}
// add by 汤成2005-09-05
// 记录发行正式卡信息
/////////////////////////////////////////////////////////////////////////
ret = InsertToCutUpdList(tCard.cardno, CUTUPD_ADD,tCard.cardphyid);
if( ret )
{
*pRetCode = ret;
goto L_RETU;
}
/////////////////////////////////////////////////////////////////////////
tradeserial.serial_no = D2I(h_temp_Serial_no); //流水号
tradeserial.other_seri_no = 0; //上传端流水号
tradeserial.serial_type=TXCODE_CARD_OPEN_VIP_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.maindeviceid = rPack->lvol6; //上传工作站标识
tradeserial.deviceid = rPack->lvol7; //采集设备标识
tradeserial.cardno = tCard.cardno; //卡号
des2src(tradeserial.showid,tCard.showid); //显示卡号
tradeserial.purseno = PURSE_NO_ONE; //钱包号
tradeserial.custid = hi_custid; //客户标识
des2src(tradeserial.opercode , rPack->scust_limit); //操作员代码
tradeserial.sys_id = 0; //外部系统标识
tradeserial.trade_count=1; //当前卡交易次数
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;
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.billno,rPack->sphone); //票据号码
if(strlen(tSavdtl.billno)<1)
{
*pRetCode=E_INPUT_BILLNO;
goto L_RETU;
}
tSavdtl.cardno=tCard.cardno; //卡号
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.billtype=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.cardno;
IA.iFeeType=tCustomer.feetype;
//调用入账子模块
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.depositfee=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.managefee=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.custtype; //客户类别
out_pack->lvol5 = tCustomer.feetype; //收费类别
des2src(out_pack->scust_no,h_showcardid); //显示卡号
des2src(out_pack->scust_no2,tCustomer.deptcode); //部门号
des2src(out_pack->scust_auth,tCustomer.stuempno); //学号
des2src(out_pack->scust_auth2,tCustomer.man_id); //身份证号
des2src(out_pack->sname,tCustomer.custname); //客户姓名
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;
}
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_card tCard;
T_t_tif_tradeserial tradeserial;
T_t_tif_writefailed tWriteFailed;
T_t_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,0);
/************************************************************************/
ret = do_process(&tCard, &tWriteFailed, rPack, &tradeserial);
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
ret=DB_t_customer_read_lock_by_cur_and_custid(tCard.custid, &tCustomer);
if(ret)
{
writelog(LOG_ERR,"custid[%d]",tCard.custid);
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_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.cardno; //交易卡号
out_pack->lvol1 = tCustomer.custtype; //客户类别
out_pack->lvol5 = tCustomer.feetype; //收费类别
des2src(out_pack->scust_no,tCard.showid); //显示卡号
des2src(out_pack->scust_no2,tCustomer.deptcode); //部门号
des2src(out_pack->scust_auth,tCustomer.stuempno); //学号
des2src(out_pack->scust_auth2,tCustomer.man_id); //身份证号
des2src(out_pack->sname,tCustomer.custname); //客户姓名
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.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_customer tCustomer;
T_t_card tCard;
T_t_spefee tSpeFee;
int cancel_account = 1;
double subsidy_money = 0.0;
memset(&tCustomer,0,sizeof(tCustomer));
memset(&tAccount,0,sizeof(tAccount));
memset(&tCard,0,sizeof(tCard));
memset(&tSpeFee,0,sizeof(tSpeFee));
//注销原卡
ret=DB_t_card_read_lock_by_cur_and_cardno(p->cardno, &tCard);
if(ret)
{
if(DB_NOTFOUND==ret)
return E_CARDNO_NOT_EXIST;
else
return E_DB_CARD_R;
}
if(p->cardno!=tCard.cardno)
{
DB_t_card_free_lock_by_cur();
writelog(LOG_ERR,"cardno[%d] db cardno[%d]",p->cardno,tCard.cardno);
return E_DB_CARD_R;
}
p->depositfee =tCard.depositfee; //押金
// tCard.depositfee=0;
des2src(tCard.cardattr,CARDSTAT_LOGOUT); //注销
des2src(tCard.endtime,p->operate_date); //注销日期
ret=DB_t_card_update_lock_by_cur(&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",tCard.cardno);
return E_DB_CARD_U;
}
DB_t_card_free_lock_by_cur();
//如果是非记名临时卡则注销客户
ret=DB_t_customer_read_lock_by_cur_and_custid(tCard.custid,&tCustomer);
if(ret)
{
writelog(LOG_ERR,"custid[%d]",tCard.custid);
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.feetype<1)
{
ret=DB_t_spefee_read_by_deptcode_and_custtype(tCustomer.deptcode, tCustomer.custtype,&tSpeFee);
if(ret)
{
if(DB_NOTFOUND==ret)
{
tCustomer.feetype=tCustomer.custtype;
}
else
{
DB_t_customer_free_lock_cur();
return E_DB_SPEFEE_R;
}
}
else
{
tCustomer.feetype=tSpeFee.feetype;
}
upd_flag=1;
}
if(upd_flag)
{
ret=DB_t_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
writelog(LOG_ERR,"custid[%d]",tCard.custid);
return E_DB_CUSTOMER_U;
}
}
DB_t_customer_free_lock_cur();
IA->iFeeType=tCustomer.feetype;
ret=DB_t_aif_account_read_by_cardno_and_purseno(tCard.cardno,PURSE_NO_ONE, &tAccount);
if(ret)
{
writelog(LOG_ERR,"DB_t_aif_account_read_by_cardno_and_purseno ret[%d]cardno[%d]",ret,tCard.cardno);
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,"cardno[%d] act_id[%s] cur_freebala[%lf],input card_balance[%lf]",tCard.cardno,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,"cardno[%d] act_id[%s] cur_freebala[%lf],input card_balance[%lf]",tCard.cardno,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,"卡库不符|按卡余额退卡");
// 不销户
cancel_account = 0;
//p->managefee = (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
}
des2src(IA->sArrInActno[0],tAccount.account_id); //卡帐户
// 是否退未领取补助, 先退补助
if(IS_YES==rPack->lvol4)
{
// 计算未领取补助金额
if(USE_CARD_TYPE_ONLINE==IA->iUseCardFlag) //有卡交易
ret = do_refundment_subsidy(&tAccount,&subsidy_money,p->opercode,rPack->lvol5);
else
ret = do_refundment_subsidy(&tAccount,&subsidy_money,p->opercode,-1);
if(ret)
{
return ret;
}
/*
ret = do_accounting_subsidy(IA,subsidy_money);
if(ret)
{
writelog(LOG_ERR,"accounting subsidy error,ret[%d]",ret);
return ret;
}
*/
if(amtcmp(subsidy_money,0.0)>0)
{
IA->dArrInAmt[4] = subsidy_money;
}
else
{
IA->dArrInAmt[5] = -subsidy_money;
}
p->trade_fee += subsidy_money;
//IA->dInCardBala += subsidy_money;
writelog(LOG_DEBUG,"account[%s]cardid[%d],subsidy_money[%.2f]",
tAccount.account_id,tAccount.cardno,subsidy_money);
}
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->managefee = tAccount.cur_frozebala; //冻结金额//Changed by hhd at 2005-10-22 14:21
IA->iTradeNo=p->serial_type; //交易码
IA->iMainDevId=p->maindeviceid; //工作站标识
IA->iDevId=p->deviceid; //设备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); //记账时间
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->managefee; //搭伙费
IA->dArrInAmt[2]=p->depositfee; //押金
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)
if(!cancel_account)
{
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;
*/
return 0;
}
static int doReverse(char* oldaccdate,int oldtermid,int oldtermseqno,char *cardphyid)
{
//查找操作员流水
int ret=0;
T_t_card tCard;
CAccTrans *pAccTrans=CAccTrans::getInstance();
TRANS& trans=pAccTrans->trans;
trans.revflag=1;//冲正标志
char transdtlname[61]={0};
ret=GetTransdtlTableName(oldaccdate,transdtlname);
if(ret)
{
writelog(LOG_ERR,"GetTransdtlTableName err");
return ret;
}
T_t_transdtl transdtl;
ret=ReadTransdtlData(transdtlname,oldaccdate,oldtermid,oldtermseqno,transdtl);
if(ret)
{
writelog(LOG_ERR,"ReadTransdtlData transdtlname[%s],oldaccdate[%s],oldtermid[%d],oldtermseqno[%d]",transdtlname,oldaccdate,oldtermid,oldtermseqno);
return ret;
}
trans.cardno=transdtl.cardno;
if('1'==transdtl.revflag[0])
{
memset(&tCard,0,sizeof(tCard));
ret=DB_t_card_read_by_cardno(transdtl.cardno,&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",transdtl.cardno);
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDNO,tCard.cardno);
else
return E_DB_CARD_R;
}
pAccTrans->remark="该交易已冲正";
strcpy(cardphyid,tCard.cardphyid);
return 0;
}
if(transdtl.cardcnt>0&&transdtl.cardno>0)
{
ret=UpdateCardBitmap(transdtl.cardno,transdtl.cardcnt,CARDBITMAPTYPE_REV);
if(ret)
return ret;
}
if(strlen(transdtl.opercode))
{
if(strcmp(transdtl.opercode,pAccTrans->trans.opercode)!=0)
{
return ERRINFO(E_REVOPER,transdtl.opercode);
}
}
else
{
des2src(transdtl.opercode,trans.opercode);
}
ret=UpdateTransdtlHisRevFlag(transdtlname,oldaccdate,oldtermid,oldtermseqno);
if(ret)
{
writelog(LOG_ERR,"UpdateTransdtlRevFlag ret[%d] transdtlname[%s]accdate[%s]termid[%d]termseqno[%d]",ret,transdtlname,oldaccdate,oldtermid,oldtermseqno);
return ret;
}
transdtl.termid=trans.termid;
transdtl.termseqno=trans.termseqno;
strcpy(transdtl.accdate,trans.accdate);
strcpy(transdtl.acctime,trans.acctime);
des2src(transdtl.transdate,trans.transdate);
des2src(transdtl.transtime,trans.transtime);
des2src(transdtl.opercode,trans.opercode);
transdtl.transcode=TC_CARDOPENREV;
transdtl.cardcnt=trans.paycnt;
transdtl.cardbefbal=trans.cardbefbal;
transdtl.cardaftbal=0;
transdtl.amount=-transdtl.amount;
if(amtcmp(trans.cardbefbal,0)>0)
{
transdtl.transflag=TF_PAY;
transdtl.cardcnt=trans.paycnt;
}
transdtl.managefee=-transdtl.managefee;
transdtl.revflag[0]=0;
ret=DB_t_transdtl_add(&transdtl);
if(ret)
{
if(DB_REPEAT==ret)
return E_DB_TRANSDTL_E;
else
return E_DB_TRANSDTL_I;
}
memset(&tCard,0,sizeof(tCard));
ret=DB_t_card_read_lock_by_cur_and_cardno(transdtl.cardno,&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",transdtl.cardno);
if(DB_NOTFOUND==ret)
return E_DB_CARD_N;
else
return E_DB_CARD_R;
}
if(tCard.status[0]!=STATUS_NORMAL)
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_LOGOUT,transdtl.cardno);
}
if('1'==tCard.frozeflag[0])
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_FREEZE,transdtl.cardno);
}
if('1'==tCard.lossflag[0])
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_LOST,transdtl.cardno);
}
if('1'==tCard.badflag[0])
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_BADRECORD,transdtl.cardno);
}
ret=getCardVerNo(tCard.cardverno);
if(ret)
{
DB_t_card_free_lock_by_cur();
return ret;
}
tCard.status[0]=STATUS_DELETE;
strcpy(cardphyid,tCard.cardphyid);
strcpy(tCard.closedate,trans.transdate);
des2src(tCard.lastsaved,trans.sysdatetime);
ret=DB_t_card_update_lock_by_cur(&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",tCard.cardno);
if(DB_NOTFOUND==ret)
return E_DB_CARD_N;
else
return E_DB_CARD_U;
}
T_t_customer tCustomer;
memset(&tCustomer,0,sizeof(tCustomer));
//检查客户
if(tCard.custid)
{
ret=DB_t_customer_read_lock_by_cur_and_custid(tCard.custid,&tCustomer);
if(ret)
{
writelog(LOG_ERR,"custid[%d]",tCard.custid);
if(DB_NOTFOUND==ret)
return E_DB_CUSTOMER_N;
else
return E_DB_CUSTOMER_R;
}
if(tCustomer.status[0]!=STATUS_NORMAL)
{
DB_t_customer_free_lock_cur();
return E_CUSTOMER_LOGOUT;
}
tCustomer.holdcardcnt--;
des2src(tCustomer.lastsaved,trans.sysdatetime);
ret=DB_t_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
writelog(LOG_ERR,"custid[%d]",tCard.custid);
if(DB_NOTFOUND==ret)
return E_DB_CUSTOMER_N;
else
return E_DB_CUSTOMER_U;
}
des2src(trans.stuempno,tCustomer.stuempno);
}
////添加卡版本号记录
T_t_cardver cardver;
memset(&cardver,0,sizeof(cardver));
cardver.cardno=tCard.cardno;
des2src(cardver.accdate,pAccTrans->trans.accdate);
cardver.termid=trans.termid;
cardver.termseqno=trans.termseqno;
cardver.cardno=tCard.cardno;
cardver.status[0]=STATUS_NORMAL;
des2src(cardver.cardphyid,tCard.cardphyid);
des2src(cardver.stuempno,tCustomer.stuempno);
cardver.cardvertype=CARDVERTYPE_CARDCLOSE;
des2src(cardver.cardverno,tCard.cardverno);
ret=DB_t_cardver_add(&cardver);
if(ret)
{
writelog(LOG_ERR,"cardverno[%s]",cardver.cardverno);
if(DB_REPEAT==ret)
return E_DB_CARDVER_E;
else
return E_DB_CARDVER_I;
}
if(pAccTrans->sysPara.bEnableCardMgr)
{
ret=UseShowCardNoRev(tCard.showcardno);
if(ret)
return ret;
trans.cardno=tCard.cardno;
T_t_carddtl carddtl;
memset(&carddtl,0,sizeof(carddtl));
des2src(carddtl.accdate,trans.accdate);
des2src(carddtl.acctime,trans.acctime);
carddtl.termid=trans.termid;
carddtl.termseqno=trans.termseqno;
des2src(carddtl.opercode,trans.opercode);
carddtl.cardtype=tCard.cardtype;
carddtl.usetype=CARDUSETYPE_GET;
carddtl.inoutflag=INOUTFLAG_IN;
carddtl.transcnt=1;
strcpy(carddtl.summary,"发卡冲正");
des2src(carddtl.cardphyid,tCard.cardphyid);
des2src(carddtl.showcardno,tCard.showcardno);
ret=DB_t_carddtl_add(&carddtl);
if(ret)
{
if(DB_REPEAT==ret)
return E_DB_CARDDTL_E;
else
return E_DB_CARDDTL_I;
}
}
/*
//回收卡
T_t_cardbook tCardBook;
memset(&tCardBook,0,sizeof(tCardBook));
ret=getCardBookRecordNo(tCardBook.recordno);
if(ret)
return ret;
tCardBook.cardtype=tCard.cardtype;
// strcpy(tCardBook.curno,tCard.showcardno);
// strcpy(tCardBook.startno,tCard.showcardno);
// strcpy(tCardBook.endno,tCard.showcardno);
//// tCardBook.usedcnt=0;
// tCardBook.unusedcnt=1;
tCardBook.status[0]=STATUS_NORMAL;
strcpy(tCardBook.opercode,trans.opercode);
ret=DB_t_cardbook_add(&tCardBook);
if(ret)
{
if(DB_REPEAT==ret)
return E_DB_CARDBOOK_E;
else
return E_DB_CARDBOOK_I;
}
//添加卡片回收明细记录
T_t_carddtl tCarddtl;
memset(&tCarddtl,0,sizeof(tCarddtl));
des2src(tCarddtl.accdate,pAccTrans->sysPara.sSettleDate);
tCarddtl.termid=trans.termid;
tCarddtl.termseqno=trans.termseqno;
tCarddtl.cardtype=tCard.cardtype;
des2src(tCarddtl.showcardno,tCard.showcardno);
des2src(tCarddtl.cardphyid,tCard.cardphyid);
tCarddtl.cardusetype=CARDUSETYPE_REUSE;
des2src(tCarddtl.opercode,trans.opercode);
ret=DB_t_carddtl_add(&tCarddtl);
if(ret)
{
if(DB_REPEAT==ret)
return E_DB_CARDDTL_E;
else
return E_DB_CARDDTL_I;
}
*/
//删除卡交易位图数据
/*
ret=DB_t_cardbitmap_del_by_cardno(tCard.cardno);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",trans.cardno);
return E_DB_CARDBITMAP_D;
}
*/
T_t_account tCardAccount;
memset(&tCardAccount,0,sizeof(tCardAccount));
ret=DB_t_account_read_by_accno(tCard.accno,&tCardAccount);
if(ret)
{
writelog(LOG_ERR,"transdtl.cardno[%d],transdtl.purseno[%d]",transdtl.cardno,transdtl.purseno);
if(DB_NOTFOUND==ret)
return E_NOTEXIST_CARDACCNO;
else
return E_DB_ACCOUNT_R;
}
if(tCardAccount.status[0]!=STATUS_NORMAL)
{
return E_CARDACC_LOGOUT;
}
des2src(trans.cardaccno,tCardAccount.accno);
ret=pAccTrans->doHistoryReverseTrans(oldaccdate,oldtermid,oldtermseqno);
if(ret)
{
if(E_DB_ACCDTL_N!=ret)
return ret;
}
//注销帐户
memset(&tCardAccount,0,sizeof(tCardAccount));
ret=DB_t_account_read_lock_by_c0_and_accno(tCard.accno,&tCardAccount);
if(ret)
{
writelog(LOG_ERR,"transdtl.cardno[%d],transdtl.purseno[%d]",transdtl.cardno,transdtl.purseno);
if(DB_NOTFOUND==ret)
return E_NOTEXIST_CARDACCNO;
else
return E_DB_ACCOUNT_R;
}
if(tCardAccount.status[0]!=STATUS_NORMAL)
{
DB_t_account_free_lock_by_c0();
return E_CARDACC_LOGOUT;
}
if(amtcmp(tCardAccount.balance,0)!=0)
{
writelog(LOG_ERR,"balance[%.2lf]",tCardAccount.balance);
DB_t_account_free_lock_by_c0();
return E_CARDACC_BALANCE_NOZERO;
}
if(amtcmp(tCardAccount.foregift,0)!=0)
{
writelog(LOG_ERR,"foregift[%.2lf]",tCardAccount.foregift);
DB_t_account_free_lock_by_c0();
return E_CARDACC_FOREGIFT_NOZERO;
}
tCardAccount.status[0]=STATUS_DELETE;
tCardAccount.cardbal=0;
strcpy(tCardAccount.closedate,trans.transdate);
ret=DB_t_account_update_lock_by_c0(&tCardAccount);
if(ret)
{
if(DB_NOTFOUND==ret)
return E_NOTEXIST_CARDACCNO;
else
return E_DB_ACCOUNT_U;
}
return 0;
}
int UpdCardExpireDate(char *cardexpiredate,TRUSERID *handle,int *pRetCode,char *szMsg)
{
int ret=0;
CAccTrans& ats=CAccTrans::GetInst();
TRANS& trans=ats.trans;
T_t_card tCard;
memset(&tCard,0,sizeof(tCard));
ret=DB_t_card_read_lock_by_c0_and_cardno(trans.cardno,&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",trans.cardno);
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDNO,trans.cardno);
else
return E_DB_CARD_R;
}
trans.custid=tCard.custid;
trans.cardtype=tCard.cardtype;
trans.feetype=tCard.feetype;
if(tCard.status[0]!=STATUS_NORMAL)
{
DB_t_card_free_lock_by_c0();
return ERRINFO(E_CARD_LOGOUT,trans.cardno);
}
if('1'==tCard.frozeflag[0])
{
DB_t_card_free_lock_by_c0();
return ERRINFO(E_CARD_FREEZE,trans.cardno);
}
if('1'==tCard.lossflag[0])
{
DB_t_card_free_lock_by_c0();
return ERRINFO(E_CARD_LOST,trans.cardno);
}
//比较卡物理ID是否相同
if(strcmp(tCard.cardphyid,trans.cardphyid)!=0)
{
DB_t_card_free_lock_by_c0();
return ERRINFO(E_CARD_PHYNO_DIFFER,trans.cardphyid,tCard.cardphyid);
}
ret=IsInvalidDateTime(cardexpiredate,"YYYYMMDD");
if(ret)
return ret;
if(strncmp(trans.accdate,cardexpiredate,8)>=0)
return ERRINFO(E_CARD_EXPIREDATE,cardexpiredate,trans.accdate);
des2src(tCard.expiredate,cardexpiredate);
des2src(tCard.lastsaved,trans.sysdatetime);
ret=DB_t_card_update_lock_by_cur(&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",tCard.cardno);
if(DB_NOTFOUND==ret)
return E_NOTEXIST_CARDNO;
else
return E_DB_CARD_U;
}
T_t_customer customer;
memset(&customer,0,sizeof(customer));
if(tCard.custid)
{
ret=DB_t_customer_read_lock_by_cur_and_custid(tCard.custid,&customer);
if(ret)
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CUSTOMER,tCard.custid);
else
return E_DB_CUSTOMER_R;
}
if(strncmp(customer.outdate,cardexpiredate,8)!=0)
{
des2src(customer.outdate,cardexpiredate);
des2src(tCard.lastsaved,trans.sysdatetime);
ret=DB_t_customer_update_lock_by_cur(&customer);
if(ret)
{
return E_DB_CUSTOMER_U;
}
}
else
{
DB_t_customer_free_lock_cur();
}
}
T_t_account tCardAccount;
memset(&tCardAccount,0,sizeof(tCardAccount));
ret=DB_t_account_read_by_accno(tCard.accno,&tCardAccount);
if(ret)
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_ACCNO,tCard.accno);
else
return E_DB_ACCOUNT_R;
}
if(tCardAccount.status[0]!=STATUS_NORMAL)
{
return ERRINFO(E_CARDACC_LOGOUT,tCardAccount.accno);
}
trans.custid=tCard.custid;
T_t_transdtl transdtl;
memset(&transdtl,0,sizeof(transdtl));
des2src(transdtl.transdate,trans.transdate);
des2src(transdtl.transtime,trans.transtime);
strcpy(transdtl.accdate,trans.accdate);
strcpy(transdtl.acctime,trans.acctime);
transdtl.termid=trans.termid;
transdtl.termseqno=trans.termseqno;
transdtl.transcode=trans.transcode;
transdtl.paytype=trans.fundtype;
des2src(transdtl.voucherno,trans.voucherno);
transdtl.cardno=trans.cardno;
transdtl.purseno=trans.purseno;
transdtl.cardbefbal=trans.cardbefbal;
// transdtl.cardcnt=trans.cardcnt;
transdtl.cardaftbal=trans.cardaftbal;
transdtl.managefee=trans.totalfeeamt;
transdtl.amount=trans.totaltransamt;
transdtl.custid=tCardAccount.custid;
des2src(transdtl.showcardno,tCard.showcardno);
des2src(transdtl.custname,customer.custname);
des2src(transdtl.opercode,trans.opercode);
transdtl.status[0]=DTLSTATUS_SUCCESS;
GetStuempnoByCustid(transdtl.custid,transdtl.stuempno);
ret=DB_t_transdtl_add(&transdtl);
if(ret)
{
if(DB_REPEAT==ret)
return E_DB_TRANSDTL_E;
else
return E_DB_TRANSDTL_I;
}
ST_CPACK aPack;
ST_PACK *outPack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_LVOL1,F_LSAFE_LEVEL2,F_LVOL4,F_LVOL5,
F_SALL_NAME,F_SPAGER,F_SCERT_NO,
F_SEMAIL2,F_SMARKET_CODE,F_SMARKET_CODE2,F_SDATE0,
F_LVOL0,F_STX_PWD,F_LVOL8,F_LVOL6,
F_SORDER0,F_SEMP,F_LVOL11,F_LVOL12,
F_LWITHDRAW_FLAG,F_LSERIAL1,F_VSMESS,F_STIME3,F_SDATE3,0);
outPack->lvol1=customer.custid;
outPack->lsafe_level2=customer.custtype;
outPack->lvol5=tCard.feetype;
des2src(outPack->sall_name,customer.custname);
des2src(outPack->spager,customer.stuempno);
des2src(outPack->scert_no,customer.deptcode);
des2src(outPack->smarket_code2,customer.idtype);
des2src(outPack->semail2,customer.idno);
des2src(outPack->smarket_code,customer.sex);
des2src(outPack->sdate0,tCard.expiredate);
outPack->lvol0=tCard.cardno;
outPack->lvol8=D4U5(transdtl.cardaftbal*100,0);
outPack->lvol11=D4U5(tCardAccount.singlemaxamt*100,0);
outPack->lvol12=D4U5(tCardAccount.daycostmaxamt*100,0);
outPack->lvol6=tCardAccount.paycnt;
// outPack->lvol4=tCardAccount.subsidyno;
des2src(outPack->sorder0,tCard.showcardno);
des2src(outPack->sdate3,ats.trans.accdate);
des2src(outPack->stime3,ats.trans.acctime);
des2src(outPack->semp,trans.opercode);
outPack->lwithdraw_flag=trans.termid;
outPack->lserial1=trans.termseqno;
// des2src(outPack->vsmess,ats.remark.c_str());
PutRow(handle,outPack,pRetCode,szMsg);
return 0;
}
//有卡退卡
static int CardCloseWithCard(ST_PACK *rPack)
{
//检查卡
int ret=0;
CAccTrans *pAccTrans=CAccTrans::getInstance();
TRANS& trans=pAccTrans->trans;
T_t_card tCard;
memset(&tCard,0,sizeof(tCard));
ret=DB_t_card_read_lock_by_cur_and_cardno(trans.cardno,&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",trans.cardno);
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDNO,trans.cardno);
else
return E_DB_CARD_R;
}
if(tCard.status[0]!=STATUS_NORMAL)
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_LOGOUT,trans.cardno);
}
if('1'==tCard.frozeflag[0])
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_FREEZE,trans.cardno);
}
if('1'==tCard.lossflag[0])
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_LOST,trans.cardno);
}
if('1'==tCard.badflag[0])
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_BADRECORD,trans.cardno);
}
if(strcmp(tCard.cardphyid,trans.cardphyid)!=0)
{
DB_t_card_free_lock_by_cur();
// writelog(LOG_ERR,"db cardphyid[%s],input cardphyid[%s]",tCard.cardphyid,trans.cardphyid);
return ERRINFO(E_CARD_PHYNO_DIFFER,trans.cardphyid,tCard.cardphyid);
}
ret=getCardVerNo(tCard.cardverno);
if(ret)
{
DB_t_card_free_lock_by_cur();
return ret;
}
tCard.status[0]=STATUS_DELETE;
strcpy(tCard.closedate,trans.accdate);
des2src(tCard.lastsaved,trans.sysdatetime);
ret=DB_t_card_update_lock_by_cur(&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",tCard.cardno);
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDNO,tCard.cardno);
else
return E_DB_CARD_U;
}
trans.cardtype=tCard.cardtype;
trans.custid=tCard.custid;
trans.feetype=tCard.feetype;
des2src(trans.showcardno,tCard.showcardno);
T_t_customer tCustomer;
memset(&tCustomer,0,sizeof(tCustomer));
if(trans.custid>0)
{
ret=DB_t_customer_read_lock_by_cur_and_custid(trans.custid,&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CUSTOMER,trans.custid);
else
return E_DB_CUSTOMER_R;
}
if(tCustomer.holdcardcnt)
{
tCustomer.holdcardcnt--;
}
des2src(tCustomer.lastsaved,trans.sysdatetime);
ret=DB_t_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CUSTOMER,trans.custid);
else
return E_DB_CUSTOMER_U;
}
des2src(trans.custname,tCustomer.custname);
des2src(trans.stuempno,tCustomer.stuempno);
}
////添加卡版本号记录
T_t_cardver cardver;
memset(&cardver,0,sizeof(cardver));
cardver.cardno=tCard.cardno;
des2src(cardver.accdate,pAccTrans->trans.accdate);
cardver.termid=trans.termid;
cardver.termseqno=trans.termseqno;
cardver.cardno=tCard.cardno;
cardver.status[0]=STATUS_NORMAL;
des2src(cardver.cardphyid,tCard.cardphyid);
des2src(cardver.stuempno,trans.stuempno);
cardver.cardvertype=CARDVERTYPE_CARDCLOSE;
des2src(cardver.cardverno,tCard.cardverno);
ret=DB_t_cardver_add(&cardver);
if(ret)
{
if(DB_REPEAT==ret)
return E_DB_CARDVER_E;
else
return E_DB_CARDVER_I;
}
//回收卡
T_t_cardtype tCardType;
memset(&tCardType,0,sizeof(tCardType));
ret=DB_t_cardtype_read_by_cardtype(tCard.cardtype,&tCardType);
if(ret)
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDTYPE,tCard.cardtype);
else
return E_DB_CARDTYPE_R;
}
if(tCardType.reuseable[0]=='1')
{
if(pAccTrans->sysPara.bEnableCardMgr)
{
ret=UseShowCardNoBack(trans.opercode,tCard.showcardno);
if(ret)
return ret;
T_t_carddtl carddtl;
memset(&carddtl,0,sizeof(carddtl));
des2src(carddtl.accdate,pAccTrans->trans.accdate);
des2src(carddtl.acctime,trans.acctime);
carddtl.termid=trans.termid;
carddtl.termseqno=trans.termseqno;
des2src(carddtl.opercode,trans.opercode);
carddtl.cardtype=tCard.cardtype;
carddtl.usetype=CARDUSETYPE_REUSE;
carddtl.inoutflag=INOUTFLAG_IN;
carddtl.transcnt=1;
strcpy(carddtl.summary,"销户回收卡");
des2src(carddtl.cardphyid,tCard.cardphyid);
des2src(carddtl.showcardno,tCard.showcardno);
ret=DB_t_carddtl_add(&carddtl);
if(ret)
{
if(DB_REPEAT==ret)
return E_DB_CARDDTL_E;
else
return E_DB_CARDDTL_I;
}
}
}
//读取帐户信息
T_t_account tCardAccount;
memset(&tCardAccount,0,sizeof(tCardAccount));
ret=DB_t_account_read_by_accno(tCard.accno,&tCardAccount);
if(ret)
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDACCNO,tCard.accno);
else
return E_DB_ACCOUNT_R;
}
if(tCardAccount.status[0]!=STATUS_NORMAL)
{
return ERRINFO(E_CARDACC_LOGOUT,tCardAccount.accno);
}
//检查补助信息
ret=UpdAllUnGetSubsidy(trans.cardno);
if(ret)
return ret;
trans.cardaftbal=D4U5(trans.cardbefbal+tCardAccount.subsidybal);
strcpy(trans.cardaccno,tCardAccount.accno);
//押金处理
double returncashamt=0;
if(tCardAccount.foregift>0)
{
returncashamt=tCardAccount.foregift;
trans.inputamt=tCardAccount.foregift;
trans.unusedamt = trans.inputamt;
trans.transamt=tCardAccount.foregift;
trans.fundtype=0;//0表示从帐户扣
//退押金
pAccTrans->trans.transtype=TRANSTYPE_RETURNFOREGIFT;
ret=pAccTrans->DoTransByTransType();
if(ret)
return ret;
ret=pAccTrans->doTransEnd();
if(ret)
return ret;
}
if(amtcmp(tCardAccount.balance,0)<0)//处理负账户
{
trans.inputamt= - tCardAccount.balance;
if(amtcmp(trans.inputamt,pAccTrans->sysPara.dAutoRenewAccMaxAmt)>0)
{
return ERRIF_CARDBAL_OVERDRAW;
}
trans.unusedamt = trans.inputamt;
trans.transamt=trans.inputamt;
trans.fundtype=0;//0表示从帐户扣
//营业外支出
pAccTrans->trans.transtype=TRANSTYPE_LESS_CARDBAL;
ret=pAccTrans->DoTransByTransType();
if(ret)
return ret;
ret=pAccTrans->doTransEnd();
if(ret)
return ret;
trans.cardaftbal=0;
}
//判断卡余额是否大于账户余额
else if(amtcmp(trans.cardaftbal,tCardAccount.balance)>0)
{
trans.cardaftbal=tCardAccount.balance;
}
/*
if(amtcmp(cardbal - availbal,pAccTrans->sysPara.dAutoRenewAccMaxAmt)>0)
{
return ERRINFO(E_CARDBAL_EXCEPTION,cardbal,availbal);
}
// if(amtcmp(trans.cardbefbal,tCardAccount.availbal)!=0)
// {
trans.inputamt=D4U5(cardbal-availbal);
trans.unusedamt = trans.inputamt;
trans.transamt=trans.inputamt;
trans.fundtype=0;//0表示从帐户扣
//营业外支出
pAccTrans->trans.transtype=TRANSTYPE_LESS_CARDBAL;
ret=pAccTrans->DoTransByTransType();
if(ret)
return ret;
ret=pAccTrans->doTransEnd();
if(ret)
return ret;
// }
// else
// {
//如果卡本身余额等于账户余额,则按照卡余额退款
// cardbal=tCardAccount.balance;
// }
*/
else if(amtcmp(trans.cardaftbal,tCardAccount.balance)<0)
{
//营业外收入
// if('C'==backcardtype)
// {
//以卡余额为准
trans.inputamt=D4U5(tCardAccount.balance-trans.cardaftbal);
trans.unusedamt = trans.inputamt;
trans.transamt=trans.inputamt;
trans.fundtype=0;//0表示从帐户扣
//营业外支
pAccTrans->trans.transtype=TRANSTYPE_MORE_CARDBALINCOME;
ret=pAccTrans->DoTransByTransType();
if(ret)
return ret;
ret=pAccTrans->doTransEnd();
if(ret)
return ret;
// }
// else
// {
//以库余额为准
// trans.cardaftbal=tCardAccount.balance;
// }
}
//下面退款按账户金额来退
returncashamt= D4U5(returncashamt+trans.cardaftbal);
if(amtcmp(trans.cardaftbal,0)>0)
{
trans.inputamt=trans.cardaftbal;//按卡余额来退款
trans.unusedamt = trans.inputamt;
trans.feetype=tCard.feetype;
/*
if('1'==backfunctype)
{
trans.fundtype=PAYTYPE_OUTLAY;
des2src(trans.voucherno,rPack->scust_auth2);
}
*/
ret=pAccTrans->doTrans();
if(ret)
return ret;
ret=pAccTrans->doTransEnd();
if(ret)
return ret;
}
sprintf(trans.remark,"销户成功,%s,总共应退款%.2lf元",pAccTrans->remark.c_str(),returncashamt);
return 0;
}
//无卡退卡
static int CardCloseWithoutCard(ST_PACK *rPack)
{
//检查卡
int ret=0;
CAccTrans *pAccTrans=CAccTrans::getInstance();
TRANS& trans=pAccTrans->trans;
int ReturnForgift=0;
T_t_card tCard;
memset(&tCard,0,sizeof(tCard));
ret=DB_t_card_read_lock_by_cur_and_cardno(trans.cardno,&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",trans.cardno);
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDNO,trans.cardno);
else
return E_DB_CARD_R;
}
trans.cardtype=tCard.cardtype;
if(tCard.status[0]!=STATUS_NORMAL)
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_LOGOUT,trans.cardno);
}
if('1'==tCard.frozeflag[0])
{
DB_t_card_free_lock_by_cur();
ERRTIP("请先解冻后再销户");
return ERRINFO(E_CARD_FREEZE,trans.cardno);
}
if('1'==tCard.badflag[0])
{
if((CARDBADFLAG_CARDBAL==tCard.badtype[0])||(CARDBADFLAG_ACCBAL==tCard.badtype[0]))
{
DB_t_card_free_lock_by_cur();
ERRTIP("该卡余额错误,请使用坏卡修复功能处理,不可以直接退卡");
return E_CARD_BAD_AND_NEED_UPDATE;
}
}
//无卡只有挂失或卡物理损坏的情况下才可以退卡
if(tCard.lossflag[0]!='1'&&
tCard.badflag[0]!='1')
{
DB_t_card_free_lock_by_cur();
ERRTIP("该卡状态正常,请先放卡再销户!");
return E_COMMON_ERR;
}
if(tCard.badflag[0]=='1')
{
//检查卡是否到了销卡的时间
/*
T_t_badcardbook badcardbook;
memset(&badcardbook,0,sizeof(badcardbook));
ret=DB_t_badcardbook_read_by_cardno(trans.cardno,&badcardbook);
if(ret)
{
DB_t_card_free_lock_by_cur();
if(DB_NOTFOUND==ret)
return E_DB_BADCARDBOOK_N;
else
return E_DB_BADCARDBOOK_R;
}
*/
char enddate[9]= {0};
ret=calcEndDate(tCard.baddate,pAccTrans->sysPara.iRenewCardDayCnt,enddate);
if(ret)
{
DB_t_card_free_lock_by_cur();
return ret;
}
if(strncmp(enddate,pAccTrans->trans.transdate,8)>0)
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_BADCARD_RECORDDATE_NOTREACH,enddate);
}
if(tCard.badtype[0]!=CARDBADFLAG_MANMADE)
ReturnForgift=1;
}
else if('1'==tCard.lossflag[0])
{
if(strlen(tCard.lossdate))
{
char enddate[9]= {0};
ret=calcEndDate(tCard.lossdate,pAccTrans->sysPara.iRenewCardDayCnt,enddate);
if(ret)
{
DB_t_card_free_lock_by_cur();
return ret;
}
if(strncmp(enddate,pAccTrans->trans.transdate,8)>0)
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARDLOSSDATE_NOREACH,enddate);
}
}
}
tCard.status[0]=STATUS_DELETE;
ret=getCardVerNo(tCard.cardverno);
if(ret)
{
DB_t_card_free_lock_by_cur();
return ret;
}
strcpy(tCard.closedate,trans.transdate);
des2src(tCard.lastsaved,trans.sysdatetime);
ret=DB_t_card_update_lock_by_cur(&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",tCard.cardno);
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDNO,tCard.cardno);
else
return E_DB_CARD_U;
}
trans.custid=tCard.custid;
trans.feetype=tCard.feetype;
des2src(trans.showcardno,tCard.showcardno);
T_t_customer tCustomer;
memset(&tCustomer,0,sizeof(tCustomer));
if(tCard.custid>0)
{
ret=DB_t_customer_read_lock_by_cur_and_custid(trans.custid,&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CUSTOMER,trans.custid);
else
return E_DB_CUSTOMER_R;
}
if(tCustomer.holdcardcnt)
{
tCustomer.holdcardcnt--;
}
des2src(tCustomer.lastsaved,trans.sysdatetime);
ret=DB_t_customer_update_lock_by_cur(&tCustomer);
if(ret)
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CUSTOMER,trans.custid);
else
return E_DB_CUSTOMER_U;
}
des2src(trans.custname,tCustomer.custname);
des2src(trans.stuempno,tCustomer.stuempno);
}
////添加卡版本号记录
T_t_cardver cardver;
memset(&cardver,0,sizeof(cardver));
cardver.cardno=tCard.cardno;
des2src(cardver.accdate,pAccTrans->trans.accdate);
cardver.termid=trans.termid;
cardver.termseqno=trans.termseqno;
cardver.cardno=tCard.cardno;
cardver.status[0]=STATUS_NORMAL;
des2src(cardver.cardphyid,tCard.cardphyid);
des2src(cardver.stuempno,trans.stuempno);
cardver.cardvertype=CARDVERTYPE_CARDCLOSE;
des2src(cardver.cardverno,tCard.cardverno);
ret=DB_t_cardver_add(&cardver);
if(ret)
{
if(DB_REPEAT==ret)
return E_DB_CARDVER_E;
else
return E_DB_CARDVER_I;
}
//检查补助信息
//double cardbal=D4U5(trans.cardbefbal+subsidyamt);
//读取帐户信息
T_t_account tCardAccount;
memset(&tCardAccount,0,sizeof(tCardAccount));
ret=DB_t_account_read_by_accno(tCard.accno,&tCardAccount);
if(ret)
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDACCNO,tCard.accno);
else
return E_DB_ACCOUNT_R;
}
if(tCardAccount.status[0]!=STATUS_NORMAL)
{
return ERRINFO(E_CARDACC_LOGOUT,tCardAccount.accno);
}
ret=UpdAllUnGetSubsidy(trans.cardno);
if(ret)
return ret;
strcpy(trans.cardaccno,tCardAccount.accno);
//押金处理
double returncashamt=0;
if(tCardAccount.foregift>0)
{
trans.inputamt=tCardAccount.foregift;
trans.unusedamt = trans.inputamt;
trans.transamt=tCardAccount.foregift;
trans.fundtype=0;//0表示从帐户扣
//退押金
if(ReturnForgift)
{
pAccTrans->trans.transtype=TRANSTYPE_RETURNFOREGIFT;
returncashamt=tCardAccount.foregift;
}
else
{
pAccTrans->trans.transtype=TRANSTYPE_FOREGIFT2COSTFEE;
}
ret=pAccTrans->DoTransByTransType();
if(ret)
ret=pAccTrans->doTransEnd();
if(ret)
return ret;
}
if(amtcmp(tCardAccount.balance,0)<0)//处理负账户
{
trans.inputamt= - tCardAccount.balance;
if(amtcmp(trans.inputamt,pAccTrans->sysPara.dAutoRenewAccMaxAmt)>0)
{
return ERRIF_CARDBAL_OVERDRAW;
}
trans.unusedamt = trans.inputamt;
trans.transamt=trans.inputamt;
trans.fundtype=0;//0表示从帐户扣
//营业外支出
pAccTrans->trans.transtype=TRANSTYPE_LESS_CARDBAL;
ret=pAccTrans->DoTransByTransType();
if(ret)
return ret;
ret=pAccTrans->doTransEnd();
if(ret)
return ret;
}
/*
double ReturnCardBal=0;
ReturnCardBal=D4U5(tCardAccount.cardbal+tCardAccount.subsidybal);
if(amtcmp(tCardAccount.balance,ReturnCardBal)>0)
{
if('C'==backcardtype)
{
//走长款处理
trans.transamt=D4U5(tCardAccount.balance-ReturnCardBal);
trans.inputamt=trans.transamt;
trans.unusedamt = trans.inputamt;
trans.fundtype=0;
pAccTrans->trans.transtype=TRANSTYPE_MORE_CARDBALINCOME;
ret=pAccTrans->DoTransByTransType();
if(ret)
return ret;
if(pAccTrans->trans.unusedamt>0)
return E_INPUT_AMT;
if(pAccTrans->trans.unusedamt<0)
return E_AMT_LACK;
}
}
*/
else
{
//下面退款按账户金额来退
returncashamt = D4U5(returncashamt+tCardAccount.balance);
trans.inputamt=tCardAccount.balance;
trans.unusedamt = trans.inputamt;
trans.feetype=tCard.feetype;
/*
if('1'==backfunctype)
{
trans.fundtype=PAYTYPE_OUTLAY;
des2src(trans.voucherno,rPack->scust_auth2);
}
*/
ret=pAccTrans->doTrans();
if(ret)
return ret;
ret=pAccTrans->doTransEnd();
if(ret)
return ret;
}
sprintf(trans.remark,"销户成功 %s 总共应退款%.2lf元",pAccTrans->remark.c_str(),returncashamt);
return 0;
}
