int F930114(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_tif_meslist tMesList;
memset(&tMesList,0,sizeof(tMesList));
des2src(tMesList.devphy999_id, in_pack->sdate0);
trim(tMesList.devphy999_id);
if(strlen(tMesList.devphy999_id)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
tMesList.funid = iRequest;
tMesList.level =1;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930110(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_tif_meslist tMesList;
T_t_pif_device tDevice;
memset(&tDevice,0,sizeof tDevice);
memset(&tMesList,0,sizeof(tMesList));
if(strlen(in_pack->sdate0)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMesList.devid = tDevice.device_id;
tMesList.funid = iRequest;
tMesList.level =1;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930018(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_tif_meslist tMesList;
memset(&tMesList,0,sizeof(tMesList));
des2src(tMesList.devphy999_id, in_pack->sdate0);
trim(tMesList.devphy999_id);
if(strlen(tMesList.devphy999_id)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
AddXmlItemInt(tMesList.incontent,XML_KEY_FEETYPE, in_pack->lvol4);
AddXmlItemInt(tMesList.incontent,XML_KEY_STARTNUM,in_pack->lvol5);
AddXmlItemInt(tMesList.incontent,XML_KEY_ENDNUM,in_pack->lvol6);
tMesList.funid = 930018;
tMesList.level = 1;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930014(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg) {
int ret = 0;
T_t_msglist tMsgList;
T_t_device tDevice;
memset(&tMsgList,0,sizeof(tMsgList));
memset(&tDevice,0,sizeof tDevice);
if(strlen(in_pack->sdate0)==0) {
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
AddXmlItemInt(tMsgList.reqdata, XML_KEY_FTFLAG, in_pack->lvol4);
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice))) {
*pRetCode = ret;
goto L_RETU;
}
tMsgList.deviceid = tDevice.deviceid;
tMsgList.funcno = 930014;
tMsgList.msglevel = 1;
ret=AddMsgLst(&tMsgList);
if(ret) {
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930018(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_tif_meslist tMesList;
T_t_pif_device tDevice;
memset(&tMesList,0,sizeof(tMesList));
memset(&tDevice,0,sizeof tDevice);
if(in_pack->lcert_code < 1)
{
*pRetCode = E_DEVICE_NOT_EXIST;
}
else if((ret = DB_t_pif_device_read_by_device_id(in_pack->lcert_code,&tDevice)))
{
*pRetCode = E_DB_DEVICE_N;
}
else
{
AddXmlItemInt(tMesList.incontent,XML_KEY_TIME, in_pack->lvol4);
tMesList.devid = tDevice.device_id;
tMesList.funid = 930018;
tMesList.level = 1;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
}
L_RETU:
return -1;
}
int F930109(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_tif_meslist tMesList;
T_t_pif_device tDevice;
memset(&tDevice,0,sizeof tDevice);
memset(&tMesList,0,sizeof(tMesList));
if(strlen(in_pack->sdate0)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
AddXmlItemInt(tMesList.incontent,XML_KEY_OUTNUM,in_pack->lvol5); //条数
AddXmlItemStr(tMesList.incontent,XML_KEY_HOLIDAY,in_pack->vsvarstr0); //节假日
//FIXME
//需要查询节假日表下传
//FIXME
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMesList.devid = tDevice.device_id;
tMesList.funid = 930109;
tMesList.level =1;
tMesList.max_send_cnt = 10;
ret = DB_t_tif_meslist_del_by_devid_and_funid(tMesList.devid,tMesList.funid);
if(ret)
{
if(DB_NOTFOUND != ret)
{
return E_DB_MESLIST_D;
}
}
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930201(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret;
T_t_tif_meslist tMeslist;
T_t_device tDevice;
memset(&tDevice,0,sizeof tDevice);
memset(&tMeslist,0,sizeof tMeslist);
if(strlen(in_pack->sdate0) != 8)
{
return E_DEVPHYID_NULL;
}
tMeslist.funid = 930201;
tMeslist.level = 2;
tMeslist.max_send_cnt = 10;
tMeslist.del_flag[0] = '0';
AddXmlItemStr(tMeslist.incontent,XML_KEY_DEVPHY999_NO,in_pack->sdate0);
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMeslist.devid = tDevice.deviceid;
ret = DB_t_tif_meslist_del_by_devid_and_funid(tMeslist.devid,tMeslist.funid);
if(ret)
{
if(ret != DB_NOTFOUND)
{
*pRetCode = E_DB_MESLIST_D;
goto L_RETU;
}
}
ret = AddMsgLst(&tMeslist);
if(ret)
{
writelog(LOG_ERR,"add message list 930201 error!");
*pRetCode = E_DB_MESLIST_I;
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930018(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_msglist tMsgList;
// T_t_device tDevice;
// memset(&tDevice,0,sizeof tDevice);
memset(&tMsgList,0,sizeof(tMsgList));
tMsgList.deviceid = in_pack->lcert_code;
if(!tMsgList.deviceid)
{
return E_INPUTNULL_DEVICE;
}
AddXmlItemInt(tMsgList.reqdata,XML_KEY_FEETYPE, in_pack->lvol4);
AddXmlItemInt(tMsgList.reqdata,XML_KEY_STARTNUM,in_pack->lvol5);
AddXmlItemInt(tMsgList.reqdata,XML_KEY_ENDNUM,in_pack->lvol6);
// if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
// {
// *pRetCode = ret;
// goto L_RETU;
// }
// tMsgList.deviceid = tDevice.deviceid;
tMsgList.funcno = 930018;
tMsgList.msglevel = 1;
ret=AddMsgLst(&tMsgList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930011(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_tif_meslist tMesList;
T_t_pif_device tDevice;
memset(&tMesList,0,sizeof(tMesList));
memset(&tDevice,0,sizeof(tDevice));
if(strlen(in_pack->sdate0) == 0 )
{
*pRetCode = E_DEVPHYID_NULL;
goto L_RETU;
}
AddXmlItemStr(tMesList.incontent, XML_KEY_CONCODEVER, in_pack->sserial2);
AddXmlItemInt(tMesList.incontent, XML_KEY_CONCODE, in_pack->lvol4);
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMesList.devid = tDevice.device_id;
tMesList.funid = 930011;
tMesList.level = 2;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930103(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_tif_meslist tMesList;
memset(&tMesList,0,sizeof(tMesList));
des2src(tMesList.devphy999_id, in_pack->sdate0);
trim(tMesList.devphy999_id);
if(strlen(tMesList.devphy999_id)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
AddXmlItemStr(tMesList.incontent,XML_KEY_DEV999_ID,tMesList.devphy999_id);
AddXmlItemInt(tMesList.incontent,XML_KEY_WORKMODE, in_pack->lvol3);
AddXmlItemInt(tMesList.incontent,XML_KEY_LOCK1_TIME, in_pack->lvol5);
AddXmlItemInt(tMesList.incontent,XML_KEY_LOCK2_TIME, in_pack->lvol6);
AddXmlItemStr(tMesList.incontent,XML_KEY_IS_ALLEYWAY, in_pack->sstatus0);
AddXmlItemStr(tMesList.incontent,XML_KEY_IS_SAVE, in_pack->sstatus1);
AddXmlItemStr(tMesList.incontent,XML_KEY_IS_LCD, in_pack->sstatus2);
AddXmlItemStr(tMesList.incontent,XML_KEY_SYSPWD, in_pack->semp_pwd);
AddXmlItemInt(tMesList.incontent,XML_KEY_BAUDRATE, 0);
AddXmlItemInt(tMesList.incontent,XML_KEY_CARDSTR, 100);
tMesList.funid = iRequest;
tMesList.level =1;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930106(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_tif_meslist tMesList;
T_t_device tDevice;
memset(&tDevice,0,sizeof tDevice);
memset(&tMesList,0,sizeof(tMesList));
if(strlen(in_pack->sdate0)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
AddXmlItemInt(tMesList.incontent,XML_KEY_WEEKNO,in_pack->lvol3); //星期
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMesList.devid = tDevice.deviceid;
tMesList.funid = 930106;
tMesList.pfunid = 930105;
tMesList.level = MESLIST_PRIORITY_REALTIME;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930007(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
int cnt=0;
int mesid=0;
T_t_tif_meslist tMesList;
T_t_pif_device tDevice;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,0);
memset(&tMesList,0,sizeof(tMesList));
memset(&tDevice,0,sizeof(tDevice));
des2src(tMesList.devphy999_id, in_pack->sdate0);
trim(tMesList.devphy999_id);
if(strlen(tMesList.devphy999_id)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
ret=get_devinfo_by_phyid(tMesList.devphy999_id,&tDevice);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"get_devinfo_by_phyid err[%d]",ret);
goto L_RETU;
}
AddXmlItemInt(tMesList.incontent, XML_KEY_DEV999_NO, tDevice.dev999_no); //机号
AddXmlItemStr(tMesList.incontent, XML_KEY_DEV999_ID, tDevice.dev999_id); //注册号
AddXmlItemInt(tMesList.incontent, XML_KEY_BAUDRATE, tDevice.baudrate); //波特率
AddXmlItemStr(tMesList.incontent, XML_KEY_SYSPWD, tDevice.syspwd); //系统员密码
AddXmlItemStr(tMesList.incontent, XML_KEY_ADMPWD,tDevice.admpwd); //管理员密码
AddXmlItemInt(tMesList.incontent, XML_KEY_PWDONOFF,tDevice.pwdonoff); //密码开关
AddXmlItemStr(tMesList.incontent, XML_KEY_CARDSTR, "100"); //卡片结构
AddXmlItemInt(tMesList.incontent, XML_KEY_CARDUSENUM,tDevice.cardusenum); //卡的最大使用次数\允许最大消费次数
AddXmlItemInt(tMesList.incontent, XML_KEY_MAXDEPOSIT, tDevice.maxdeposit); //钱包最高存款限额
AddXmlItemInt(tMesList.incontent, XML_KEY_MINDEPOSIT, tDevice.mindeposit); //钱包最低剩余款限额
AddXmlItemInt(tMesList.incontent, XML_KEY_RATION, tDevice.ration); //定值收费方式使用的定值额\定值金额
AddXmlItemStr(tMesList.incontent, XML_KEY_PUSERNO, tDevice.puserno); //钱包代码\钱包号
AddXmlItemInt(tMesList.incontent, XML_KEY_MAXTRADE, tDevice.maxtrade); //每次交易最高额\大额消费限额
AddXmlItemStr(tMesList.incontent, XML_KEY_VCARDSET, tDevice.cardtype); //终端机适用用户卡类别
AddXmlItemStr(tMesList.incontent, XML_KEY_FUNONOFF, tDevice.funonoff); //收费机增强功能开关
AddXmlItemInt(tMesList.incontent, XML_KEY_FEETYPE, tDevice.feetype); //收费方式
tMesList.funid = 930007;
tMesList.level = 2;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
if(iRequest!=tMesList.funid)
return 0;
ret=db_commit();
if(ret)
{
writelog(LOG_ERR,"db_commit ret[%d]",ret);
*pRetCode=E_DB_COMMIT;
goto L_RETU;
}
mesid=tMesList.mesid;
des2src(out_pack->sdate0,in_pack->sdate0);
for(cnt=0;(cnt<10)&&(tMesList.ecode!=0);cnt++)
{
sleep(1);
memset(&tMesList,0,sizeof(tMesList));
ret=DB_t_tif_meslist_read_by_mesid(mesid, &tMesList);
if(ret)
{
writelog(LOG_ERR,"DB_t_tif_meslist_read_by_mesid err[%d]",ret);
*pRetCode=E_DB_MESLIST_R;
goto L_RETU;
}
}
switch(tMesList.ecode)
{
case 0: //成功
des2src(out_pack->vsvarstr0,"成功");
break;
case 9999: //交易未处理
des2src(out_pack->vsvarstr0,"前置机无应答");
break;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsvarstr0,tMesList.emsg);
break;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F930067(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
int cnt=0;
int mesid=0;
char sysdatetime[21]="";
T_t_tif_meslist tMesList;
T_t_pif_device tDevice;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
memset(&tMesList,0,sizeof(tMesList));
memset(&tDevice,0,sizeof tDevice);
if(strlen(in_pack->sdate0)==0)
{
if(in_pack->lcert_code <= 0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
tMesList.devid = in_pack->lcert_code;
}
else
{
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMesList.devid = tDevice.device_id;
}
getsysdatetime(sysdatetime);
AddXmlItemInt(tMesList.incontent,XML_KEY_FTFLAG,in_pack->lvol3);
tMesList.funid = 930067;
tMesList.level = 2;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
if(iRequest!=tMesList.funid)
return 0;
ret=db_commit();
if(ret)
{
writelog(LOG_ERR,"db_commit ret[%d]",ret);
*pRetCode=E_DB_COMMIT;
goto L_RETU;
}
mesid=tMesList.mesid;
for(cnt=0;(cnt<10)&&(tMesList.ecode!=0);cnt++)
{
sleep(1);
memset(&tMesList,0,sizeof(tMesList));
ret=DB_t_tif_meslist_read_by_mesid(mesid, &tMesList);
if(ret)
{
writelog(LOG_ERR,"DB_t_tif_meslist_read_by_mesid err[%d]",ret);
*pRetCode=E_DB_MESLIST_R;
goto L_RETU;
}
}
switch(tMesList.ecode)
{
case 0: //成功
des2src(out_pack->vsvarstr0,"成功");
break;
case 9999: //交易未处理
des2src(out_pack->vsvarstr0,"前置机无应答");
break;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsvarstr0,tMesList.emsg);
break;
}
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,0);
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F847103(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret = 0;
int hi_cardid = 0;
char hi_Operator[33+1] = "";
int hi_Cut_id = 0;
int hi_maindevice_id = 0;
int hi_device_id = 0;
double h_temp_Serial_no = 0;
char logicdate[11]="";
char sysdate[11]="";
char systime[8]="";
char dbdate[9]="";
char dbtime[7]="";
char volume[13]="";
T_t_tif_tradeserial tradeserial;
T_t_pif_card tCard;
T_t_tif_meslist tMesList;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1); //用于根据请求包整理本CPACK包的头清空包头位图和包体中的数据
memset(&tradeserial,0,sizeof(tradeserial));
memset(&tCard,0,sizeof(tCard));
memset(&tMesList,0,sizeof(tMesList));
hi_cardid = rPack->lvol1; //卡标识
hi_Cut_id = rPack->lvol2; //客户号
des2src(hi_Operator,rPack->scust_limit); //操作员号
hi_maindevice_id = rPack->lvol6; //上传工作站标识
hi_device_id = rPack->lvol7; //采集设备标识
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
// 检查卡状态是否为挂失
ret = DB_t_pif_card_read_by_card_id(hi_cardid,&tCard);
if (ret)
{
writelog(LOG_ERR,"card_id[%d]",hi_cardid);
if(DB_NOTFOUND==ret)
*pRetCode = E_CARDNO_NOT_EXIST;
else
*pRetCode=E_DB_CARD_R;
goto L_RETU;
}
if(hi_cardid!=tCard.card_id)
{
writelog(LOG_ERR,"card_id[%d] db card_id[%d]",hi_cardid,tCard.card_id);
*pRetCode=E_DB_CARD_R;
goto L_RETU;
}
if('2'==tCard.state_id[CARDSTAT_TYPE_REG])
{
*pRetCode = E_CARDNO_LOGOUT;
goto L_RETU;
}
if(STATE_TRUE==tCard.state_id[CARDSTAT_TYPE_FREEZE])
{
*pRetCode = E_CARDNO_FREEZE;
goto L_RETU;
}
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&h_temp_Serial_no); //获得最大流水号
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR,"ERRCODE = [%d]",ret);
goto L_RETU;
}
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.serial_no = (int)h_temp_Serial_no; //流水号
tradeserial.serial_type = TXCODE_CARD_COMEBACK_LOSS; //解挂
tradeserial.serial_state = SERISTAT_NONEEDDEBT; //流水状态
tradeserial.maindevice_id = hi_maindevice_id; //上传工作站标识
tradeserial.device_id = hi_device_id; //采集设备标识
tradeserial.card_id = hi_cardid; //交易卡号
tradeserial.customer_id = hi_Cut_id;
des2src(tradeserial.oper_code, hi_Operator);
if(STATE_FALSE==tCard.state_id[CARDSTAT_TYPE_LOST])
{
//允许重复解挂
//再下传白名单
// 插入黑名单表
ret=InsertToBlkList(hi_cardid,DELETE_BLACKLIST);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"InsertToBlkList err[%d]",ret);
goto L_RETU;
}
//广播黑名单
AddXmlItemInt(tMesList.incontent, XML_KEY_CARDID,hi_cardid);
AddXmlItemInt(tMesList.incontent, XML_KEY_ADDDELSIGN,DELETE_BLACKLIST); //增删标志
tMesList.pfunid=847103;
tMesList.funid = 930005;
tMesList.level = 1;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
ret=get_datetime_from_db(dbdate,dbtime);
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR,"ret [%d]",ret);
goto L_RETU;
}
ret = SaveCancelLossSerial(&tradeserial);
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR,"ret [%d]",ret);
goto L_RETU;
}
SetCol(handle,0);
SetCol(handle,F_SSERIAL0,0);
memset(volume,0,sizeof(volume));
memcpy(volume,dbdate+2,6);
memcpy(volume+6,dbtime,6);
des2src(out_pack->sserial0,volume); //卡版本号
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
}
ret=IsExistNoLostCardByCustomId(hi_Cut_id);
if(ret)
{
if(E_NORMALCARD_NOLOST==ret)
{
*pRetCode = E_BACK_CARD_FOR_NORCARD2;
}
else if( E_TEMPCARD_NOLOST==ret)
{
//如果存在正常使用的临时卡，则提示请退掉此卡，不能解挂
if(tCard.type_id==CT_NORMAL)
*pRetCode =E_BACK_CARD_FOR_NORCARD;
else
*pRetCode =E_BACK_CARD_FOR_TMPCARD;
}
else
{
*pRetCode = ret;
}
goto L_RETU;
}
if(STATE_FALSE==tCard.state_id[CARDSTAT_TYPE_FREEZE])
{
//插入黑名单表
ret=InsertToBlkList(hi_cardid,DELETE_BLACKLIST);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"InsertToBlkList err[%d]",ret);
goto L_RETU;
}
//广播黑名单
AddXmlItemInt(tMesList.incontent, XML_KEY_CARDID,hi_cardid);
AddXmlItemInt(tMesList.incontent, XML_KEY_ADDDELSIGN,DELETE_BLACKLIST); //增删标志
tMesList.pfunid=847103;
tMesList.funid = 930005;
tMesList.level = 1;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
}
// 修改卡状态为解挂状态
ret = UpdateCardState(hi_cardid,CARDSTAT_TYPE_LOST,STATE_FALSE);
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
// 准备数据插入交易流水表
/////////////////
ret = SaveCancelLossSerial(&tradeserial);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
ret=get_datetime_from_db(dbdate,dbtime);
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR,"ERRCODE = [%d]",ret);
goto L_RETU;
}
SetCol(handle,0);
SetCol(handle,F_SSERIAL0,0);
memset(volume,0,sizeof(volume));
memcpy(volume,dbdate+2,6);
memcpy(volume+6,dbtime,6);
des2src(out_pack->sserial0,volume); //卡版本号
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
static int do_froze_onecard(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret = 0;
int card_id = 0;
char logicdate[11]="";
char sysdate[11]="";
char systime[9]="";
char oper[33+1] = "";
int cut_id = 0;
int maindevice_id = 0;
int device_id = 0;
double dSerial_no = 0;
char sCardState[5] = "";
T_t_tif_black_sheet black_sheet;
T_t_tif_tradeserial tradeserial;
T_t_tif_meslist tMesList;
memset(&black_sheet,0,sizeof(black_sheet));
memset(&tradeserial,0,sizeof(tradeserial));
memset(&tMesList,0,sizeof(tMesList));
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
return ret;
}
// 准备输入信息
card_id = rPack->lvol1; //卡标识
cut_id = rPack->lvol0; //客户号
des2src(oper,rPack->scust_limit); //操作员号
maindevice_id = rPack->lvol6; //上传工作站标识
device_id = rPack->lvol7; //采集设备标识
// 检查客户信息，判断是否可以冻结
ret = GetCardState(card_id,sCardState);
if (ret)
{
writelog(LOG_ERR,"card_id[%d]",sCardState);
return ret;
}
if('2'==sCardState[CARDSTAT_TYPE_REG])
{
ret = E_CARDNO_LOGOUT;
return ret;
}
if(STATE_TRUE==sCardState[CARDSTAT_TYPE_FREEZE])
{
ret = E_CARDNO_FREEZE;
return ret;
}
// 修改卡状态为冻结
ret = UpdateCardState(card_id,CARDSTAT_TYPE_FREEZE,STATE_TRUE);
if (ret)
{
writelog(LOG_ERR,"SQLCODE=[%d]",ret);
return ret;
}
ret=InsertToBlkList(card_id,ADD_BLACKLIST);
if (ret)
{
writelog(LOG_ERR,"InsertToBlkList err[%d]",ret);
return ret;
}
//广播黑名单
AddXmlItemInt(tMesList.incontent, XML_KEY_CARDID,card_id);
AddXmlItemInt(tMesList.incontent, XML_KEY_ADDDELSIGN,ADD_BLACKLIST); //增删标志
tMesList.funid = 930005;
tMesList.level = 1;
ret=AddMsgLst(&tMesList);
if(ret)
{
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
return ret;
}
// 准备数据插入交易流水表
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&dSerial_no); //获得最大流水号
if(ret)
{
writelog(LOG_ERR,"ERRCODE = [%d]",ret);
return ret;
}
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.serial_no = D2I(dSerial_no); //流水号
tradeserial.serial_type = TXCODE_FREEZE_CARD; //挂失
tradeserial.serial_state = SERISTAT_NONEEDDEBT; //流水状态
tradeserial.maindevice_id = maindevice_id; //上传工作站标识
tradeserial.device_id = device_id; //采集设备标识
tradeserial.card_id = card_id; //交易卡号
tradeserial.customer_id=cut_id; //客户号
des2src(tradeserial.oper_code,oper);
// 插入交易流水表
ret = DB_t_tif_tradeserial_add(&tradeserial);
if (ret)
{
writelog(LOG_ERR,"ret[%d]",ret);
if(DB_REPEAT==ret)
ret = E_DB_TRADESERIAL_E;
else
ret = E_DB_TRADESERIAL_I;
return ret;
}
return 0;
}
int F930021(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
int cnt=0;
int mesid=0;
T_t_tif_meslist tMesList;
T_t_pif_device tDevice;
T_t_pif_device tPDev;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,0);
memset(&tMesList,0,sizeof(tMesList));
memset(&tDevice,0,sizeof(tDevice));
memset(&tPDev,0,sizeof tPDev);
if(strlen(in_pack->sdate0)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
ret=get_devinfo_by_phyid(in_pack->sdate0,&tDevice);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"get_devinfo_by_phyid err[%d]",ret);
goto L_RETU;
}
if((ret = get_devinfo_by_phyid(tDevice.fdev_id,&tPDev)))
{
*pRetCode = ret;
goto L_RETU;
}
AddXmlItemStr(tMesList.incontent,XML_KEY_DEV999_ID, tDevice.dev999_id);
AddXmlItemInt(tMesList.incontent,XML_KEY_DEV999_NO, tDevice.dev999_no);
AddXmlItemStr(tMesList.incontent,XML_KEY_DEVTYPE,tDevice.devtype);
AddXmlItemStr(tMesList.incontent,XML_KEY_DEVVERSION, tDevice.devversion);
AddXmlItemStr(tMesList.incontent,XML_KEY_CARDSTR, tDevice.cardstr);
AddXmlItemStr(tMesList.incontent,XML_KEY_VCARDSET, tDevice.cardtype);
AddXmlItemInt(tMesList.incontent, XML_KEY_PORTCOUNT, tDevice.portcount);
AddXmlItemStr(tMesList.incontent, XML_KEY_FDEVPHY_ID, tPDev.dev999_id);
AddXmlItemInt(tMesList.incontent, XML_KEY_PORTNO,tDevice.portno);
AddXmlItemInt(tMesList.incontent, XML_KEY_STATE_ID, tDevice.state_id);
AddXmlItemInt(tMesList.incontent,XML_KEY_JOINMODE,tDevice.joinmode);
AddXmlItemStr(tMesList.incontent, XML_KEY_COMADD, tDevice.comadd);
AddXmlItemStr(tMesList.incontent, XML_KEY_PORT, tDevice.port);
AddXmlItemInt(tMesList.incontent, XML_KEY_BAUDRATE, tDevice.baudrate);
AddXmlItemInt(tMesList.incontent, XML_KEY_COMTYPE,tDevice.comtype);
AddXmlItemStr(tMesList.incontent, XML_KEY_NOTVALIDITY, tDevice.bsheetvdate);
AddXmlItemStr(tMesList.incontent, XML_KEY_VERNUM,tDevice.bsheetver);
AddXmlItemInt(tMesList.incontent, XML_KEY_LASTTRASERNO, tDevice.lasttraserno);
AddXmlItemStr(tMesList.incontent, XML_KEY_LASTTRADATE, tDevice.lasttradate);
AddXmlItemInt(tMesList.incontent, XML_KEY_LASTSHUTSERNO, tDevice.lastshutserno);
AddXmlItemStr(tMesList.incontent, XML_KEY_LASTSHUTDATE, tDevice.lastshutdate);
tMesList.devid = tDevice.device_id;
tMesList.funid = 930021;
tMesList.level = 3;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
if(iRequest!=tMesList.funid)
return 0;
ret=db_commit();
if(ret)
{
writelog(LOG_ERR,"db_commit ret[%d]",ret);
*pRetCode=E_DB_COMMIT;
goto L_RETU;
}
mesid=tMesList.mesid;
des2src(out_pack->sdate0,in_pack->sdate0);
for(cnt=0;(cnt<10)&&(tMesList.ecode!=0);cnt++)
{
sleep(1);
memset(&tMesList,0,sizeof(tMesList));
ret=DB_t_tif_meslist_read_by_mesid(mesid, &tMesList);
if(ret)
{
writelog(LOG_ERR,"DB_t_tif_meslist_read_by_mesid err[%d]",ret);
*pRetCode=E_DB_MESLIST_R;
goto L_RETU;
}
}
switch(tMesList.ecode)
{
case 0: //成功
des2src(out_pack->vsvarstr0,"成功");
break;
case 9999: //交易未处理
des2src(out_pack->vsvarstr0,"前置机无应答");
break;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsvarstr0,tMesList.emsg);
break;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F950041(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret;
T_t_pif_device tDevice;
T_t_cif_shop_pos tShopPos;
T_t_cif_shop tShop;
T_t_tif_meslist tMsg;
T_t_pif_feetype tFeeType;
int rate = 0;
int retries = 0;
int msgid;
unsigned char buf[32] = "";
char cardlist[100] = "";
int rows = 0;
int i,j;
memset(&tDevice,0,sizeof tDevice);
memset(&tFeeType,0,sizeof tFeeType);
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
memset(&aPack,0,sizeof aPack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,F_VSMESS,0);
if(rPack->lcert_code < 1)
{
*pRetCode = E_DEVICE_NOT_EXIST;
}
else if((ret = DB_t_pif_device_read_by_device_id(rPack->lcert_code,&tDevice)))
{
if(DB_NOTFOUND == ret)
*pRetCode = E_DB_DEVICE_N;
else
*pRetCode = E_DB_DEVICE_R;
}
else if(tDevice.state_id == DEVISTAT_LOGOUT)
{
*pRetCode = E_DEVICE_NOT_EXIST;
}
// 如果是 39 的充值机
else if(strcmp(tDevice.devtype,"0201") == 0 && tDevice.phytype == 1000)
{
des2src(rPack->sdate0,tDevice.devphy999_id);
ret = F930006(handle,iRequest,rPack,pRetCode,szMsg);
if(ret)
{
goto LRet;
}
return 0;
}
else if((ret = DB_t_cif_shop_pos_open_select_by_c0_and_device_id(rPack->lcert_code)))
{
*pRetCode = E_DB_SHOP_POS_R;
}
else
{
while(1)
{
memset(&tShopPos,0,sizeof tShopPos);
memset(&tShop,0,sizeof tShop);
if((ret = DB_t_cif_shop_pos_fetch_select_by_c0(&tShopPos)))
{
if(ret == DB_NOTFOUND)
{
writelog(LOG_DEBUG,"shop doesn't find [%d]!");
*pRetCode = 0;
}
else
*pRetCode = E_DB_SHOP_POS_R;
break;
}
writelog(LOG_DEBUG,"find shop [%d]",tShopPos.shop_id);
if((ret = DB_t_cif_shop_read_by_shop_id(tShopPos.shop_id,&tShop)))
{
*pRetCode = ret;
break;
}
if('1' == tShop.is_leaf[0] && '1' == tShop.is_getfee[0]
&& amtcmp(tShop.ratio,0.00)>0 )
{
writelog(LOG_DEBUG,"shop rate [%.02f]",tShop.ratio);
int newrate = D2I(tShop.ratio * 100);
if(newrate > rate)
rate = newrate;
}
}
}
if(*pRetCode)
return -1;
ret = DB_t_pif_feetype_open_select_by_cur1();
if(ret)
{
if(DB_NOTFOUND == ret)
*pRetCode = E_DB_FEETYPE_N;
else
*pRetCode = E_DB_FEETYPE_R;
return -1;
}
memset(buf,0,sizeof buf);
while(1)
{
memset(&tFeeType,0,sizeof &tFeeType);
ret = DB_t_pif_feetype_fetch_select_by_cur1(&tFeeType);
if(ret)
{
if(DB_NOTFOUND == ret)
{
if(rows > 0)
break;
*pRetCode = E_DB_FEETYPE_N;
}
else
*pRetCode = E_DB_FEETYPE_R;
}
rows++;
if(tFeeType.fee_type < 0 || tFeeType.fee_type > 255
|| tFeeType.is_outfee[0] != '1' )
continue;
writelog(LOG_DEBUG,"fee[%s][%d][%c]",tFeeType.fee_name,tFeeType.fee_type
,tFeeType.is_outfee[0]);
_SET_BIT(buf,tFeeType.fee_type-1);
}
//writelog(LOG_DEBUG,"bit length %d",BIT_LENGTH);
memset(&tMsg,0,sizeof tMsg);
tMsg.funid = 950041;
tMsg.level = 1;
tMsg.devid = tDevice.device_id;
for(i = 0,j = 0;i < sizeof buf;++i)
{
j += sprintf(cardlist+j,"%02x",buf[i]);
}
AddXmlItemInt(tMsg.incontent,XML_KEY_FEE,rate);
AddXmlItemStr(tMsg.incontent,XML_KEY_CARDRIGHTTYPE,cardlist);
tMsg.max_send_cnt = 5;
if((ret = AddMsgLst(&tMsg)))
{
*pRetCode = ret;
}
else
{
if(db_commit())
{
*pRetCode = E_DB_COMMIT;
return -1;
}
retries = 10;
msgid = tMsg.mesid;
for(retries=0;(retries<10)&&(tMsg.ecode!=0);retries++)
{
memset(&tMsg,0,sizeof tMsg);
ret = DB_t_tif_meslist_read_by_mesid(msgid,&tMsg);
if(ret)
{
strcpy(out_pack->vsvarstr0,"读取指令失败");
*pRetCode=E_DB_MESLIST_R;
strcpy(szMsg,"读取指令失败");
return -1;
}
// 等待1秒
sleep(1);
}
switch(tMsg.ecode)
{
case 0: //成功
des2src(out_pack->vsmess,"成功");
strcpy(szMsg,"成功");
break;
case 9999: //交易未处理
des2src(out_pack->vsmess,"前置机无应答");
strcpy(szMsg,"前置机无应答");
goto LRet;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsmess,tMsg.emsg);
goto LRet;
}
PutRow(handle,out_pack,pRetCode,szMsg);
AnswerData(handle,*pRetCode,szMsg);
return 0;
}
LRet:
return -1;
}
int F950040(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret,i,j;
T_t_pif_device tDevice;
T_t_tif_meslist tMsg;
int retries = 0;
int msgid;
char cardgroup[257] = "";
char out_data[128] = "";
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,0);
memset(&tDevice,0,sizeof tDevice);
if(rPack->lcert_code < 1)
{
*pRetCode = E_DEVICE_NOT_EXIST;
}
else if(strlen(rPack->vsvarstr0) != 254)
{
writelog(LOG_DEBUG,"card right [%s] ",rPack->vsvarstr0);
*pRetCode = E_DEVICE_PARAM_ERR;
}
else if((ret = DB_t_pif_device_read_by_device_id(rPack->lcert_code,&tDevice)))
{
*pRetCode = ret;
}
else if(tDevice.state_id == DEVISTAT_LOGOUT)
{
*pRetCode = E_DEVICE_NOT_EXIST;
}
else
{
memset(&tMsg,0,sizeof tMsg);
tMsg.funid = 950040;
if(tDevice.phytype != 1000)
{
//cardgroup[0] = '0';
strcpy(cardgroup,rPack->vsvarstr0);
cardgroup[254] = '0';
for(i = 0;i < 255;i+=8)
{
out_data[i/8] = 0;
for(j = 0;j < 8;++j)
{
char t = (*(cardgroup+i+j) == '1') ? 1 : 0;
out_data[i/8] |= (t << (7-j));
}
}
memset(cardgroup,0,sizeof cardgroup);
for(i = 0,j = 0;i < 256 / 8;++i)
{
j += sprintf(cardgroup+j,"%02X",out_data[i]);
}
cardgroup[256/4] = '\0';
}
else
{
// 三九智慧设备
cardgroup[0] = '0';
strcat(cardgroup,rPack->vsvarstr0);
cardgroup[255] = '0';
}
tMsg.max_send_cnt = 1;
//des2src(tMsg.devphy999_id,tDevice.devphy999_id);
tMsg.devid = tDevice.device_id;
AddXmlItemStr(tMsg.incontent,XML_KEY_CARDRIGHTTYPE,cardgroup);
if((ret = AddMsgLst(&tMsg)))
{
*pRetCode = ret;
}
else
{
if(db_commit())
{
*pRetCode = E_DB_COMMIT;
return -1;
}
msgid = tMsg.mesid;
retries = 3;
sleep(2);
while(retries-- > 0)
{
memset(&tMsg,0,sizeof tMsg);
ret = DB_t_tif_meslist_read_by_mesid(msgid,&tMsg);
if(!ret)
{
if(0 == tMsg.ecode)
{
des2src(out_pack->vsvarstr0,tMsg.emsg);
ret = 0;
break;
}
else if(9999 == tMsg.ecode)
{
des2src(out_pack->vsvarstr0,"前置机无应答");
}
else
{
des2src(out_pack->vsvarstr0,tMsg.emsg);
}
}
else
{
strcpy(out_pack->vsvarstr0,"读取指令失败");
}
sleep(1);
}
*pRetCode = 0;
PutRow(handle,out_pack,pRetCode,szMsg);
}
}
if(*pRetCode == 0 )
{
AnswerData(handle,*pRetCode,szMsg);
return 0;
}
return -1;
}
int F930002(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
int cnt=0;
int mesid=0;
T_t_tif_meslist tMesList;
T_t_device tDevice;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_LSERIAL1,F_SDATE0,F_SSERIAL0,F_VSVARSTR0,0);
memset(&tMesList,0,sizeof(tMesList));
memset(&tDevice,0,sizeof tDevice);
if(strlen(in_pack->sdate0)==0)
{
if(in_pack->lcert_code <=0 )
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
tMesList.devid = in_pack->lcert_code;
}
else
{
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMesList.devid = tDevice.deviceid;
}
tMesList.funid = 930002;
tMesList.level = MESLIST_PRIORITY_REALTIME;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
if(iRequest!=tMesList.funid)
return 0;
ret=db_commit();
if(ret)
{
writelog(LOG_ERR,"db_commit ret[%d]",ret);
*pRetCode=E_DB_COMMIT;
goto L_RETU;
}
mesid=tMesList.mesid;
des2src(out_pack->sdate0,in_pack->sdate0);
for(cnt=0;(cnt<10)&&(tMesList.ecode!=0);cnt++)
{
sleep(1);
memset(&tMesList,0,sizeof(tMesList));
ret=DB_t_tif_meslist_read_by_mesid(mesid, &tMesList);
if(ret)
{
writelog(LOG_ERR,"DB_t_tif_meslist_read_by_mesid err[%d]",ret);
*pRetCode=E_DB_MESLIST_R;
goto L_RETU;
}
}
switch(tMesList.ecode)
{
case 0: //成功
ret=GetXmlValue(out_pack->sserial0,sizeof(out_pack->sserial0),XML_KEY_CLOCK, tMesList.outcontent);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
des2src(out_pack->vsvarstr0,"成功");
break;
case 9999: //交易未处理
des2src(out_pack->vsvarstr0,"前置机无应答");
break;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsvarstr0,tMesList.emsg);
break;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F950040(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret,i,j;
T_t_device tDevice;
T_t_msglist tMsg;
int retries = 0;
int msgid;
char cardgroup[257] = "";
unsigned char out_data[128] = "";
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,0);
memset(&tDevice,0,sizeof tDevice);
if(rPack->lcert_code < 1)
{
return E_NOTEXIST_DEVICE;
}
if(strlen(rPack->vsvarstr0) != 254)
{
writelog(LOG_DEBUG,"card right [%s] ",rPack->vsvarstr0);
return E_DEVICE_PARAM_ERR;
}
if((ret = DB_t_device_read_by_deviceid(rPack->lcert_code,&tDevice)))
{
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_DEVICE,rPack->lcert_code);
else
return E_DB_DEVICE_R;
}
if(tDevice.status[0]!=STATUS_NORMAL)
{
return ERRINFO(E_NOTEXIST_DEVICE,tDevice.devphyid);
}
memset(&tMsg,0,sizeof tMsg);
//cardgroup[0] = '0';
strcpy(cardgroup,rPack->vsvarstr0);
cardgroup[254] = '0';
for(i = 0;i < 255;i+=8)
{
out_data[i/8] = 0;
for(j = 0;j < 8;++j)
{
unsigned char t = (*(cardgroup+i+j) == '1') ? 1 : 0;
out_data[i/8] |= (t << (7-j));
}
}
memset(cardgroup,0,sizeof cardgroup);
for(i = 0,j = 0;i < 256 / 8;++i,j+=2)
{
sprintf(cardgroup+j,"%02X",out_data[i]);
}
cardgroup[256/4] = '\0';
tMsg.funcno = 950040;
tMsg.msglevel=1;
tMsg.maxsendcnt = 1;
//des2src(tMsg.devphyid,tDevice.devphyid);
tMsg.deviceid= tDevice.deviceid;
AddXmlItemStr(tMsg.reqdata,XML_KEY_CARDRIGHTTYPE,cardgroup);
if((ret = AddMsgLst(&tMsg)))
{
return ret;
}
strcpy(out_pack->vsvarstr0,"成功");
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
}
int F930013(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
int cnt=0;
int mesid=0;
T_t_tif_meslist tMesList;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,0);
memset(&tMesList,0,sizeof(tMesList));
des2src(tMesList.devphy999_id, in_pack->sdate0);
trim(tMesList.devphy999_id);
if(strlen(tMesList.devphy999_id)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
AddXmlItemStr(tMesList.incontent, XML_KEY_STARTDT, in_pack->sopen_emp);
AddXmlItemStr(tMesList.incontent, XML_KEY_ENDDT, in_pack->sclose_emp);
AddXmlItemInt(tMesList.incontent, XML_KEY_RATION, in_pack->lvol4);
AddXmlItemInt(tMesList.incontent, XML_KEY_CARDUSENUM, in_pack->lvol5);
AddXmlItemStr(tMesList.incontent, XML_KEY_VCARDSET, in_pack->snote2);
tMesList.funid = 930013;
tMesList.level = 2;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
if(iRequest!=tMesList.funid)
return 0;
ret=db_commit();
if(ret)
{
writelog(LOG_ERR,"db_commit ret[%d]",ret);
*pRetCode=E_DB_COMMIT;
goto L_RETU;
}
mesid=tMesList.mesid;
des2src(out_pack->sdate0,in_pack->sdate0);
for(cnt=0;(cnt<10)&&(tMesList.ecode!=0);cnt++)
{
sleep(1);
memset(&tMesList,0,sizeof(tMesList));
ret=DB_t_tif_meslist_read_by_mesid(mesid, &tMesList);
if(ret)
{
writelog(LOG_ERR,"DB_t_tif_meslist_read_by_mesid err[%d]",ret);
*pRetCode=E_DB_MESLIST_R;
goto L_RETU;
}
}
switch(tMesList.ecode)
{
case 0: //成功
des2src(out_pack->vsvarstr0,"成功");
break;
case 9999: //交易未处理
des2src(out_pack->vsvarstr0,"前置机无应答");
break;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsvarstr0,tMesList.emsg);
break;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F930105(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
T_t_device tDevice;
memset(&tDevice,0,sizeof tDevice);
T_t_msglist tMsgList;
memset(&tMsgList,0,sizeof(tMsgList));
if(strlen(in_pack->sdate0)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
if(in_pack->lvol3<1||in_pack->lvol3>8)
{
*pRetCode=E_INPUT_DATA_INVAILD;
goto L_RETU;
}
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMsgList.deviceid = tDevice.deviceid;
ret = process930105(tDevice.deviceid,in_pack->lvol3);
if(ret)
{
*pRetCode = ret;
goto L_RETU;
}
AddXmlItemInt(tMsgList.reqdata,XML_KEY_WEEKNO,in_pack->lvol3); //星期
AddXmlItemInt(tMsgList.reqdata,XML_KEY_OUTNUM,in_pack->lvol5); //记录数
AddXmlItemStr(tMsgList.reqdata,XML_KEY_DOORTIME1,in_pack->saddr); //时间段1
AddXmlItemStr(tMsgList.reqdata,XML_KEY_DOORTIME2,in_pack->saddr2); //时间段2
AddXmlItemStr(tMsgList.reqdata,XML_KEY_DOORTIME3,in_pack->sall_name); //时间段3
AddXmlItemStr(tMsgList.reqdata,XML_KEY_DOORTIME4,in_pack->snote); //时间段4
AddXmlItemStr(tMsgList.reqdata,XML_KEY_DOORTIME5,in_pack->snote2); //时间段5
AddXmlItemStr(tMsgList.reqdata,XML_KEY_DOORTIME6,in_pack->scert_addr); //时间段6
AddXmlItemStr(tMsgList.reqdata,XML_KEY_DOORTIME7,in_pack->sbankname); //时间段7
AddXmlItemStr(tMsgList.reqdata,XML_KEY_DOORTIME8,in_pack->sbankname2); //时间段8
//FIXME
//需要查询时间段表下传
//FIXME
//tMsgList.funcno = iRequest;
tMsgList.funcno=930105;
tMsgList.pfuncno = 930105;
tMsgList.msglevel = MESLIST_PRIORITY_REALTIME;
// 重试10次
tMsgList.maxsendcnt = 10;
ret=AddMsgLst(&tMsgList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
return 0;
L_RETU:
return -1;
}
int F930002(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
int cnt=0;
int msgid=0;
T_t_msglist tMsgList;
// T_t_device tDevice;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_LSERIAL1,F_SDATE0,F_SSERIAL0,F_VSVARSTR0,0);
memset(&tMsgList,0,sizeof(tMsgList));
// memset(&tDevice,0,sizeof tDevice);
tMsgList.deviceid = in_pack->lcert_code;
if(!tMsgList.deviceid)
{
return E_INPUTNULL_DEVICE;
}
tMsgList.funcno = 930002;
tMsgList.msglevel = MESLIST_PRIORITY_REALTIME;
ret=AddMsgLst(&tMsgList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
if(iRequest!=tMsgList.funcno)
return 0;
ret=db_commit();
if(ret)
{
writelog(LOG_ERR,"db_commit ret[%d]",ret);
*pRetCode=E_DB_COMMIT;
goto L_RETU;
}
msgid=tMsgList.msgid;
des2src(out_pack->sdate0,in_pack->sdate0);
for(cnt=0;(cnt<20)&&(tMsgList.errcode!=0);cnt++)
{
sleep(1);
memset(&tMsgList,0,sizeof(tMsgList));
ret=DB_t_msglist_read_by_msgid(msgid, &tMsgList);
if(ret)
{
writelog(LOG_ERR,"DB_t_msglist_read_by_msgid err[%d]",ret);
*pRetCode=E_DB_MSGLIST_R;
goto L_RETU;
}
}
switch(tMsgList.errcode)
{
case 0: //成功
ret=GetXmlValue(out_pack->sserial0,sizeof(out_pack->sserial0),XML_KEY_CLOCK, tMsgList.respdata);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
des2src(out_pack->vsvarstr0,"成功");
break;
case 9999: //交易未处理
des2src(out_pack->vsvarstr0,"前置机无应答");
break;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsvarstr0,tMsgList.errmsg);
break;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F930008(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
int cnt=0;
int msgid=0;
T_t_msglist tMsgList;
T_t_device tDevice;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,0);
memset(&tMsgList,0,sizeof(tMsgList));
memset(&tDevice,0,sizeof tDevice);
if(strlen(in_pack->sdate0)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMsgList.deviceid = tDevice.deviceid;
tMsgList.funcno = 930008;
tMsgList.msglevel = 2;
ret=AddMsgLst(&tMsgList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
if(iRequest!=tMsgList.funcno)
return 0;
ret=db_commit();
if(ret)
{
writelog(LOG_ERR,"db_commit ret[%d]",ret);
*pRetCode=E_DB_COMMIT;
goto L_RETU;
}
msgid=tMsgList.msgid;
des2src(out_pack->sdate0,in_pack->sdate0);
for(cnt=0;(cnt<10)&&(tMsgList.errcode!=0);cnt++)
{
sleep(1);
memset(&tMsgList,0,sizeof(tMsgList));
ret=DB_t_msglist_read_by_msgid(msgid, &tMsgList);
if(ret)
{
writelog(LOG_ERR,"DB_t_msglist_read_by_msgid err[%d]",ret);
*pRetCode=E_DB_MSGLIST_R;
goto L_RETU;
}
}
switch(tMsgList.errcode)
{
case 0: //成功
des2src(out_pack->vsvarstr0,"成功");
break;
case 9999: //交易未处理
des2src(out_pack->vsvarstr0,"前置机无应答");
break;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsvarstr0,tMsgList.errmsg);
break;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F847132(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret=0;
int i=0;
int iTotalCnt=0;
double dTotalAmt=0.0;
double dSerialNo = 0;
char logicdate[11]=""; //业务日期
char sysdate[11]="";
char systime[9]="";
char sMsg[256]="";
T_t_tif_tradeserial tradeserial;
T_t_tif_savdtl tSavdtl;
T_t_tif_subsidy tSubsidy;
InAcc IA;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
T_t_tif_meslist tMesList;
T_t_pif_device t_device;
T_t_pif_syskey tSyskey;
memset(&t_device,0,sizeof t_device);
memset(&tMesList,0,sizeof tMesList);
memset(&tSavdtl,0,sizeof(tSavdtl));
memset(&tSubsidy,0,sizeof(tSubsidy));
memset(&tSyskey,0,sizeof tSyskey);
memset(&tradeserial,0,sizeof(tradeserial));
memset(&IA,0,sizeof(IA));
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSMESS,0);
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
if(strlen(rPack->scust_limit)<1)
{
*pRetCode=E_INPUT_BATCH_NO;
goto L_RETU;
}
if(strlen(rPack->scust_no)<1)
{
*pRetCode=E_INPUT_OPER_NULL;
goto L_RETU;
}
//允许补助负金额
if(amtcmp(rPack->damt0,0)==0)
{
*pRetCode=E_INPUT_AMT;
goto L_RETU;
}
des2src(tSubsidy.summary,rPack->semail); //补助摘要
if(strlen(rPack->semail)<1)
{
*pRetCode=E_INPUT_SUMMARY;
goto L_RETU;
}
des2src(tSubsidy.batch_no,rPack->scust_limit);
tSubsidy.bill_type=rPack->lvol2; //票据类型
des2src(tSubsidy.bill_no,rPack->scust_auth2); //票据号码
tSubsidy.amount=rPack->damt0; //补助金额
des2src(tSubsidy.subsidytype,rPack->smain_flag);//补助标志(0增值1减值)
des2src(tSubsidy.subsidytype,"1"); //补助标志(0增值1减值)
des2src(tSubsidy.broker_id,rPack->sname); //经办人身份证号
des2src(tSubsidy.broker_name,rPack->semail2); //经办人姓名
IA.dArrInAmt[0]=tradeserial.trade_fee;
switch(tSubsidy.bill_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;
}
/*
ret=get_batch_no_by_subsidy_no(tSubsidy.subsidy_no,tSubsidy.batch_no);
if(ret)
{
*pRetCode = E_DB_SUBSIDYTMP_R;
goto L_RETU;
}
*/
// 下发补助时才生成批次号
/*
ret=judge_with_max_subsidy_no_within_new(tSubsidy.subsidy_no);
if(ret)
{
*pRetCode = E_SUBSIDY_DOWN_ERROR;
goto L_RETU;
}
*/
ret=stat_subsidy_amount_by_batch_no(tSubsidy.batch_no, &iTotalCnt,&dTotalAmt);
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR,"ret[%d]",ret);
goto L_RETU;
}
if(iTotalCnt!=rPack->lvol3)
{
strcpy(szMsg,"补助人数与导入的数据不符");
*pRetCode=E_INPUT_DATA_INVAILD;
goto L_RETU;
}
if(amtcmp(dTotalAmt,rPack->damt0)!=0)
{
strcpy(szMsg,"补助总金额与导入的补助数据不符");
*pRetCode=E_INPUT_DATA_INVAILD;
goto L_RETU;
}
writelog(LOG_DEBUG,"download subsidy batch_no : %s",tSubsidy.batch_no);
des2src(tSubsidy.tx_date,sysdate);
des2src(tSubsidy.tx_time,systime);
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&dSerialNo); //获得最大流水号
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR,"ret[%d]",ret);
goto L_RETU;
}
tradeserial.serial_no = D2I(dSerialNo); //流水号
tradeserial.other_seri_no = 0; //上传端流水号
if(amtcmp(dTotalAmt,0.0)>0)
tradeserial.serial_type = TXCODE_SET_SUBSIDY;
else tradeserial.serial_type = TXCODE_DESUBSIDY_DOWN;
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; //采集设备标识
des2src(tradeserial.oper_code , rPack->scust_no); //操作员代码
tradeserial.sys_id = 0; //外部系统标识
// 设置发生金额
tradeserial.trade_fee = dTotalAmt;
switch(tSubsidy.bill_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,tSubsidy.bill_no); //票据号码
if(strlen(tSavdtl.bill_no)<1)
{
*pRetCode=E_INPUT_BILLNO;
goto L_RETU;
}
tSavdtl.card_no=0; //卡号
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=tSubsidy.bill_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_INPUT_DEPOSIT_TYPE;
goto L_RETU;
}
IA.iFeeType=1; //默认值
//支持负金额扣款
if(tradeserial.trade_fee<0)
tradeserial.trade_fee=-tradeserial.trade_fee;
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,&tSubsidy);
if(ret)
{
writelog(LOG_ERR,"process ret[%d]",ret);
*pRetCode=ret;
goto L_RETU;
}
sprintf(out_pack->vsmess,"流水号:%d ",IA.iSerialNo);
// writelog(LOG_DEBUG,"out tx type count %d",IA.iOutTxTypeCnt);
/*
for(i=1;i<=IA.iOutTxTypeCnt;i++)
{
if(amtcmp(IA.dArrOutAmt[i],0)!=0)
{
sprintf(sMsg,"%s:%.2lf元 ",IA.sArrOutTxName[i],IA.dArrOutAmt[i]);
strcat(out_pack->vsmess,sMsg);
}
}
*/
sprintf(sMsg,",共%d笔",iTotalCnt);
strcat(out_pack->vsmess,sMsg);
// 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;
}
// 广播下载补助名单任务
memset(&tMesList,0,sizeof tMesList);
tMesList.funid=930077;
tMesList.level = MESLIST_PRIORITY_REALTIME;
tMesList.msgtype = MESLIST_TYPE_NORMAL;
tMesList.max_send_cnt = 5;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=E_DB_MESLIST_I;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
return ret;
}
////////////////////////新增
ret=DB_t_pif_device_open_select_by_c5_and_devtype_and_phytype("5301",1001);
if(ret)
{
writelog(LOG_ERR,"DB_t_pif_device_open_select_by_c5_and_devtype_and_phytype error,ret=[%d]",ret);
*pRetCode = E_DB_DEVICE_R;
goto L_RETU;
}
while(1)
{
// 初始化宿主变量
ret=DB_t_pif_device_fetch_select_by_c5(&t_device);
if (ret)
{
DB_t_pif_device_close_select_by_c5();
db_chk_err(__FILE__,__LINE__,&sqlca);
if(DB_NOTFOUND==ret)
{
break;
}
else
{
*pRetCode=E_DB_DEVICE_R;
writelog(LOG_ERR,"DB_t_pif_device_fetch_select_by_c5 err [%d]",ret);
goto L_RETU;
}
}
if(t_device.state_id == DEVISTAT_LOGOUT) //设备已经注销
continue;
tMesList.devid = t_device.device_id;
tMesList.device_id= t_device.subsystem_id;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=E_DB_MESLIST_I;
DB_t_pif_device_close_select_by_c5();
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
return ret;
}
}
// 锁住批次号
ret = DB_t_pif_syskey_read_lock_by_cur_and_key_code(KEYTYPE_TIF_SUBSIDY_NO,&tSyskey);
if(ret)
{
if(DB_NOTFOUND == ret)
*pRetCode = E_DB_SYSKEY_N;
else
*pRetCode = E_DB_SYSKEY_R;
goto L_RETU;
}
ret = calc_import_max_subsidy_no(tSubsidy.batch_no,tSubsidy.oper_code,&tSubsidy.subsidy_no);
if(ret)
{
DB_t_tif_subsidy_close_select_by_c4();
return ret;
}
writelog(LOG_DEBUG,"download subsidy no[%d]",tSubsidy.subsidy_no);
ret=update_subsidy_info_by_batch_no(&tSubsidy);
if(ret)
{
*pRetCode = ret;
DB_t_pif_syskey_free_lock_cur();
writelog(LOG_ERR,"ret[%d]",ret);
goto L_RETU;
}
// 释放批次号
DB_t_pif_syskey_free_lock_cur();
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F930064(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
int cnt=0;
int mesid=0;
char dev999_no[20]="";
T_t_tif_meslist tMesList;
T_t_pif_device tDevice;
memset(&tDevice,0,sizeof tDevice);
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_SDATE0,F_SDATE2,F_SDATE3,F_LVOL3,F_VSVARSTR0,0);
memset(&tMesList,0,sizeof(tMesList));
if(strlen(in_pack->sdate0)==0)
{
*pRetCode=E_DEVPHYID_NULL;
goto L_RETU;
}
AddXmlItemInt(tMesList.incontent, XML_KEY_MAXTRADE, in_pack->lvol4);
if((ret = get_devinfo_by_phyid(in_pack->sdate0,&tDevice)))
{
*pRetCode = ret;
goto L_RETU;
}
tMesList.devid = tDevice.device_id;
tMesList.funid = 930064;
tMesList.level = 2;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
if(iRequest!=tMesList.funid)
return 0;
ret=db_commit();
if(ret)
{
writelog(LOG_ERR,"db_commit ret[%d]",ret);
*pRetCode=E_DB_COMMIT;
goto L_RETU;
}
mesid=tMesList.mesid;
des2src(out_pack->sdate0,in_pack->sdate0);
for(cnt=0;(cnt<10)&&(tMesList.ecode!=0);cnt++)
{
sleep(1);
memset(&tMesList,0,sizeof(tMesList));
ret=DB_t_tif_meslist_read_by_mesid(mesid, &tMesList);
if(ret)
{
writelog(LOG_ERR,"DB_t_tif_meslist_read_by_mesid err[%d]",ret);
*pRetCode=E_DB_MESLIST_R;
goto L_RETU;
}
}
switch(tMesList.ecode)
{
case 0: //成功
des2src(out_pack->vsvarstr0,"成功");
ret=GetXmlValue(out_pack->sdate0,sizeof(out_pack->sdate0),XML_KEY_DEVPHY999_NO, tMesList.outcontent);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
ret=GetXmlValue(dev999_no,sizeof(dev999_no),XML_KEY_DEV999_NO, tMesList.outcontent);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
out_pack->lvol3=atoi(dev999_no);
ret=GetXmlValue(out_pack->sdate2,sizeof(out_pack->sdate2),XML_KEY_DEV999_ID, tMesList.outcontent);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
ret=GetXmlValue(out_pack->semp,sizeof(out_pack->semp),XML_KEY_DEVTYPE, tMesList.outcontent);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
ret=GetXmlValue(out_pack->sdate3,sizeof(out_pack->sdate3),XML_KEY_DEVVERSION, tMesList.outcontent);
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
break;
case 9999: //交易未处理
des2src(out_pack->vsvarstr0,"前置机无应答");
break;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsvarstr0,tMesList.emsg);
break;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
int F950041(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret;
T_t_pif_device tDevice;
T_t_cif_shop_pos tShopPos;
T_t_cif_shop tShop;
T_t_tif_meslist tMsg;
int rate = 0;
int retries = 0;
int msgid;
memset(&tDevice,0,sizeof tDevice);
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,0);
if(rPack->lcert_code < 1)
{
*pRetCode = E_DEVICE_NOT_EXIST;
}
else if((ret = DB_t_pif_device_read_by_device_id(rPack->lcert_code,&tDevice)))
{
*pRetCode = ret;
}
else if(tDevice.state_id == DEVISTAT_LOGOUT)
{
*pRetCode = E_DEVICE_NOT_EXIST;
}
else if((ret = DB_t_cif_shop_pos_open_select_by_c0_and_device_id(rPack->lcert_code)))
{
*pRetCode = ret;
}
else
{
while(1)
{
memset(&tShopPos,0,sizeof tShopPos);
memset(&tShop,0,sizeof tShop);
if((ret = DB_t_cif_shop_pos_fetch_select_by_c0(&tShopPos)))
{
*pRetCode = ret;
if(ret == DB_NOTFOUND)
*pRetCode = 0;
break;
}
if((ret = DB_t_cif_shop_read_by_shop_id(tShopPos.shop_id,&tShop)))
{
*pRetCode = ret;
break;
}
if('1' == tShop.is_leaf[0] && '1' == tShop.is_getfee[0]
&& amtcmp(tShop.ratio,0.00)>0 )
{
int newrate = (int)tShop.ratio * 100;
if(newrate > rate)
rate = newrate;
}
}
}
if(*pRetCode)
return -1;
memset(&tMsg,0,sizeof tMsg);
tMsg.funid = 950041;
//des2src(tMsg.devphy999_id,tDevice.devphy999_id);
tMsg.devid = tDevice.device_id;
AddXmlItemInt(tMsg.incontent,XML_KEY_FEE,rate);
tMsg.max_send_cnt = 5;
if((ret = AddMsgLst(&tMsg)))
{
*pRetCode = ret;
}
else
{
if(db_commit())
{
*pRetCode = E_DB_COMMIT;
return -1;
}
retries = 3;
msgid = tMsg.mesid;
while(retries-- > 0)
{
memset(&tMsg,0,sizeof tMsg);
ret = DB_t_tif_meslist_read_by_mesid(msgid,&tMsg);
des2src(out_pack->vsvarstr0,tMsg.emsg);
if(!ret && !tMsg.ecode)
{
break;
}
// 等待1秒
sleep(1);
}
PutRow(handle,out_pack,pRetCode,szMsg);
AnswerData(handle,*pRetCode,szMsg);
return 0;
}
return -1;
}
int F847102(TRUSERID *handle,int iRequest,ST_PACK *rPack,int *pRetCode,char *szMsg)
{
int ret = 0;
// char logicdate[11] = "";
// char enddate[10 + 1] = "";
int card_id = 0;
char Operator[33+1] = "";
// int Cut_id = 0;
int maindevice_id = 0;
int device_id = 0;
char logicdate[11]="";
char sysdate[11]="";
char systime[9]="";
double dUniqno = 0;
T_t_pif_cardlossinfo cardlossinfo;
T_t_tif_black_sheet black_sheet;
T_t_tif_tradeserial tradeserial;
T_t_tif_meslist tMesList;
T_t_pif_card tCard;
memset(&tradeserial,0,sizeof(tradeserial));
memset(&cardlossinfo,0,sizeof(cardlossinfo));
memset(&black_sheet,0,sizeof(black_sheet));
memset(&tMesList,0,sizeof(tMesList));
memset(&tCard,0,sizeof(tCard));
getsysdate(sysdate);
getsystime(systime);
ret=GetLogicDate(logicdate); //业务日期
if(ret)
{
*pRetCode=ret;
goto L_RETU;
}
card_id = rPack->lvol1; //卡标识
// Cut_id = rPack->lvol0; //客户号
des2src(Operator,rPack->scust_limit); //操作员号
maindevice_id = rPack->lvol6; //上传工作站标识
device_id = rPack->lvol7; //采集设备标识
// 检查客户信息，判断是否可以挂失
//修改卡标志，置为正常状态
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)
{
DB_t_pif_card_free_lock_by_cur();
writelog(LOG_ERR,"card_id[%d] db card_id[%d]",card_id,tCard.card_id);
*pRetCode=E_DB_CARD_R;
goto L_RETU;
}
if('2'==tCard.state_id[CARDSTAT_TYPE_REG])
{
DB_t_pif_card_free_lock_by_cur();
*pRetCode = E_CARDNO_LOGOUT;
goto L_RETU;
}
if('3'==tCard.state_id[CARDSTAT_TYPE_REG])
{
DB_t_pif_card_free_lock_by_cur();
*pRetCode = E_CARDNO_WFAIL;
goto L_RETU;
}
if(STATE_TRUE==tCard.state_id[CARDSTAT_TYPE_LOST])
{
DB_t_pif_card_free_lock_by_cur();
*pRetCode = E_CARDNO_LOST;
goto L_RETU;
}
tCard.state_id[CARDSTAT_TYPE_LOST]=STATE_TRUE;
// 修改卡状态为挂失
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();
// 插入卡挂失有效期限表
/*
ret=GetLostCardValiddate(sysdate,enddate); //获得挂失有效期限
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
cardlossinfo.card_id = card_id; //卡号
des2src(cardlossinfo.begin_date,sysdate); //起始日期
des2src(cardlossinfo.end_date,enddate); //截至日期
des2src(cardlossinfo.operate_date,sysdate); //操作日期
des2src(cardlossinfo.operate_time,systime); //操作时间
cardlossinfo.state_id=STATE_VALID; //有效
ret = DB_t_pif_cardlossinfo_add(&cardlossinfo);
if (ret)
{
*pRetCode = E_DB_CARDLOSSINFO_I;
writelog(LOG_ERR,"errcode[%d] ",ret);
goto L_RETU;
}
*/
//如果该卡号被冻结,则挂失时对黑名单不处理
if(STATE_FALSE==tCard.state_id[CARDSTAT_TYPE_FREEZE])
{
// 插入黑名单表
ret=DB_t_tif_black_sheet_del_by_card_id_and_is_ad(tCard.card_id,DELETE_BLACKLIST);
if(ret)
{
if(ret!=DB_NOTFOUND)
{
*pRetCode=ret;
goto L_RETU;
}
}
ret=InsertToBlkList(tCard.card_id,ADD_BLACKLIST);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"InsertToBlkList err[%d]",ret);
goto L_RETU;
}
//广播黑名单
AddXmlItemInt(tMesList.incontent, XML_KEY_CARDID,card_id);
AddXmlItemInt(tMesList.incontent, XML_KEY_ADDDELSIGN,ADD_BLACKLIST); //增删标志
tMesList.funid = 930005;
tMesList.pfunid = 930003;
tMesList.max_send_cnt = 10;
tMesList.level = MESLIST_PRIORITY_REALTIME;
tMesList.msgtype = MESLIST_TYPE_ORDER;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
}
// 准备数据插入交易流水表
ret = getNewUniqNo(KEYTYPE_TRADESERIAL,&dUniqno); //获得最大流水号
if(ret)
{
*pRetCode = ret;
writelog(LOG_ERR,"ERRCODE = [%d]",ret);
goto L_RETU;
}
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.serial_no = D2I(dUniqno); //流水号
tradeserial.serial_type = TXCODE_CARD_LOSS; //挂失
tradeserial.serial_state = SERISTAT_NONEEDDEBT; //流水状态
tradeserial.maindevice_id = maindevice_id; //上传工作站标识
tradeserial.device_id = device_id; //采集设备标识
tradeserial.card_id = card_id; //交易卡号
tradeserial.customer_id=tCard.cosumer_id; //客户号
des2src(tradeserial.oper_code,Operator);
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;
}
return 0;
L_RETU:
return -1;
}
int DoFrozeCard(int cardno)
{
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(cardno,&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",cardno);
if(DB_NOTFOUND==ret)
return ERRINFO(E_NOTEXIST_CARDNO,cardno);
else
return E_DB_CARD_R;
}
des2src(trans.showcardno,tCard.showcardno);
if(tCard.status[0]!=STATUS_NORMAL)
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_LOGOUT,cardno);
}
if('1'==tCard.frozeflag[0])
{
DB_t_card_free_lock_by_cur();
return ERRINFO(E_CARD_FREEZE,cardno);
}
tCard.frozeflag[0]='1';
des2src(tCard.frozedate,trans.sysdate);
ret=getCardVerNo(tCard.cardverno);
if(ret)
{
DB_t_card_free_lock_by_cur();
return ret;
}
getfmtsysdatetime(tCard.lastsaved);
ret=DB_t_card_update_lock_by_cur(&tCard);
if(ret)
{
writelog(LOG_ERR,"cardno[%d]",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_by_custid(tCard.custid,&customer);
if(ret)
{
if(DB_NOTFOUND==ret)
return E_NOTEXIST_CUSTOMER;
else
return E_DB_CUSTOMER_R;
}
trans.custid=tCard.custid;
des2src(trans.custname,customer.custname);
}
//修改以前的解冻记录为删除状态
UpdCardVerStatus(cardno,CARDVERTYPE_CARDUNFROZE);
//更新系统黑名单最大版本号
ret=SetSysParaVal(SYSPARA_MAXBLACKCARDVERNO,tCard.cardverno);
if(ret)
{
return ret;
}
T_t_cardver cardver;
memset(&cardver,0,sizeof(cardver));
cardver.cardno=tCard.cardno;
des2src(cardver.accdate,pAccTrans->trans.sysdate);
cardver.termid=trans.termid;
cardver.termseqno=trans.termseqno;
cardver.cardno=tCard.cardno;
des2src(cardver.cardphyid,tCard.cardphyid);
des2src(cardver.stuempno,customer.stuempno);
cardver.cardvertype=CARDVERTYPE_CARDFROZE;
cardver.adddelflag[0]=ADDDELFLAG_ADD;
cardver.status[0]=STATUS_NORMAL;
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_msglist tMsgList;
memset(&tMsgList,0,sizeof(tMsgList));
AddXmlItemInt(tMsgList.reqdata, XML_KEY_CARDID,tCard.cardno);
AddXmlItemStr(tMsgList.reqdata, XML_KEY_VERNUM,tCard.cardverno);
AddXmlItemInt(tMsgList.reqdata, XML_KEY_ADDDELSIGN,0); //增删标志
tMsgList.funcno = 930005;
tMsgList.pfuncno = 846307;
tMsgList.msglevel = MESLIST_PRIORITY_REALTIME;
tMsgList.msgtype = MESLIST_TYPE_ORDER;
ret=AddMsgLst(&tMsgList);
if(ret)
{
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
return ret;
}
des2src(trans.summary,cardver.cardverno);
return 0;
}
int F930005(TRUSERID *handle,int iRequest,ST_PACK *in_pack,int *pRetCode,char *szMsg)
{
int ret = 0;
int cnt=0;
int mesid=0;
char sCardState[5]="";
T_t_tif_meslist tMesList;
ST_CPACK aPack;
ST_PACK *out_pack = &(aPack.pack);
ResetNormalCPack(&aPack,0,1);
SetCol(handle,0);
SetCol(handle,F_VSVARSTR0,0);
memset(&tMesList,0,sizeof(tMesList));
// des2src(tMesList.devphy999_id, in_pack->sdate0);
ret=GetCardState(in_pack->lvol0,sCardState);
if (ret)
{
*pRetCode = ret;
goto L_RETU;
}
if('2'==sCardState[CARDSTAT_TYPE_REG])
{
*pRetCode = E_CARDNO_LOGOUT;
goto L_RETU;
}
AddXmlItemInt(tMesList.incontent, XML_KEY_CARDID,in_pack->lvol0);
AddXmlItemStr(tMesList.incontent, XML_KEY_VERNUM, in_pack->sserial0);
AddXmlItemInt(tMesList.incontent, XML_KEY_ADDDELSIGN,in_pack->lvol4); //增删标志
tMesList.funid = 930005;
tMesList.level = 0;
ret=AddMsgLst(&tMesList);
if(ret)
{
*pRetCode=ret;
writelog(LOG_ERR,"AddMsgLst err[%d]",ret);
goto L_RETU;
}
if(iRequest!=930005)
return 0;
ret=db_commit();
if(ret)
{
writelog(LOG_ERR,"db_commit ret[%d]",ret);
*pRetCode=E_DB_COMMIT;
goto L_RETU;
}
mesid=tMesList.mesid;
des2src(out_pack->sdate0,in_pack->sdate0);
for(cnt=0;(cnt<10)&&(tMesList.ecode!=0);cnt++)
{
sleep(1);
memset(&tMesList,0,sizeof(tMesList));
ret=DB_t_tif_meslist_read_by_mesid(mesid, &tMesList);
if(ret)
{
writelog(LOG_ERR,"DB_t_tif_meslist_read_by_mesid err[%d]",ret);
*pRetCode=E_DB_MESLIST_R;
goto L_RETU;
}
}
switch(tMesList.ecode)
{
case 0: //成功
des2src(out_pack->vsvarstr0,"成功");
break;
case 9999: //交易未处理
des2src(out_pack->vsvarstr0,"前置机无应答");
break;
default: //交易已经处理,但结果是失败
des2src(out_pack->vsvarstr0,tMesList.emsg);
break;
}
PutRow(handle,out_pack,pRetCode,szMsg);
return 0;
L_RETU:
return -1;
}
