NetCOBOL V11.0 入門ガイド

6.23 マルチスレッドプログラミング（応用編）(Sample22)

ここでは、本製品で提供するサンプルプログラム-Sample22-について説明します。

Sample22では、Sample21で作成したプログラムを拡張して、オンラインストアの業務を実現するアプリケーションの例を示します。

ここで示すプログラムは、NetCOBOLのマルチスレッドプログラミング機能とWeb連携機能を使用したものです。マルチスレッドプログラミング機能の詳細は、“NetCOBOL ユーザーズガイド”の“マルチスレッド”を、Web連携機能の詳細は、“NetCOBOL ユーザーズガイド”の“Web連携”を参照してください。

また、サーバアプリケーションの運用に有効な機能であるイベントログ出力サブルーチンの使用法も合わせて示します。イベントログ出力サブルーチンの詳細は“NetCOBOL ユーザーズガイド”の“COB_REPORT_EVENT(イベントログ出力サブルーチン)”を参照してください。

このプログラムを動作させるためには、クライアント側・サーバ側で以下の製品が必要となります。

クライアント側

• Microsoft(R) Internet Explorer 8.0以上

サーバ側

• 以下のいずれかの製品

  • Windows Server 2008 R2

  • Windows Server 2012

  • Windows Server 2012 R2

• Microsoft(R) Internet Information Services 7.5以上

概要

サンプルプログラムは、次の5つの部分からなります。

1. 開始処理

   スレッド間でのリソース(ファイル・データ)を獲得し、初期設定をします。

2. 認証処理

   スレッド間でのリソース(ファイル・データ)を参照して、認証処理を実現します。

3. オーダー確認処理

   スレッド間でのリソース(ファイル・データ)を参照して、オーダー確認処理を実現します。

4. オーダー発行処理

   スレッド間でのリソース(ファイル・データ)を参照して、オーダー発行処理を実現します。共有するファイルの更新処理も行います。

5. 終了処理

   スレッド間でのリソース(ファイル・データ)を開放します。

それぞれ、Web連携機能を使用するプログラムから、スレッド間でリソース(ファイル・データ)の共有や、スレッド間の同期制御を行うプログラムを呼び出します。

提供プログラム一覧

• COBOLソースファイル

  • Auth.cob

  • Confirm.cob

  • Entry.cob

  • Isainit.cob

  • Isaterm.cob

  • Olsend.cob

  • Olsstcgt.cob

  • Olsprdgt.cob

  • OlsStcodr.cob

  • OLSSTR.cob

  • OLSUSRINF.cob

  • Shutdown.cob

  • Startup.cob

  • Stupinit.cob

• 登録集原文

  • ORDER-INFO.cbl

  • PRODUCT-INFO.cbl

  • STOCK-INFO.cbl

  • USER-INFO.cbl

  • USER-LOCK.cbl

  • USER-LOG.cbl

• モジュール定義ファイル

  • Auth.def

  • Shutdown.def

  • Startup.def

• データファイル

  • Stockinfo

  • Productinfo

  • Userinfo

• 実行用の初期化ファイル

  • COBOL85.CBR

• HTMLファイル

  • ADMIN.HTML

  • AUTH.HTML

  • AUTHFAIL.HTML

  • CATALOG.HTML

  • CONFIRM.HTML

  • CONFIRMDETAILPARTS.HTML

  • CONFIRMHEAD.HTML

  • CONFIRMTAIL.HTML

  • ILLIGALACCESS.HTML

  • ILLIGALSYSTEM.HTML

  • NOTOPENED.HTML

  • OPENED.HTML

  • ORDERDETAILPARTS.HTML

  • ORDERRESULTHEAD.HTML

  • ORDERRESULTTAIL.HTML

  • SHOPPINGMENU.HTML

  • SHORTAGESTOCK.HTML

  • SHUTDOWN.HTML

  • STARTUP.HTML

  • SYSERROR.HTML

  • SYSTEMERROR.HTML

  • STARTMENU.HTML

  • UNDERCONSTRUCTION.HTML

• GIFファイル

  • CATALOGTITLE.gif

  • FJLOGO.gif

  • TITLE.gif

• JPEGファイル

  • FMV-6450DX2.JPG

  • FMV-6450TX2.JPG

• その他のファイル

  • Makefile（メイクファイル）

プログラムの呼出し関係

業務開始・終了

オンラインストア

使用しているCOBOLの機能

• 索引ファイル(創成・参照・更新・書換え)

• 外部データ

• 外部ファイル

• データロックサブルーチン

• COBOL ISAPIサブルーチン

• 外部ファイルイベントログ(利用者定義情報の出力)

使用しているCOBOLの文

• CALL文

• CLOSE文

• EXIT文

• GO TO文

• IF文

• MOVE文

• OPEN文

• PERFORM文

• READ文

• REWRITE文

• SET文

• START文

• WRITE文