バージョン 4.2.5	検索   索引   目次   |   PDF ブック   |   ホーム   上へ   戻る   次へ

このドキュメントでは、BS2000/OSD 環境の Natural でグローバル共通メモリプールを起動および停止するプログラム、および BS2000/OSD 環境の Natural でローカルまたはグローバル共通メモリプールを定義するマクロについて説明します。

以下のトピックについて説明します。

• グローバル共通メモリプール

• ローカル共通メモリプール

グローバル共通メモリプール

BS2000/OSD 環境の Natural でグローバル共通メモリプールを起動および停止するために、以下のプログラムが用意されています。

• CMPSTART

• CMPEND

注意:
以下の説明で、vrs は製品のバージョン、リリース、およびシステムメンテナンスレベルを表します。

CMPSTART プログラム

CMPSTART プログラムの機能は以下のとおりです。

• グローバル共通メモリプールを独自の開始タスクで起動します。

• 定義済みのモジュールをグローバル共通メモリプールにロードします。

• グローバル共通メモリプールを初期化します。

キーワードパラメータ TXTSIZE および BPLIST（下記参照）は、Natural グローバルバッファプールを起動するときおよび CMPSTART プログラムにのみ有効です。

キーワードパラメータ JV および JVSUFX（下記参照）は、グローバル共通メモリプールを起動するときの CMPSTART プログラムにのみ有効です。

その他のすべてのキーワードパラメータは、BS2STUB モジュールの生成に使用される ADDON マクロのキーワードパラメータと同じです。

以下のキーワードパラメータを使用できます。

TXTSIZE | BPLIST | JV | JVSUFX

TXTSIZE - バッファプールのテキストレコードのサイズ

このキーワードパラメータは、Natural バッファプールのテキストレコードのサイズを KB 単位で定義します。

BPLIST - グローバルバッファプールのプリロードリスト

このキーワードパラメータは、Natural グローバルバッファプールのプリロードリストの名前を定義します。 プリロードリストの定義済み Natural プログラムは、最初のユーザーのログオン時に Natural グローバルバッファプールにロードされます。

JV - ジョブ変数の作成

このキーワードパラメータは、ジョブ変数を作成するかどうかを定義します。 このジョブ変数により、共通メモリプールのステータスをジョブ制御言語で制御できるようになります。

ジョブ変数名は 2 つの部分から成ります。

• 1 つ目の部分は、共通メモリプールの名前です（キーワードパラメータ NAME のオペランド）。

• 2 つ目の部分は、キーワードパラメータ JVSUFX のオペランドです（下記参照）。

ジョブ変数ナビゲーションのロジック：

CMPSTART プログラムが起動すると、ジョブ変数が使用可能かどうかが確認されます。 使用可能な場合は、ジョブ変数の値が "0" に設定されます。 使用できない場合は、ジョブ変数はカタログ化され、値が "0" に設定されます。 共通メモリプールが正常に有効化され初期化されると、ジョブ変数の値が "1" に設定されます。 グローバル共通メモリプールが終了すると、ジョブ変数は削除されます。

JVSUFX - ジョブ変数名の接尾辞

このキーワードパラメータは、ジョブ変数名の 2 番目の部分を定義します。

例：

NAME=EDTvrsGA,TYPE=EDT,JV=YES,JVSUFX=.SAG##JV . . . . . 

ジョブ変数名は EDTvrsGA.SAG##JV です。

オペレータコマンド

以下のオペレータコマンドは、グローバル共通メモリプールを終了します。

/INTRtsn,STOP 

または

/INTRtsn,END 

以下のオペレータコマンドは、グローバル共通メモリプールの名前、場所、アドレス、サイズ、およびアクティブ時間をコンソールに表示します。

/INTRtsn,DPRM 

以下のオペレータコマンドは、グローバル共通メモリプールの開始タスクをダンプ付きで終了します。

/INTRtsn,DUMP 

例：

• グローバルロードプール（共有ニュークリアス）を起動するには

  /.NATSHRE LOGON
  /OPTION DUMP=YES
  /SYSFILE SYSDTA=(SYSCMD)
  /SYSFILE SYSOUT=LST.NATSHARE
  /EXEC (CMPSTART,NATvrs.MOD)
  NAME=NATSHARE,SIZE=2MB,POSI=ABOVE,ADDR=250,SCOP=GLOBAL
  PFIX=YES,ALNK=NO,LIBR=NATvrs.USER.MOD
  /SYSFILE SYSDTA=(PRIMARY)
  /LOGOFF
  /* NATSHARE IS THE NAME OF THE LINKED NATURAL REENTRANT MODULE. IT IS ALSO THE
  /* NAME OF THE COMMON MEMORY POOL. THE ADDRESS OF THE GLOBAL NATURAL LOAD POOL
  /* MUST BE DEFINED. THE ADDRESS MUST BE FIXED (PFIX=YES).

• Natural グローバルバッファプールを起動するには

  /.BPvrsGA LOGON
  /OPTION DUMP=YES
  /SYSFILE SYSDTA=(SYSCMD)
  /SYSFILE SYSOUT=LST.BPvrsGA
  /EXEC (CMPSTART,NATvrs.MOD)
  NAME=BPvrsGA,TYPE=NAT,POSI=ABOVE,SIZE=2048KB,SCOP=GLOBAL
  /SYSFILE SYSDTA=(PRIMARY)
  /LOGOFF
  /* FOR A NATURAL BUFFER POOL, THE OPERAND OF PARAMETER "TYPE" MUST BE DEFINED
  /* AS 'NAT'.

• ESA データスペースを備えた Natural グローバルバッファプールを起動するには

  /.BPvrsA LOGON
  /OPTION DUMP=YES
  /SYSFILE SYSOUT=LST.BPvrsGA
  /SYSFILE SYSDTA=(SYSCMD)
  /EXEC (CMPSTART,NATvrs.BS2.MOD)
  NAME=BPvrsGA,TYPE=NAT,POSI=ABOVE,SIZE=10MB,ADDR=260,DESA=YES
  DATA=32MB
  /SYSFILE SYSDATA=(PRIMARY)
  /LOGOFF N

CMPEND プログラム

CMPEND プログラムは、すべてのグローバル共通メモリプールの開始タスクを終了します。 CMPEND で入力するのは、グローバル共通メモリプールの名前です。

例：

/SYSFILE SYSDTA=(SYSCMD)
/EXEC (CMPEND,NATvrs.MOD)
NATSHARE,BPvrsGA
/* THE DELIMITER FOR THE DEFINED NAMES IS ' ' OR ','.

ローカル共通メモリプール

このセクションでは、BS2000/OSD 環境の Natural でローカル（またはグローバル）共通メモリプールを定義できるマクロについて説明します。

• BS2STUB マクロ

• ADDON マクロ

• ADDEND マクロ

• BS2STUB マクロのアセンブルの例

BS2STUB マクロ

BS2STUB マクロの機能は以下のとおりです。

• ローカル共通メモリプールを起動します。

• 定義済みのグローバル共通メモリプールに接続します。

• 定義済みのモジュールをローカル共通メモリプールにロードします。

• 呼び出された 3GL プログラムをダイナミックにロードします。

BS2STUB マクロには以下のパラメータがあります。

name - CSECT の名前

PARMOD - 24/31 ビットアドレッシングモード

このパラメータは、24 または 31 ビットアドレッシングモードを使用するかどうかを指定します。

PROGMOD - 16 MB 境界より上または下にロード

このパラメータは、ダイナミックロードされるプログラムを 16 MB 境界より上または下のどちらにロードするかを指定します。

ADDON マクロ

ADDON マクロは、BS2STUB プログラムの ADDON テーブルで共通メモリプールを定義します。 このマクロには、以下のキーワードパラメータがあります。これは、CMPSTART プログラムにも適用されます。

ACCS | ADDR | ALNK | DATA | DESA | LIBR | LOAD | NAME | PFIX | POSI | SCOP | SIZE | STAT | TYPE | WAIT

ACCS - 共通メモリプールへのアクセス

このパラメータは、共通メモリプールへのアクセス方法を指定します。

ADDR - 共通メモリプールアドレスのサイズ

このパラメータは、共通メモリプールの定義済みアドレスのメガバイト数を指定します。 サイズの指定は必須です。 デフォルト値はありません。

ALNK - AUTOLNK 機能のアクティブ化

このパラメータは、ダイナミックバインダローダー（DBL）の AUTOLNK 機能をアクティブにするかどうかを指定します。

DATA - データスペースエリアのサイズ

このパラメータは、DESA パラメータと組み合わせて指定でき、起動するバッファプールまたはスワッププールのデータスペースエリアのサイズを定義します。 以下の設定が可能です。

ADDON マクロでの DATA パラメータの使用

• ローカルバッファプールを起動するには、DESA=YES を指定し、DATA パラメータを使用してデータスペースエリアのサイズを MB または KB 単位で指定します。 デフォルト値がないため、サイズの指定は必須です。

• グローバルバッファプールまたはグローバルスワッププールを接続するには、DESA=YES を指定し、DATA パラメータは CMPSTART プログラムに指定済みなので省略します。

CMPSTART プログラムでの DATA パラメータの使用

グローバルバッファプールを起動するには、DESA=YES を指定し、DATA パラメータを使用してデータスペースエリアのサイズを MB または KB 単位で指定します。 デフォルト値がないため、サイズの指定は必須です。

DESA - ESA データスペースエリア

このパラメータは、Natural バッファプールまたは Natural スワッププールに ESA データスペースエリアを作成するかどうかを決めるために指定する必要があります。

• ESA データスペースは、TYPE=NAT または TYPE=SWP のバッファプールにのみサポートされます。

• パラメータ DESA=YES が関連するのは、ESA データスペースのあるグローバル共通メモリプール（独自の開始タスクを持つ CMPSTART）または ESA データスペースのあるローカル共通メモリプール（BS2STUB/ADDON）を作成する場合のみです。

• 既存のグローバル共通メモリプールに接続する場合（BS2STUB/ADDON）は、パラメータ DESA は無意味です。

注意: ESA データスペースは、独自の開始タスクを持つ 1 つのグローバル共通メモリプールにのみ作成してください。 ESA データスペースを作成したタスクが正常終了または異常終了すると、ESA データスペースは使用できなくなります。

LIBR - ロードライブラリ

このパラメータは、定義済みモジュールのロード元を指定します。 デフォルト値はありません。 パラメータ LIBR のオペランドを指定しない場合は、共通メモリプールのみが有効になります（ENAMP+REQMP）。

LOAD - モジュールを共通メモリプールにロードするメソッド

このパラメータは、モジュールを共通メモリプールにロードする際に使用するマクロを指定します。

NAME - 共通メモリプール／モジュールの名前

このパラメータは、モジュールの名前と共通メモリプールの名前のいずれかまたは両方を指定します。 名前の指定は必須です。 デフォルト値はありません。

名前の最大文字数は以下のとおりです。

PFIX - 固定アドレス

このパラメータは、共通メモリプールのアドレスを固定するかどうかを指定します。

グローバル Natural ロードプールの場合は、このパラメータを YES に設定する必要があります。

POSI - 16 MB 境界からの相対位置

このパラメータは、共通メモリプールの位置を指定します。位置は 16 MB 境界より上または下を指定できます。

SCOP - 共通メモリプールの範囲

このパラメータは、共通メモリプールの範囲を指定します。

SIZE - 共通メモリプールのサイズ

このパラメータは、共通メモリプールのサイズを MB または KB 単位で指定します。

STAT - 共通メモリプールのステータス

このパラメータは、共通メモリプールのステータスを指定します。

注意:
CMPSTART プログラムが実行されている場合は、STAT パラメータは無視されます。

TYPE - 共通メモリプールのタイプ

このパラメータは、共通メモリプールのタイプを指定します。 タイプの指定は必須です。 デフォルト値はありません。

WAIT - アプリケーション起動時の共通メモリプールの有効化または待機

このパラメータは、共通メモリプールを、アプリケーションの起動時にすぐに有効にするか、Natural から要求があるまで待機してから有効にするかを指定します。

注意:
CMPSTART プログラムが実行されている場合は、WAIT パラメータは無視されます。

ADDEND マクロ

ADDEND マクロは、ADDON マクロの定義の終了を定義します。 ADDEND にはパラメータはありません。

BS2STUB マクロのアセンブルの例

BS2STUBA BS2STUB PARMOD=31,PROGMOD=24            31-BIT ADDRESSING MODE,
*                                                LOAD 3GL PROGRAMS BELOW
* +--------------------------------------------------------------------+ 
* I Define the Natural global load pool with Name NATSHARE 
* +--------------------------------------------------------------------+
         ADDON NAME=NATSHARE,STAT=GLOBAL 
* +--------------------------------------------------------------------+
* I Define the Natural local swap pool 
* +--------------------------------------------------------------------+
         ADDON NAME=SWAPvrsLA,TYPE=SWP,SIZE=16MB,STAT=LOCAL,POSI=ABOVE
* +--------------------------------------------------------------------+
* I Connecting a Natural global buffer pool with ESA data space 
* +--------------------------------------------------------------------+
           ADDON NAME=BPvrsGA,TYPE=NAT,STAT=GLOBAL
* +--------------------------------------------------------------------+
* I Creating/Connecting a Natural local buffer pool with ESA data space
* +--------------------------------------------------------------------+
         ADDON NAME=BPvrsLA,TYPE=NAT,POSI=ABOVE,SIZE=10MB,
               STAT=LOCAL,SCOP=LOCAL,DESA=YES,DATA=32MB
         ADDEND
         END

www.softwareag.com

Copyright © Software AG 1979-2009. All rights reserved.

検索   索引   目次   |   PDF ブック   |   ホーム   上へ   戻る   次へ