$linemsg = "Credit系統 5 分鐘內無任何成功交易, 請注意! by db_check"; exec_line(1, $linemsg, 'db_check'); } else { $diff_num = $auth41_num - $auth42_num; if (abs($diff_num) >= 6) { $result = 2; $msg = "資料差距 {$diff_num} 筆 DB41: {$auth41_num} DB42: {$auth42_num}"; $linemsg = "Credit系統同步 5 分鐘內成功授權資料差距 {$diff_num} 筆, 請檢查! by db_check"; exec_line(1, $linemsg, 'db_check'); echo "兩邊資料\r\n 4.1: {$auth41_num} \r\n 4.2: {$auth42_num} \r\n差距 {$diff_num} 筆!\r\n"; } else { $result = 1; $msg = "資料差距 {$diff_num} 筆"; echo "兩邊資料\r\n 4.1: {$auth41_num} \r\n 4.2: {$auth42_num} \r\n檢查完成!\r\n"; } } //若執行時間大於 6 秒 則發 Line群 通知 $t2 = microtime(true); $running_time = number_format($t2 - $t1, 3); if ($running_time >= 6) { $title = "Credit系統 DB 查詢回應時間過久, 執行時間 " . $running_time . " 秒警告通知, 請注意! by db_check"; //exec_line(1, $title, 'db_check'); $end_time = date("YmdHis"); $msg = "Settlement 10.0.4.7 執行程式 db_check.php <br>"; $msg .= "開始時間: {$start_time} <br>"; $msg .= "結數時間: {$end_time} <br>"; exec_mail(2, $title, $msg, 'db_check'); } //記DBLOG monitor $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => '5m', 'result' => $result, 'result_note' => $msg, 'result_num' => $auth41_num, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr);
$OUTdata = str_replace('<br><br><br>', '<p>', $OUTdata); $OUTdata = str_replace('<br>', ' : ', $OUTdata); $OUTdata = str_replace('<p>', '<br>', $OUTdata); $title = $subject . "-" . $result_note; $msg = "<html><head><meta http-equiv=\"Content-Type\" content=\"text/html; charset=BIG5\"></head><body> {$subject} 每日 12:00 {$OUTfile} <hr>"; if ($ccc != 'ok') { $msg .= $ccc . "<hr>"; } $msg .= $setdate . " " . $settime . " - 執行關帳撥款, 合計: {$All_c} 店家, {$All_i} 筆, 金額: {$AllNEWamtTT} 元 <br>" . $OUTdata; if ($ccc != 'ok') { exec_mail(0, $title, $msg, 'g_Close_payment_xml', '*****@*****.**'); } if ($sql_error) { $title .= "-有異常"; $msg .= "<br>執行失敗SQL: <br>" . $sql_error; } if ($TEST_mode == 1) { $title .= "-測試"; $result_note = "測試-" . $result_note; } if ($TEST_mode == 2) { $title .= "-Mode2"; $result_note = "Mode2-" . $result_note; } //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); $msg .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 g_Close_payment_xml.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'g_Close_payment_xml'); echo $subject . "-結束 \r\n"; exit;
} else { if (!$Cxc[1]) { $Cxc[1] = "---"; } @exec_sr_tracer($Cxc[3], "step5", $running, "form_ssl.php", "final", $Cxc[1], $remsg); } //若授權流程超過 6 秒, 則發警告信 $running_time = number_format(microtime(true) - $t1, 3); if ($running_time > 6) { $title = "銀行" . $form[bank] . "授權時間花費 " . $running_time . " 秒"; if ($ECI != '') { $title .= " (ECI=" . $ECI . ")"; } $msg = "授權單號: {$aa} 授權完成時間花費 {$running_time} 秒<br>"; $msg .= "<hr size=1>於 pay-web 執行的 from_ssl.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'form_ssl'); } //超過 30 秒發Line /* if( $running_time > 30 ){ if ( $Cxc[3] ) { $SEND_DT = "授權主機 ".$City_host_id.":16688 回應大於30秒, 請檢查! by form_ssl"; exec_line(4, $SEND_DT, 'form_ssl'); } else { $SEND_DT = "授權主機 ".$City_host_id.":16688 沒有回應, 很重要請檢查! by form_ssl"; exec_line(1, $SEND_DT, 'form_ssl'); } } */ //將控制權轉給下支程式 Header("Location:form_ssl_out_N.php?gwsr={$Cxc['3']}&sr={$s_time}&Do=A03&LG={$LG}");
@exec_mail(0, $client_dtch_title, $client_dtch_msg, $filename, '*****@*****.**'); //CC給王柏森arnold.wang @exec_mail(0, $client_dtch_title, $client_dtch_msg, $filename, '*****@*****.**'); //CC給龔泳霖merle.kong @exec_mail(0, $client_dtch_title, $client_dtch_msg, $filename, '*****@*****.**'); //CC給練家豪ethan.lien @exec_mail(0, $client_dtch_title, $client_dtch_msg, $filename, '*****@*****.**'); //CC給陳健瑞richy.chen @exec_mail(0, $client_dtch_title, $client_dtch_msg, $filename, '*****@*****.**'); //CC給陳啟原rex.chen //客服 @exec_mail(3, $client_dtch_title, $client_dtch_msg, $filename); //CC給danny //管理 @exec_mail(6, $client_dtch_title, $client_dtch_msg, $filename); //CC給雅純 @exec_mail(0, $client_dtch_title, $client_dtch_msg, $filename, '*****@*****.**'); //CC給秋燕 //資訊 @exec_mail(1, $client_dtch_title, $client_dtch_msg, $filename); $client_dtch_msg .= "<hr size=1>於 pay-web 執行的 " . $filename . " (form_client_dtch.php) <br>" . date("Y/m/d H:i:s"); @exec_mail(2, $client_dtch_title, $client_dtch_msg, $filename); //記錄 LOG if ($filename == "/form_ssl.php") { $ret = array("client" => $client, "UserIP" => $uip, "RunTime" => number_format(microtime(true) - $t1, 3)); @write_log("form_ssl", "授權追縱 LOG (END) 系統無法使用 form_client_dtch.php", $ret); } echo '<p><center>系統無法使用!</center>'; exit; } }
if ($warning_nums) { $title .= "-有請款金額超過授權金額"; $msg .= "<br>請款金額超過授權金額, 關帳壓回被拒絕: <br>" . $warning_msg; } if ($sql_error) { $title .= "-有異常"; $msg .= "<br>執行失敗SQL: <br>" . $sql_error; } if ($log_str_error) { $title .= "-有上傳失敗"; $msg .= "<br>上傳失敗: <br>" . $log_str_error; } if ($TEST_mode == 1) { $title .= "-測試"; $result_note = "測試-" . $result_note; } if ($TEST_mode == 2) { $title .= "-Mode2"; $result_note = "Mode2-" . $result_note; } //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); } else { $title = $subject . "-DB無法連線"; $msg = "[" . $DBHOST . "]DB無法連線-allPay關帳請款-萬泰 執行失敗<hr size=1>" . mysql_error($plink) . " 請檢查! by g_Close_wantaiOut.php"; } $msg .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 g_Close_wantaiOut.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'g_Close_wantaiOut'); echo $subject . "-結束 \r\n"; exit;
} //送出信件 $title = $subject . "-" . $result_note; if ($result == 2) { $msg = $title . "<br>Auth更新失敗" . ($num1 - $ii) . "筆-Close更新失敗" . ($num2 - $nn) . "筆<hr size=1>"; } else { $msg = $title . "<hr size=1>"; } $msg .= "o_auth應更新 {$num1} 筆, 更新 {$ii} 筆 <br>"; $msg .= "o_close應更新 {$num2} 筆, 更新 {$nn} 筆 <br>"; if ($ii_str) { $msg .= "o_auth 應該要有%數但沒有壓的 sr : <br>" . $ii_str . "<br><br>"; } if ($result == 2) { //若有失敗的筆數, CC給 Hebe //exec_mail(0, $title, $msg, 'percen_mak', '*****@*****.**'); } if ($ii_str_failed) { $msg .= "o_auth 更新失敗的SQL : <br>" . $ii_str_failed . "<br>"; } if ($nn_str_failed) { $msg .= "o_close 更新失敗的SQL : <br>" . $nn_str_failed . "<br>"; } @mysql_close($plink); //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); $msg .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行 percen_mak.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒 <br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'percen_mak'); echo $subject . "-結束 \r\n"; exit;
curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); curl_setopt($ch, CURLOPT_HEADER, 0); curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1); curl_setopt($ch, CURLOPT_COOKIEFILE, "cookiefile"); curl_setopt($ch, CURLOPT_COOKIEJAR, "cookie.txt"); curl_setopt($ch, CURLOPT_TIMEOUT, 60); $result_data = curl_exec($ch); if ($result_data) { $post_result = "PostOK"; } else { $post_result = "PostError"; $result_data = curl_error($ch); } curl_close($ch); //將資料寫到 newecpay_log.postgate //INSERT INTO `newecpay_log`.`postgate` (`serial`, `authsr`, `bk_posturl`, `relog`, `LG`, `allsn`, `filename`, `post_times`, `post_result`, `result_data`, `insert_times`, `update_times`) VALUES (NULL, '1', 'http://raleigh.summerhost.info/allpay/aio_orderresulturl.php', 'succ=1&gwsr=1&response_code=00&response_msg=授權成功&process_date=20131129&process_time=114002&od_sob=P201311290002&auth_code=455824&amount=2980&eci=&inspect=ca851c6e9e035b5d0246863682e3e873&spcheck=29276399&od_hoho=Card_Member_Name: 柯明昆<BR>ha: <BR>&card4no=2493&card6no=456317&inv_error=&rech_key=0a3655231c604091905aea64cdaa4df1ab05b118aab8ff1011801a11e05bba3fecc19fcc4dc22119&client=303540&expire_dt=1407', 'utf-8', '1', 'test.php', '1', 'PostOK', '1|OK', '20140901000001', ''); $str_sr = "INSERT INTO `postgate` (`serial`, `bank`, `authsr`, `bk_posturl`, `relog`, `LG`, `allsn`, `filename`, `post_times`, `post_result`, `result_data`, `insert_times`, `update_times`) VALUES (NULL, '" . $bank . "', '" . $authsr . "', '" . $bk_posturl . "', '" . $relog . "', '" . $LG . "', '" . $allsn . "', '" . $filename . "', 1, '" . $post_result . "', '" . $result_data . "', '" . date("YmdHis") . "', '');"; $res_sr = @mysql_query($str_sr, $plink); if (!$res_sr) { $title = "Settlement寫postgate失敗-" . $subject; $msg = "SQL執行失敗: " . mysql_error() . ", 請檢查! by postgate <hr size=1>" . $str_sr; exec_mail(2, $title, $msg, 'postgate'); } } else { @write_log("exec_postgate", $subject, $argv); $title = $subject . "-DB無法連線"; $msg = "[" . $DBHOST . "]DB無法連線<hr size=1>" . mysql_error($plink) . " 請檢查! by exec_postgate.php"; $msg .= "<hr size=1>於 10.0.4.7 執行的 postgate.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'postgate'); } exit;
$title = $subject . "-" . $result_note; if ($nums_fail || $total_nums_fail) { $title = $subject . "-異常-" . $result_note; } $msg = $title . "<hr size=1>" . $inclosing . "<br>新聯信每日平帳開始<br><table border=0>" . $OUTmsg . "</table>"; //若有失敗通知雪卿 if (($nums_fail || $total_nums_fail) && !$TEST_mode) { $s_msg = "Dears <br>今日新聯信關帳取回檔案有異常,<br>再請注意, 感謝!<hr size=1>" . $msg; exec_mail(5, $title, $s_msg, 'g_Close_ncccIn'); exec_mail(0, $title, $s_msg, 'g_Close_ncccIn', '*****@*****.**'); exec_mail(0, $title, $s_msg, 'g_Close_ncccIn', '*****@*****.**'); } if ($sql_error) { $title .= "-有執行失敗SQL"; $msg .= "<br>執行失敗SQL: <br>" . $sql_error; } if ($get_recv_fail) { $title .= "-有關帳異常"; $msg .= "<br>關帳異常資料: <br>" . $get_recv_fail; } if ($TEST_mode) { $title .= "-測試"; $result_note = "測試-" . $result_note; } //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); $msg .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 g_Close_ncccIn.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'g_Close_ncccIn'); echo $subject . "-結束 \r\n"; exit;
$szSQL = "SELECT aa FROM o_isNOW where sr='{$szMerchantTradeNo}' LIMIT 1 "; $rsNOW = mysql_query($szSQL, $databaseLink); $arNOW = @mysql_fetch_array($rsNOW); if ($arNOW[aa]) { $dtmYmd = date("Ymd"); // 取出交易日 $szSQL = "INSERT INTO o_close "; // 寫入 $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']}','','{$arOrigionAuth['auth']}','{$arOrigionAuth['trace_no']}','要關帳','{$arOrigionAuth['eci']}','{$arUser['sps']}','{$arUser['mid']}','{$arUser['tid']}','{$arOrigionAuth['pesn']}','{$arOrigionAuth['glFrom']}','{$arOrigionAuth['glTo']}','{$arOrigionAuth['glCity']}','{$arOrigionAuth['isGuolu']}','{$arOrigionAuth['dtymd']}','{$bsb}','{$hohsnYMD}','{$arOrigionAuth['allsn']}','{$arOrigionAuth['cdmk']}','{$arOrigionAuth['escrow']}','{$nort}','要關帳')"; $result = mysql_query($str, $databaseLink); if (!$result) { $title = "Credit關帳單號o_close-SQL執行失敗"; $msg = "SQL執行失敗! " . mysql_error() . "<hr size=1>" . $szSQL . "<br>"; $msg .= "<hr size=1>於 pay-web 執行的 from_ssl_result.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); @exec_mail(2, $title, $msg, $filename); } else { $o_close_sr = mysql_insert_id(); $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']}','','{$arOrigionAuth['auth']}','{$arOrigionAuth['trace_no']}','要關帳','{$arOrigionAuth['eci']}','{$arUser['sps']}','{$arUser['mid']}','{$arUser['tid']}','{$arOrigionAuth['pesn']}','{$arOrigionAuth['glFrom']}','{$arOrigionAuth['glTo']}','{$arOrigionAuth['glCity']}','{$arOrigionAuth['isGuolu']}','{$arOrigionAuth['dtymd']}','{$bsb}','{$hohsnYMD}','{$arOrigionAuth['allsn']}','{$arOrigionAuth['cdmk']}','{$arOrigionAuth['escrow']}','{$nort}','立即關帳','{$uip}')"; mysql_query($str, $databaseLink); } $szSQL = "UPDATE o_auth SET trans_date='{$dtmYmd}' WHERE sr='{$szMerchantTradeNo}' LIMIT 1 "; @mysql_query($szSQL, $databaseLink); } } //授權結束 $remsg_in = $szReturnCode == '1' ? '已授權' : $szResponseMessage; $ret = array("client" => $arOrigionAuth[client], "Bank" => $arOrigionAuth[bank], "SR" => $szMerchantTradeNo, "Amount" => $nTradeAmount, "Allsn" => $arOrigionAuth[allsn], "UserIP" => $uip, "RunTime" => number_format(microtime(true) - $t1, 3), "Recode" => $szResponseCode, "Remsg" => $remsg_in);
$start_time = date("YmdHis"); include 'g_common.inc'; //將先log起來 @write_log("g_get", "HTTP_REFERER: " . $_SERVER['HTTP_REFERER'] . " (" . $uip . ")", $_REQUEST); $plink = mylink(); list($l, $r) = each($_GET); $l = mysql_real_escape_string($l); //寫入log記錄 //關帳 *C*709400*10940479*600*123502147*853* $strilog = "INSERT INTO o_get_log (aa,dt,hoho,uip,flag) VALUES (0,'{$hohsn}','{$l}','{$uip}','step1')"; $resulti = @mysql_query($strilog, $plink); if (!$resulti) { $title = "Credit建立o_get_log-SQL執行失敗"; $msg = "SQL執行失敗! " . mysql_error() . "<hr size=1>" . $strilog . "<br>"; $msg .= "<hr size=1>於 10.0.3.2 執行的 g_get.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); @exec_mail(2, $title, $msg, 'g_get'); } $get_log_aa = @mysql_insert_id(); if (empty($get_log_aa)) { $get_log_aa = 0; } //檢查頭尾是否都有*號 , 新的傳送規則 if (substr($l, 0, 1) == '*' && substr($l, -1) == '*') { $pieces = explode("*", $l); //取出值 $DOma = $pieces[1]; //取出工作碼 $MallNB = $pieces[2]; //取出商店代碼 $OdNB = $pieces[3]; //取出單號
} } echo 'OK'; //寄出郵件管理者 $san_mail = str_replace(' ', '', $form['email']); $kind_nail = split(',', $san_mail); $aacount = count($kind_nail); for ($_e = 0; $_e < $aacount; $_e++) { $vCHOO = substr_count($kind_nail[$_e], '@'); if ($kind_nail[$_e] && $vCHOO > 0) { $RootSOB = '線上刷卡管理者通知函--' . $iswhy; $uitemed_mail = $RootSOB . '<hr>銀聯卡交易回傳通知:<p>'; $uitemed_mail .= "單號: {$OrderID}<p>"; $uitemed_mail .= "金額: {$amount}<p>"; $uitemed_mail .= "時間: {$rehohsn}<p>"; if (!$form['send_root']) { //不是1才寄 //mail($kind_nail[$_e], mb_convert_encoding($RootSOB,"Big5","UTF-8"), mb_convert_encoding($uitemed_mail,"Big5","UTF-8"), "From: gomos2@sunup.net\nMIME-Version: 1.0\nContent-Type: text/html; charset=big5\nContent-Transfer-Encoding: 8bit"); exec_mail(0, $RootSOB, $uitemed_mail, 'form_ssl_Nccc_cup', $kind_nail[$_e]); } } } //exec_mail(2, $RootSOB, $uitemed_mail, 'form_ssl_Nccc_cup'); $ret = array("client" => $Mpisr[client], "Bank" => $Mpisr[bank], "SR" => $OrderID, "Amount" => $amount, "Allsn" => $allsn, "UserIP" => $uip, "RunTime" => number_format(microtime(true) - $t1, 3), "Recode" => $ResponseCode, "Remsg" => $remsg_in); @write_log("form_ssl", "授權追縱 LOG (5) 銀聯-授權結果 form_ssl_Nccc_cup.php", $ret); //追縱授權-Step5 授權結束 update $running = number_format(microtime(true) - $t2, 3); if (!$ResponseCode) { $ResponseCode = "---"; } @exec_sr_tracer($OrderID, "step5", $running, "form_ssl_Nccc_cup.php", "final", $RespCode, $remsg);
$ListDT_all .= $Title_str1 . $ListDT . "<br>"; //$CallStore = '系統自動通知: 請快點選關帳, 以免逾期無法請款!<br><br>'.$ListDT; //寄信通知店家 //$msg = "<html><head><meta http-equiv=\"Content-Type\" content=\"text/html; charset=BIG5\"></head><body><font color=red>請注意逾期未關帳將導致請款失敗!如您非財務人員,請立即將此信轉交!若有任何問題,歡迎洽詢客服:02-26550115</font><br><br>".$Title_str2."<hr>".$CallStore."<hr>註: 為避免關帳逾期, 建議您至[<a href=\"https://vendor.allpay.com.tw/\">廠商後台</a> -> 信用卡收單 -> 帳戶設定]將每日自動關帳功能開啟<br>".$roomtime."</body></html>"; //exec_mail(0, $title, $msg, 'g_Close_notCall_5day', $go_mail); //usleep(60); $client_nums++; } $TMP_allpayMID = $allpayMID; } } } @mysql_close($plink); $result = 1; $result_note = "有" . $client_nums . "家商店共" . $ss_nums . "筆即將逾期"; $title = $subject . "-" . $result_note; $msg = "<html><head><meta http-equiv=\"Content-Type\" content=\"text/html; charset=BIG5\"></head><body><font color=red>請注意逾期未關帳將導致請款失敗!如您非財務人員,請立即將此信轉交!若有任何問題,歡迎洽詢客服:02-26550115</font><br><br>" . $title . "<hr>" . $ListDT_all . "</body></html>"; //寄給allpay 客服 exec_mail(0, $title, $msg, 'g_Close_notCall_3day', '*****@*****.**'); exec_mail(0, $title, $msg, 'g_Close_notCall_3day', '*****@*****.**'); //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); } else { $title = $subject . "-DB無法連線"; $msg = "[" . $DBHOST . "]DB無法連線-執行失敗 " . mysql_error($plink) . " 請檢查!"; } $msg .= "<hr size=1>於 10.0.4.7 每日 " . $settime . " 執行的 g_Close_notCall_3day.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'g_Close_notCall_3day'); echo $subject . "-結束 \r\n"; exit;
} if ($result == 2) { $msg = $subject . ", " . $FTPechoTO . " 台鐵 " . date("Ymd") . " 平帳無法進行. 很重要請檢查! by g_Close_china_re"; exec_line(1, $msg, 'g_Close_china_re'); } $result_note = $FTPechoTO; $title = $subject . "-" . $result_note; $msg = $title . "<hr size=1>" . $ListAuthALL; if ($sql_error) { $title .= "-有執行失敗SQL"; $msg .= "<br>執行失敗SQL: <br>" . $sql_error; } if ($TEST_mode == 1) { $title .= "-測試"; $result_note = "測試-" . $result_note; } if ($TEST_mode == 2) { $title .= "-Mode2"; $result_note = "Mode2-" . $result_note; } //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); } else { $title = $subject . "-DB無法連線"; $msg = "[" . $DBHOST . "]DB無法連線-" . $subject . " 執行失敗<hr size=1>" . mysql_error($plink) . " 請檢查! by g_Close_china_re.php"; } $msg .= "<hr size=1>於 10.0.4.7 每日 " . $settime . " 執行的 g_Close_china_re.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'g_Close_china_re'); echo $subject . "-結束 \r\n"; exit;
if ($card_no != '') { //取年度加密key (記卡號 不記到期日, 末3碼) $strYearABC = "SELECT abcd FROM o_year WHERE year='" . date("Y") . "' limit 1 "; $qqYabc = mysql_query($strYearABC, $plink); $f_Yabc = @mysql_fetch_array($qqYabc); $f6no = substr($card_no, 0, 6); $c5no = substr($card_no, 6, 5); $lsno = substr($card_no, 11, 5); $str = "insert into o_cdno "; //寫入 $str .= "(aa,sr,f6no,c5no,lsno,year_abc)"; $str .= "values(0,'{$aa}',AES_ENCRYPT('{$f6no}','{$key_str_ch}'),AES_ENCRYPT('{$c5no}','{$key_str_ch}'),AES_ENCRYPT('{$lsno}','{$key_str_ch}'),'{$f_Yabc['abcd']}')"; $result = mysql_query($str, $plink); if (!$result) { $title = "Credit建立單號o_cdno-SQL執行失敗(allpay_rt_otp.php)"; $msg = "SQL執行失敗! " . mysql_error() . "<hr size=1>" . $str . "<br>"; $msg .= "<hr size=1>於 pay-web 執行的 allpay_rt_otp.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'allpay_rt_otp'); echo "ERROR_" . mysql_error(); } } //寫 sr_tracer //追縱授權-Step1 建立單號 insert $t2 = microtime(true); $running = number_format($t2 - $t1, 3); @exec_sr_tracer($aa, "step1", $running, "allpay_rt_otp.php", "insert", $start_time, $form[bank], $allsn); //追縱授權-Step5 授權結束 update $running = number_format(microtime(true) - $t2, 3); @exec_sr_tracer($aa, "step5", $running, "allpay_rt_otp.php", "final", $r_code, $r_msg); echo 'OK'; exit;
@write_log("exec_line", $linegroup, $ret); if ($linegroup == '' || $msg == '' || $filename == '') { echo "參數錯誤! \r\n"; exit; } $msg = substr($msg, 0, 300); //$msg = "這是測試 [".$B_DBHOST."]DB無法連線 ".mysql_error()." 請檢查! by form_ssl_check"; $SEND_DT = "[MSN=*LINE*" . $linegroup . ", ]ALLPAY, " . $msg . " (" . date("Y-m-d") . ")\r\n"; $fp = fsockopen($sockUrl, $sockPORT_Msn, $errno, $errstr, 20); //網址IP,PORT,回應代碼,回應訊息,等待時間 if ($fp) { $goClos = @fwrite($fp, mb_convert_encoding($SEND_DT, "Big5", "UTF-8"), 300); $bkClos = @fread($fp, 100); fclose($fp); } $hostname = trim(exec("hostname")); //若執行時間大於 60 秒 表示發Line程式Timeout $running_time = number_format(microtime(true) - $t1, 3); if ($running_time >= 60) { $title = $hostname . "發Line失敗-執行時間Timeout警告通知"; $msg2 = $hostname . " 執行程式 /manage/cronjob/exec_line.php <br>"; $msg2 .= "應發的訊息: " . $msg . " <br>"; $msg2 .= "應發的群組: " . $linegroup . " <br>"; $msg2 .= "<hr size=1>於 " . $hostname . " 執行的 /manage/cronjob/exec_line.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg2, 'exec_line'); exec_mail(4, $title, $msg2, 'exec_line'); //patrick } //記DBLOG $arr = array('line_group' => $linegroup, 'msg' => $msg, 'hostname' => $hostname, 'filename' => $filename, 'line_server' => $sockUrl . ":" . $sockPORT_Msn, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr);
<input type="submit" value="send" style="display:none"> </form> <script language="JavaScript"> <!--'; $OU_Page .= "\n\t\t\tdocument.forms['acsForm'].submit();\n\t\t\t// -->\n\t\t\t</script>\n\t\t\t</center>\n\t\t\t</body></head></html>"; $sr = $OrderID; //可能用不到 $_SESSION['O_Doit'] = 'A03'; $_SESSION['O_OU_Page'] = $OU_Page; //寫入轉頁暫存檔 include 'tmp_endPage.php'; $ret = array("client" => $Mpisr[client], "Bank" => $Mpisr[bank], "SR" => $OrderID, "Amount" => $amount, "Allsn" => $allsn, "UserIP" => $uip, "RunTime" => number_format(microtime(true) - $t1, 3), "Recode" => $ResponseCode, "Remsg" => $remsg_in, "ROTurlOK" => $ROTurlOK, "s_time" => $s_time); @write_log("form_ssl", "授權追縱 LOG (5) 授權結果(有回傳網址) form_ssl_Nccc.php", $ret); //追縱授權-Step5 授權結束 update $running = number_format(microtime(true) - $t3, 3); if (!$ResponseCode) { $ResponseCode = "---"; } @exec_sr_tracer($OrderID, "step5", $running, "form_ssl_Nccc.php", "final", $ResponseCode, $remsg_in); //若授權流程超過 6 秒, 則發警告信 $running_time = number_format(microtime(true) - $t1, 3); if ($running_time > 6) { $title = "銀行" . $Mpisr[bank] . "授權回傳後的處理時間花費 " . $running_time . " 秒"; $msg = "授權單號: {$OrderID} 授權回傳後的處理時間花費 {$running_time} 秒<br>"; $msg .= "<hr size=1>於 pay-web 執行的 from_ssl_Nccc.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'form_ssl_Nccc'); } //將控制權轉給下支程式 Header("Location:form_ssl_out_N.php?gwsr={$OrderID}&sr={$s_time}&Do=A03&LG={$LG}"); exit; }
$res = @mysql_query($str, $plink); $nums = $nums + @mysql_num_rows($res); while ($user = @mysql_fetch_array($res)) { if ($dtmYesterday == $user[expire]) { $ListDT .= "Client(特店): {$user['client']} , 公司名稱: {$user['corpname']} , 到期日: {$user['expire']} , 聯絡人: {$user['contact']} , 電話: {$user['tel']} , 手機: {$user['mobile']} <br><br> \n"; } else { $flag = 1; $ListDT .= "<font color=red>Client(特店): {$user['client']} , 公司名稱: {$user['corpname']} , 到期日: {$user['expire']} , 聯絡人: {$user['contact']} , 電話: {$user['tel']} , 手機: {$user['mobile']} (到期日期異常, 請檢查)</font><br><br> \n"; } } $str = "UPDATE o_user SET stop=1 WHERE stop=0 and expire<'{$hcYmd}' "; $res = @mysql_query($str, $plink); $result = 1; $result_note = "更新" . $nums . "筆完成"; $title = $subject . "-" . $result_note; $msg = $title . "<hr size=1>" . $ListDT; //有異常CC給 雅純 if ($flag) { $title .= "-有異常"; $msg = $title . " 請檢查紅色的部份是否有異常<hr size=1>" . $ListDT; } exec_mail(6, $title, $msg, '000_auto'); exec_mail(0, $title, $msg, '000_auto', '*****@*****.**'); @mysql_close($plink); //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); $msg .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 000_auto.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, '000_auto'); echo $subject . "-結束 \r\n"; exit;
if ($nums) { $result_note = "更新筆數" . $nums; $title = $subject . "(" . $value . ")-" . $result_note; $msg = $title . " 總金額 " . $amt . " <hr size=1><table border=0><tr><td></td><td> Client </td><td> 授權單號 </td><td> Amount </td><td> 關帳時間 </td><td> 交易時間 </td></tr>" . $str . "</table>"; $msg .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 g_Close_dotNet08.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); send_mail(ROOT_MAIL, FromMailAddress, $title, $msg); } $total += $nums; $ListDT .= $value . ": " . $nums . " 筆<br>"; } @mysql_close($plink); $result = 1; $result_note = "共11家銀行預撥壓已關帳" . $total . "筆"; $title = $subject . "-" . $result_note; $msg = $title . " (" . $dtmStartDateTime . " - " . $dtmEndDateTime . ") <hr size=1>" . $ListDT . "總共 " . $total . " 筆"; if ($sql_error) { $result = 2; $title = $subject . "-異常-" . $result_note; $msg = $title . "<hr size=1>" . $ListDT . "總共 " . $total . " 筆"; $msg .= "<br>執行失敗SQL: <br>" . $sql_error; } if ($TEST_mode) { $title .= "-測試"; } //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); $msg .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 g_Close_dotNet08.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'g_Close_dotNet08'); echo $subject . "-結束 \r\n"; exit;
$str = "SELECT sr,client,authsr,amount,dt,isdt FROM `o_close` where stat='關帳中' and bank in (29, 30) and dt>='{$dtmStartDateTime}' and dt<='{$dtmEndDateTime}' "; $res = mysql_query($str, $plink); $i = 0; $j = 0; $amt = 0; $str = ""; while ($oclose = mysql_fetch_array($res)) { $osr = $oclose[sr]; $client = $oclose[client]; $oauthsr = $oclose[authsr]; $amount = $oclose[amount]; if (!$TEST_mode) { $strUP = "update o_close set stat='已關帳' where sr='{$osr}' and bank in (29, 30) and stat='關帳中' limit 1 "; @mysql_query($strUP, $plink); $strAuth = "update o_auth set close=1,clsamt=clsamt+{$amount} where sr='{$oauthsr}' and remsg='已授權' and bank in (29, 30) limit 1 "; @mysql_query($strAuth, $plink); } $i++; $amt += $amount; $str .= "<tr><td> " . $i . " </td><td> " . $client . " </td><td> " . $oauthsr . " </td><td> " . $amount . " </td><td> " . $oclose[dt] . " </td><td> " . $oclose[isdt] . " </td></tr>"; } $result_note = "更新筆數" . $i; $title = $subject . "-" . $result_note; $msg = $title . " 總金額 " . $amt . " <hr size=1><table border=0><tr><td></td><td> Client </td><td> 授權單號 </td><td> Amount </td><td> 關帳時間 </td><td> 交易時間 </td></tr>" . $str . "</table>"; //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); $msg .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 g_Close_Cathay.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, 'g_Close_Cathay'); echo $subject . "-結束 \r\n"; exit;
$txtnbc = strlen($SendNECc); $goNECc = @fwrite($fp, $SendNECc, $txtnbc); $bsbc = @fread($fp, 1024); fclose($fp); } //回應B004**000**batch_id**batch_seq**序號追蹤碼**## $VCBSBc = substr($bsbc, 0, 4); if ($VCBSBc != 'B004') { //$City_Close_erro = 1; //關帳失敗旗標, 發信給管理者 $title = "allPay信用卡幕後授權-關帳失敗旗標"; $msg = "SendNEC : " . $SendNECc . " <br>"; $msg .= "Response : " . $bsbc . "<br>"; $msg .= "SR : " . $Cxc[3] . "<br>"; $msg .= "使用者IP : " . $uip . "<br>"; $msg .= "<hr size=1>於 payweb 執行的 g_ssl.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); @exec_mail(2, $title, $msg, 'g_ssl.php'); } else { $isdt = substr($hohsn, 0, 8); //取出交易日 $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,sps,allsn,cdmk,escrow,bank_stat)"; $str .= " values (0,'{$client}','{$form['bank']}','{$Cxc['3']}','{$hohsn}','{$Cxc['6']}','','{$Cxc['2']}','{$Cxc['4']}','要關帳','{$ECI}','{$OKspsIN}','{$form['mid']}','{$form['tid']}','{$Cxc['7']}','{$glFrom}','{$glTo}','{$glCity}','{$isGuolu}','{$isdt}','{$bsbc}','{$hohsnYMD}','{$OKspsIN}','{$allsn}','{$cdmk}','{$escrow}','要關帳')"; 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,sps,allsn,cdmk,escrow,bank_stat,uip)"; $str .= " values ('{$o_close_sr}','{$client}','{$form['bank']}','{$Cxc['3']}','{$hohsn}','{$Cxc['6']}','','{$Cxc['2']}','{$Cxc['4']}','要關帳','{$ECI}','{$OKspsIN}','{$form['mid']}','{$form['tid']}','{$Cxc['7']}','{$glFrom}','{$glTo}','{$glCity}','{$isGuolu}','{$isdt}','{$bsbc}','{$hohsnYMD}','{$OKspsIN}','{$allsn}','{$cdmk}','{$escrow}','要關帳','{$uip}')"; mysql_query($str, $plink); $strCOS = "update o_auth set trans_date='{$hohsn}' where sr='{$Cxc['3']}' limit 1 "; mysql_query($strCOS, $plink); }
mysql_query($szSQL, $databaseLink); // 馬上發動要關帳的要求 if ($szReturnCode == '1' && $OneTm == 'isNOW') { $dtmYmd = date("Ymd"); // 取出交易日 $szSQL = "INSERT INTO o_close "; // 寫入 $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';
$nums = $nums + @mysql_num_rows($res); while ($user = @mysql_fetch_array($res)) { //$ListDT .= "Client: $user[client] , 公司名稱: $user[corpname] , 到期日: $user[expire] <br> 聯絡人: $user[contact] , 電話: $user[tel] , 手機: $user[mobile] , 業務人員: $user[saleman] <br><br> \n"; $ListDT .= "Client: {$user['client']} , 公司名稱: {$user['corpname']} , 到期日: {$user['expire']} , 業務人員: {$user['saleman']} <br><br> \n"; } @mysql_close($plink); $result = 1; if ($nums > 0) { $result_note = $Callday . "日內到期共" . $nums . "家"; $title = $subject . "-" . $result_note; $msg = $title . "<hr size=1>" . $ListDT; $mail_arr = array('*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**', '*****@*****.**'); // 已可以用 Sales@allpay.com.tw', //$mail_arr = array('*****@*****.**', '*****@*****.**'); foreach ($mail_arr as $i => $value) { //exec_mail(0, $title, $msg, '000_auto_notice', $mail_arr[$i]); send_mail_AddBCC($mail_arr[$i], FromMailAddress, $title, $msg, '*****@*****.**', '000_auto_notice.php'); usleep(60); } } else { $result_note = $Callday . "日內無到期商家"; $title = $subject . "-" . $result_note; $msg = $title . "<hr size=1>" . $str1 . "<br><br>" . $str2; } //記DBLOG $arr = array('setdate' => $setdate, 'settime' => $settime, 'period' => $period, 'result' => $result, 'result_note' => $result_note, 'running' => number_format(microtime(true) - $t1, 3), 'start_time' => $start_time, 'end_time' => date("YmdHis")); @DBLog($logtable, $subject, $arr); $msg .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 000_auto_notice.php 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $title, $msg, '000_auto_notice'); echo $subject . "-結束 \r\n"; exit;
// bank in (29, 30) 國泰世華不檢查 $strR = "SELECT sr, authsr, client, amount, dtymd, bank, dt, stat, mid, bank_stat FROM o_close WHERE bank not in (29, 30) and (dt>='" . $dt_start . "' and dt<='" . $dt_end . "') and bank_stat!='已關帳' and bank_stat!='已取消' and bank_stat!='取消' order by authsr ASC "; $ww = @mysql_query($strR, $plink); $num1 = @mysql_num_rows($ww); //未關帳成功筆數 if ($num1) { $i = 0; $ii_str = "<table border=0><tr align=center><td>序號</td><td>Client</td><td>o_close.sr</td><td>授權單號</td><td align=center>銀行</td><td>金額</td><td>關帳處理日期</td><td>授權</td><td>stat</td><td>bank_stat</td><td>MID</td></tr>"; while ($ax = @mysql_fetch_array($ww)) { $strauth = "select remsg from o_auth where sr='" . $ax['authsr'] . "' limit 1"; $rsauth = @mysql_query($strauth, $plink); $resauth = mysql_fetch_array($rsauth); $i++; $ii_str .= "<tr align=center><td>" . $i . "</td><td>" . $ax['client'] . "</td><td>" . $ax['sr'] . "</td><td>" . $ax['authsr'] . "</td><td>" . $ax['bank'] . "</td><td>" . $ax['amount'] . "</td><td>" . $ax['dt'] . "</td><td>" . $resauth['remsg'] . "</td><td>" . $ax['stat'] . "</td><td>" . $ax['bank_stat'] . "</td><td>" . $ax['mid'] . "</td></tr>"; } $ii_str .= "</table>"; $linemsg = "o_close.bank_stat有關帳失敗的交易 " . $num1 . " 筆, 請檢查! by holiday_pay_mak"; exec_line(4, $linemsg, 'holiday_pay_mak'); $Mailtitle = "警告-o_close.bank_stat有關帳失敗的交易" . $num1 . "筆"; $MailStr = $subject . "-" . $Mailtitle . "<hr><p>" . $strR . "<p>" . $ii_str; $MailStr .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 " . $filename . " 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $Mailtitle, $MailStr, 'holiday_pay_mak'); } else { $Mailtitle = "o_close.bank_stat昨日關帳正常"; $MailStr = $subject . "-" . $Mailtitle . "<hr><p>" . $strR . "<p>"; $MailStr .= "<hr size=1>於 Settlement 每日 " . $settime . " 執行的 " . $filename . " 執行時間 " . number_format(microtime(true) - $t1, 3) . " 秒<br>" . date("Y/m/d H:i:s"); exec_mail(2, $Mailtitle, $MailStr, 'holiday_pay_mak'); } echo $subject . "-第三階段驗證:未關帳成功警告-結束 \r\n"; @mysql_close($plink); exit;