ただいまの質問       
101 
phpquery

関連する質問

おすすめの質問
スポンサー広告(質問)
open-omni.com
open-omni
少しでもコストを抑えて手軽にAS400のオープン化に取り組めるツールとして、PHPの活用をお勧めします!
www.ibiweb.gr.jp
iBI
会員各社のソリューション連携により、AS400におけるアプリケーション環境をトータルでご提供します。
i5php.jp
opensource IBM i
IBM i(AS400)のオープン化を中心として、オープンソースソフトの啓蒙と普及に努めています。
phpquery.jp
opensource IBM i
PHP QUERYは、IBM i(AS400)上のクエリー定義をWeb画面から参照するデータ抽出ツールです。

ToolkitServiceでMCH3601発生以降にプログラムを実行できなくなる

3 年前に 質問(as/400) MISAMISA 150 pt
ZendServerからRPG、CLプログラムを実行する手段として、ToolkitServiceを使っています。
最近モバイル端末を展開してToolkitServiceが実行される機会が増加したせいか、ToolkitServiceの実行から発生するジョブ:XTOOLKIT(ユーザー:QTMHHTTP)で、MCH3601が発生して以降、RPG、CLプログラムが実行されない現象が発生しています。
また、この現象から回復するのに、ZendSeverサブシステム、Apacheの再起動では回復せず、システムをIPLするしかなく非常に困っております。
同じような経験をなさった方がいらっしゃいましたら回避策をご教授いただけませんでしょうか。

ToolkitService実行コード
--------------------------------------------------------------------
//0.i5へ接続
    require_once("ToolkitService.php");
    $db   = "*LOCAL";
    $user = "";
    $pass = "";
    $extension = "ibm_db2";
    $conn_r = null;
    $param = array();
    try
      {
        $conn_r = ToolkitService::getInstance($db, $user, $pass, $extension);
        if(!$conn_r) die("<br>Connection failed!");
      }
      catch (Exception $e)
      {
        echo $e->getMessage(), "\n";
        exit;
      }

    $conn_r->setToolkitServiceParams(array('InternalKey'=>"/tmp/$user"));

// 1.入出力パラメータの属性設定
    $param[] = $conn_r->AddParameterChar('both', 1, "parm1", 'P01', $W01);
    $param[] = $conn_r->AddParameterChar('both', 2, "parm2", 'P02', $W02);

// 2.呼び出しプログラムの設定
    $result_r = $conn_r->PgmCall("PGM", "LIB", $param, null, null);
    if ($result_r) {
      $W01 = $result_r['io_param']['P01'];
      $W02 = $result_r['io_param']['P02'];
    }else {
      print("Execution failed");
    }
// 3.プログラムの解放と切断
     $conn_r->disconnect();
3 年前に 質問(as/400) MISAMISA 150 pt
0 as400

1

answers

回答数

ログインまたはユーザー登録してからでないと
回答はご覧頂けません。