キュー・マネージャーからの切断

この例は、MQDISC 呼び出しを使用して、 z/OS® バッチでキュー・マネージャーからプログラムを切断する方法を示しています。

このコード抽出で使用される変数は、キュー・マネージャーへの接続で設定された変数です。これは、 IBM® MQ for z/OSに用意されているブラウズ・サンプル・アプリケーション (プログラム CSQ4BCA1) から抜粋されています。他のプラットフォーム上のサンプル・アプリケーションの名前と場所については、「プロシージャ-型のサンプル・プログラム ( z/OS 以外のプラットフォーム)」を参照してください。

⋮
   /*                                                    */
   /*   Disconnect from the queue manager.  Test the     */
   /*   output of the disconnect call.  If the call      */
   /*   fails, print an error message showing the        */
   /*   completion code and reason code.                 */
   /*                                                    */
   MQDISC(&Hconn,
          &CompCode,
          &Reason);
   if ((CompCode != MQCC_OK) || (Reason != MQRC_NONE))
      {
      sprintf(pBuff, MESSAGE_4_E,
              ERROR_IN_MQDISC, CompCode, Reason);
      PrintLine(pBuff);
      RetCode = CSQ4_ERROR;
      }
⋮