//$TA = $amount; //交易金額 TA 9(10)v99 (必須) 幣別為台幣
$M = $form['esuncode'];
//押碼 M X(32) (必須) 由【輸入字串】與【押碼KEY】(銀行端提供)所產生。(供銀行端驗證交易資料)
$A = $card_no;
//卡號 A X(19) (必須)
$E = $expiry_date;
//有效年月 E 9(4) (必須) YYMM
$CHID = $id;
//身份證號
$C = $bgm;
//CVC2 C X(3) (選項) 末三碼
$MM = "{$MID}&{$CID}&{$TID}&{$ONO}&{$A}&{$E}&{$CHID}&{$C}&{$M}";
$MM5 = md5($MM);
//玉山授權資料
$post = 'MID=' . $MID . '&CID=' . $CID . '&TID=' . $TID . '&ONO=' . $ONO . '&M=' . $MM5 . '&A=' . $A . '&E=' . $E . '&CHID=' . $CHID . '&C=' . $C;
$ccc = my_curl_id($esunbankPostURL_auth, $post);
//分解回傳值
//$ccc = 'RC=00,MID=8080022566,ONO=20130325162536,LTD=20130325,LTT=162516,RRN=123084000004,AIR=254966'; //成功
//$ccc = 'RC=00,MID=8080022566,ONO=20130325162536'; //失敗只回三個值
$rearr = explode(",", trim($ccc));
foreach ($rearr as $value) {
$valarr = explode("=", trim($value));
${$valarr[0]} = $valarr[1];
}
//先將資料先log起來
@write_log("ch_esunbank_request", "HTTP_REFERER: " . $_SERVER['HTTP_REFERER'] . " (" . $uip . ") END", $rearr);
//$RC='00' 才是成功, 其它都失敗
if ($RC == '00') {
$payOK = 'OK_驗證成功';
} else {
$payOK = 'ER_驗證失敗';
}
//沒有 allpayMID 的商家
$str = "SELECT corpname,email,corpid,bankname,bank,accname,account,branchname,bossid,comboss,allpayto,percen,bank_pc,client,installment,percen_fn3,percen_fn6,percen_fn12,percen_fn18,percen_fn24,percen_fn30,bank_pc_fn3,bank_pc_fn6,bank_pc_fn12,bank_pc_fn18,bank_pc_fn24,bank_pc_fn30,pay_day";
$str .= " FROM o_user WHERE stop!='2' and stop!='3' and allpayto=0 and allpayMID='' order by mid asc ";
$xqq = @mysql_query($str, $plink);
while (list($corpname, $email, $corpid, $bankname, $bank, $accname, $account, $branchname, $bossid, $comboss, $allpayto, $percen, $bank_pc, $client, $installment, $percen_fn3, $percen_fn6, $percen_fn12, $percen_fn18, $percen_fn24, $percen_fn30, $bank_pc_fn3, $bank_pc_fn6, $bank_pc_fn12, $bank_pc_fn18, $bank_pc_fn24, $bank_pc_fn30, $pay_day) = @mysql_fetch_row($xqq)) {
$apMID = '';
//這非多收單的
$ap_client = $client;
$apMID_client = " and client='{$ap_client}' ";
include 'g_Close_payamt_xml_body.php';
}
$OUTdata .= "</Root>\n";
//$TEST_mode 為1時不傳送
if ($TEST_mode != 1) {
$ccc = my_curl_id($payamtURE, $OUTdata);
if ($ccc == 'ok') {
$result = 1;
$result_note = "送檔完成-" . $All_c . "店家" . $All_i . "筆金額" . $AllNEWamtTT . "元";
} else {
$result = 2;
$result_note = "傳送至vendor.allpay主機失敗";
$msg = "每日撥款檔傳送至vendor.allpay主機失敗, 未收到 ok 回應訊息, 請檢查! by g_Close_payamt_xml";
exec_line(1, $msg, 'g_Close_payamt_xml');
}
} else {
$result = 0;
$result_note = "XML測試-" . $All_c . "店家" . $All_i . "筆金額" . $AllNEWamtTT . "元";
}
@mysql_close($plink);
//寫入檔案
//不是3大特店/4小特店的才送給 neil
//=====幕後送去新增user
$sValue = "account={$user}";
$sValue .= "&password={$user}";
$sValue .= "&merchantName=" . urlencode($corpname);
//公司名
$sValue .= "&merhcantID={$client}";
//商代
$sValue .= "&level=1";
//0一般,1最高權限
$sValue .= "&mail=" . urlencode($email);
$sValue .= "&ubn={$corpid}";
//統編
$sValue = fnEncrypt($sValue, $ap_KEY, $ap_IV);
$sValue = 'id=' . $sValue;
$ccc = my_curl_id($CreateURE, $sValue);
parse_str($ccc);
//rtncode=1&rtnmsg=新增此特店的最高Admin帳號，成功&userno=1000026&acccount=allpay-3&merchantid=3&merchantname=股份有限公司&level=1
if ($rtncode == '1') {
$ccTXT = '(幕後新增user成功)';
} else {
echo $ccc . '<br>';
echo '(幕後新增user失敗)<br>';
echo '請重新來過';
exit;
}
}
//============更新資料
} else {
$DOINX = '修改客戶資料' . $client;
include "log_do.php";
$BK_cup_post .= '&CustomerIp=' . $a['uip'];
$BK_cup_post .= '&MerchantID=' . $MidO[mid];
$BK_cup_post .= '&TerminalID=' . $MidO[tid];
$BK_cup_post .= '&OrderID=' . $A;
$BK_cup_post .= '&TransMode=0';
$BK_cup_post .= '&TransCode=00';
$BK_cup_post .= '&TransAmt=' . $a['amount'];
if ($a['bank'] == 35) {
//萬泰
$send_Api = 'Api_W';
} else {
//銀聯
$send_Api = 'Api';
}
$Re_URL = "https://credit.allpay.com.tw/{$send_Api}/CupResponse.jsp";
$ccc = my_curl_id($Re_URL, $BK_cup_post);
$result = date("YmdHis") . " 放棄: ";
$result = $ccc . "\r\n";
$log_File = dirname(dirname(__FILE__)) . "/log/form_ssl_nccc_cup_" . date("Ymd");
error_log($result, 3, $log_File);
if (substr_count($ccc, '<TD colspan=3><font color=red>00 </font></TD>')) {
//一次完成
$RetunTXT = '已經完成取消的動作!放棄交易,將交易額度還給刷卡人!';
$str = "update o_auth set remsg='已取消',recode='G19' where remsg='已授權' and sr='{$A}' limit 1 ";
mysql_query($str, $plink);
} else {
//===放棄失敗, 得人工作
$RetunTXT = '已經完成取消的動作!需再手動作放棄,將交易額度還給刷卡人!';
}
}
} else {
*/
//取mid
$stMID = "SELECT mid,esuncode FROM o_user where client='{$Gauth['client']}' limit 1 ";
$qMID = mysql_query($stMID, $plink);
$MidO = mysql_fetch_array($qMID);
$MID = $MidO[mid];
//特店代碼 MID X(15) (必須)
$ONO = $A;
//訂單編號 ONO X(20) (必須)
$M = $MidO[esuncode];
//押碼 M X(32) (必須) 由【輸入字串】與【押碼KEY】(銀行端提供)所產生。(供銀行端驗證交易資料)
$MM = "{$MID}&{$ONO}&{$M}";
$MM5 = md5($MM);
//送玉山授權
$post = 'MID=' . $MID . '&ONO=' . $ONO . '&M=' . $MM5;
$ccc = my_curl_id($esunbankPostURL_cancel, $post);
//分解回傳值
//$ccc = 'RC=00,MID=8080022566,ONO=20130325141940,LTD=20130325,LTT=141921,RRN=163084000001,AIR=410879';
$rearr = explode(",", trim($ccc));
foreach ($rearr as $value) {
$valarr = explode("=", trim($value));
${$valarr[0]} = $valarr[1];
//echo $valarr[0].'='.${$valarr[0]}.'<br>';
}
$strilog = "INSERT INTO o_get_log ";
//寫入log記錄
$strilog .= "(aa,dt,hoho,uip,flag, authsr) VALUES (0,'{$hohsn}','{$ccc}','{$uip}','送玉山POST={$post}', '{$A}')";
$resulti = mysql_query($strilog, $plink);
if ($RC == '00') {
$doUP = 1;
} else {
<?php
//修改密碼
include 'allpay_com.php';
include 'allpay_fn.php';
if ($NOWisWHAT) {
//測試用
$UpdateURE = 'http://pcadmin-stage.allpay.com.tw/user/Update';
} else {
//正式用
$UpdateURE = 'https://vendor.allpay.com.tw/user/Update';
}
$sValue = "account=overtest111";
$sValue .= "&password=overtest5678";
$sValue .= "&NewPassword=Novertest";
$sValue .= "&merhcantID=888899";
//商代
$sValue = fnEncrypt($sValue, $ap_KEY, $ap_IV);
$sValue = 'id=' . UrlEncode($sValue);
$ccc = my_curl_id($UpdateURE, $sValue);
echo $ccc;
exit;
