$remsg = '資料有誤';
}
if ($Cxc[1] == '008' && $Cxc[2] == '14') {
$remsg = '無效卡號';
}
$str = "update o_auth set remsg='{$remsg}',recode='xx9',rootmemo='{$MeMolog}' where sr='{$Cxc['3']}' and UserPayNub='{$UserPayNub}' limit 1 ";
mysql_query($str, $plink);
//授權失敗
$payOK = 0;
}
}
}
//回應 成交1/失敗0*授權單號*金額*授權碼*回應碼
$ReTURnTXT = "{$payOK}*{$aa}*{$amount}*{$sob}*{$rehohsn}*{$Cxc['2']}*{$Cxc['1']}";
//寫入o_respones_log 的記錄
include 'g_ssl_echo_log.php';
include 'g_mag.inc';
@setlog($set_type, $client, $BankTitel[$form[bank]] . " " . $aa . " " . $response_msg, $uip, $t1);
//追縱授權-Step5 授權結束 update
$running = number_format(microtime(true) - $t4, 3);
if ($Cxc[1] == '') {
$Cxc[1] = "---";
}
@exec_sr_tracer($aa, "step5", $running, "g_ssl.php", "final", $Cxc[1], $remsg);
echo $ReTURnTXT;
exit;
function setlog($set_type, $client, $msg, $uip, $t1, $step = "end")
{
$ret = array("File" => "g_ssl.php", "Time" => date("Y-m-d H:i:s"), "Client" => $client, "Echo" => $msg, "UserIP" => $uip, "RunTime" => number_format(microtime(true) - $t1, 3));
@write_log("g_ssl", "Type " . $set_type . " 幕後授權追縱 LOG (" . $step . ")", $ret);
}
$szSQL .= "(sr,client,bank,authsr,dt,amount,cardno,auth,trace_no,stat,eci,sps,mid,tid,pesn,glFrom,glTo,glCity,isGuolu,isdt,citylog,dtymd,allsn,cdmk,escrow,nort,bank_stat)";
$szSQL .= " VALUES (0,'{$arOrigionAuth['client']}','{$arOrigionAuth['bank']}','{$szMerchantTradeNo}','{$hohsn}','{$arOrigionAuth['amount']}','','{$szApproveCode}','{$szTraceNo}','要關帳','{$szECI}','{$arOrigionAuth['sps']}','{$arUser['mid']}','{$arUser['tid']}','{$arOrigionAuth['pesn']}','{$arOrigionAuth['glFrom']}','{$arOrigionAuth['glTo']}','{$arOrigionAuth['glCity']}','{$arOrigionAuth['isGuolu']}','{$dtmYmd}','{$bsb}','{$hohsnYMD}','{$arOrigionAuth['allsn']}','{$arOrigionAuth['cdmk']}','{$arOrigionAuth['escrow']}','{$nort}','要關帳')";
$rsResult = mysql_query($szSQL, $databaseLink);
$o_close_sr = mysql_insert_id();
if (!$rsResult) {
$title = "Credit自動關帳執行失敗-g_ssldotNet.php";
$msg = "SQL執行失敗! " . mysql_error() . "<hr size=1>" . $szSQL . "<br>";
$msg .= "<hr size=1>於 pay_web 執行的 g_ssl_dotNet.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s");
exec_mail(2, $title, $msg, 'g_ssl_dotNet.php');
} else {
$szSQL = "INSERT INTO o_close_bank ";
// 寫入
$szSQL .= "(sr,client,bank,authsr,dt,amount,cardno,auth,trace_no,stat,eci,sps,mid,tid,pesn,glFrom,glTo,glCity,isGuolu,isdt,citylog,dtymd,allsn,cdmk,escrow,nort,bank_stat,uip)";
$szSQL .= " VALUES ('{$o_close_sr}','{$arOrigionAuth['client']}','{$arOrigionAuth['bank']}','{$szMerchantTradeNo}','{$hohsn}','{$arOrigionAuth['amount']}','','{$szApproveCode}','{$szTraceNo}','要關帳','{$szECI}','{$arOrigionAuth['sps']}','{$arUser['mid']}','{$arUser['tid']}','{$arOrigionAuth['pesn']}','{$arOrigionAuth['glFrom']}','{$arOrigionAuth['glTo']}','{$arOrigionAuth['glCity']}','{$arOrigionAuth['isGuolu']}','{$dtmYmd}','{$bsb}','{$hohsnYMD}','{$arOrigionAuth['allsn']}','{$arOrigionAuth['cdmk']}','{$arOrigionAuth['escrow']}','{$nort}','立即關帳','{$uip}')";
mysql_query($szSQL, $databaseLink);
}
$szSQL = "UPDATE o_auth SET trans_date='{$hohsn}' WHERE sr='{$szMerchantTradeNo}' LIMIT 1 ";
mysql_query($szSQL, $databaseLink);
}
//回應 成交1失敗0*授權單號*金額*訂單編號*授權時間*授權碼*回應碼
$ReTURnTXT = "{$szReturnCode}*{$szMerchantTradeNo}*{$nTradeAmount}*{$sob}*{$szTradeDateTime}*{$szApproveCode}*{$szResponseCode}";
// 寫入o_respones_log 的記錄
include 'g_ssl_echo_log.php';
include 'g_mag.inc';
@setlog($set_type, $client, $BankTitel[$form[bank]] . " " . $aa . " " . $szResponseMessage, $uip, $t1);
//追縱授權-Step5 授權結束 update
$running = number_format(microtime(true) - $t4, 3);
@exec_sr_tracer($aa, "step5", $running, "g_ssl_dotNet.php", "final", $szResponseCode, $szResponseMessage);
echo $ReTURnTXT;
exit;
}
$str = "update o_auth set remsg='{$remsg_in}',recode='{$ResponseCode}',eci='{$ECI}',dt='{$rehohsn}',trace_no='{$trace_no}',auth='{$ApproveCode}',stast='{$FirstAmt}',staed='{$EachAmt}',rootmemo='{$rootmemo}',red_dan='{$RedeemUsed}',red_yet='{$RedeemBalance}' where sr='{$OrderID}' and amount='{$amount}' and auth='' limit 1 ";
mysql_query($str, $plink);
//馬上發動要關帳的要求
if ($succ && $OneTm == 'isNOW') {
$isdt = date("Ymd");
//取出交易日
$str = "insert into o_close ";
//寫入
$str .= "(sr,client,bank,authsr,dt,amount,cardno,auth,trace_no,stat,eci,sps,mid,tid,pesn,glFrom,glTo,glCity,isGuolu,isdt,citylog,dtymd,allsn,cdmk,escrow,nort,bank_stat)";
$str .= " values (0,'{$client}','{$form['bank']}','{$OrderID}','{$hohsn}','{$amount}','','{$ApproveCode}','{$trace_no}','要關帳','{$ECI}','{$OKspsIN}','{$form['mid']}','{$form['tid']}','{$pesn}','{$glFrom}','{$glTo}','{$glCity}','{$isGuolu}','{$isdt}','{$bsb}','{$hohsnYMD}','{$allsn}','{$cdmk}','{$escrow}','{$nort}','要關帳')";
mysql_query($str, $plink);
$o_close_sr = mysql_insert_id();
$str = "insert into o_close_bank ";
//寫入
$str .= "(sr,client,bank,authsr,dt,amount,cardno,auth,trace_no,stat,eci,sps,mid,tid,pesn,glFrom,glTo,glCity,isGuolu,isdt,citylog,dtymd,allsn,cdmk,escrow,nort,bank_stat,uip)";
$str .= " values ('{$o_close_sr}','{$client}','{$form['bank']}','{$OrderID}','{$hohsn}','{$amount}','','{$ApproveCode}','{$trace_no}','要關帳','{$ECI}','{$OKspsIN}','{$form['mid']}','{$form['tid']}','{$pesn}','{$glFrom}','{$glTo}','{$glCity}','{$isGuolu}','{$isdt}','{$bsb}','{$hohsnYMD}','{$allsn}','{$cdmk}','{$escrow}','{$nort}','立即關帳','{$uip}')";
mysql_query($str, $plink);
$strCOS = "update o_auth set trans_date='{$hohsn}' where sr='{$OrderID}' limit 1 ";
mysql_query($strCOS, $plink);
}
//回應 成交1/失敗0*授權單號*金額*訂單編號*授權時間*授權碼*回應碼
$ReTURnTXT = "{$succ}*{$aa}*{$amount}*{$sob}*{$rehohsn}*{$ApproveCode}*{$ResponseCode}";
//寫入o_respones_log 的記錄
include 'g_ssl_echo_log.php';
@setlog($set_type, $client, "萬泰 " . $OrderID . " " . $remsg_in, $uip, $t1);
//追縱授權-Step5 授權結束 update
$running = number_format(microtime(true) - $t4, 3);
@exec_sr_tracer($aa, "step5", $running, "g_ssl_wantai.php", "final", $ResponseCode, $remsg_in);
echo $ReTURnTXT;
exit;
}
<?php
//玉山 玉山分期 的授權通道
//2014.09.19 加入sr_tracer記錄 by raleigh
/*
https://stestcredit.allpay.com.tw/g_ssl.php?*838666*3560684444000225*1603*917*10******over123456*overover**
*/
if ($form['bank'] == 27 || $form['bank'] == 28) {
$expiry_date = $exp;
$od_sob = $sob;
//玉山 玉山分期 的授權通道
include "form_ssl_esunbank.php";
//追縱授權-Step4 授權結束 update
$t4 = microtime(true);
$running = number_format($t4 - $t3, 3);
@exec_sr_tracer($aa, "step4", $running, "g_ssl_esunbank.php");
//回應 成交1失敗0*授權單號*金額*訂單編號*授權時間*授權碼*回應碼
$ReTURnTXT = "{$succ}*{$aa}*{$amount}*{$sob}*{$rehohsn}*{$Cxc['2']}*{$Cxc['1']}";
//寫入o_respones_log 的記錄
include 'g_ssl_echo_log.php';
@setlog($set_type, $client, "玉山 " . $aa . " " . $response_msg, $uip, $t1);
//追縱授權-Step5 授權結束 update
$running = number_format(microtime(true) - $t4, 3);
@exec_sr_tracer($aa, "step5", $running, "g_ssl_esunbank.php", "final", $Cxc[1], $response_msg);
echo $ReTURnTXT;
exit;
}
