Changeset 7768 for temp/trunk/html/test/naka/shopcgi.php

Timestamp:

2006/11/08 14:21:18 (20 years ago)

Author:

naka

Message:

* empty log message *

File:

• temp/trunk/html/test/naka/shopcgi.php (modified) (3 diffs)

temp/trunk/html/test/naka/shopcgi.php

@@ -39 +39 @@
 
 $order_url = "http://mod-i.ccsware.net/ohayou/EntryTran.php";
+$order_id = sfGetUniqRandomId();
 
 // ŹÊÞ¾ðÊó¤ÎÁ÷¿®
 $arrData = array(
-    'OrderId' => sfGetUniqRandomId(),   // ŹÊÞ¤´¤È¤Ë°ì°Õ¤ÊÃíʸID¤òÁ÷¿®¤¹¤ë¡£
+    'OrderId' => $order_id,     // ŹÊÞ¤´¤È¤Ë°ì°Õ¤ÊÃíʸID¤òÁ÷¿®¤¹¤ë¡£
     'TdTenantName' => '',
     'TdFlag' => '',
@@ -51 +52 @@
     'Tax' => '5',
     'JobCd' => 'CHECK',
-    'TenantNo' => '111111111',          // cgi-4¤ÇºîÀ®¤·¤¿Å¹ÊÞID¤òÁ÷¿®¤¹¤ë¡£
+    'TenantNo' => '111111111',  // cgi-4¤ÇºîÀ®¤·¤¿Å¹ÊÞID¤òÁ÷¿®¤¹¤ë¡£
 );
 
@@ -108 +109 @@
 */
 $arrData = array(
-    'AccessId' => $arrRet['ACCESS_ID'],     // ŹÊÞ¤´¤È¤Ë°ì°Õ¤ÊÃíʸID¤òÁ÷¿®¤¹¤ë¡£
-    'AccessPass' => $arrRet['ACCESS_PASS'], // ŹÊÞ¤´¤È¤Ë°ì°Õ¤ÊÃíʸID¤òÁ÷¿®¤¹¤ë¡£
-    
-    'TdTenantName' => '',
-    'TdFlag' => '',
-    'ShopId' => 'test',
-    'Amount' => '100',
-    'ShopPass' => 'test',
-    'Currency' => 'JPN',
-    'Tax' => '5',
-    'JobCd' => 'CHECK',
-    'TenantNo' => '111111111',          // cgi-4¤ÇºîÀ®¤·¤¿Å¹ÊÞID¤òÁ÷¿®¤¹¤ë¡£
+    'AccessId' => $arrRet['ACCESS_ID'],
+    'AccessPass' => $arrRet['ACCESS_PASS'],
+    'OrderId' => $order_id,
+    'RetURL' => 'http://test.ec-cube.net/ec-cube/naka/recv.php',
+    'CardType' => 'VISA,     11111, 111111111111111111111111111111111111, 1111111111',
+    'Method' => '2',
+    'PayTimes' => '4',
+    'CardNo1' => '4111',
+    'CardNo2' => '1111',
+    'CardNo3' => '1111',
+    'CardNo4' => '1111',
+    'ExpireMM' => '06',
+    'ExpireYY' => '07',
+    'ClientFieldFlag' => '1',
+    'ClientField1' => 'f1',
+    'ClientField2' => 'f2',
+    'ClientField3' => 'f3'
 );
 
+$req = new HTTP_Request($order_url);
+$req->setMethod(HTTP_REQUEST_METHOD_POST);
+        
+$arrSendData = array();
+$req->addPostDataArray($arrData);
+
+if (!PEAR::isError($req->sendRequest())) {
+    $response = $req->getResponseBody();
+} else {
+    $response = "";
+}
+$req->clearPostData();
+
+if($response != "") {
+    $arrTemp = split("&", $response);
+    foreach($arrTemp as $ret) {
+        list($key, $val) = split("=", $ret);
+        $arrRet[$key] = $val;
+    }
+}
 
 ?>