テストプログラムを実行した複製の検証

高可用性グループが正しく構成されていることを検証したら、次の COBOL プログラムを実行して複製プロセスがそのグループ内で正しく機能することを検証します。このプログラムにより、データファイルが作成されます。その名前は前の手順で dbase.ref ファイルに追加されています。プログラムが完了すると、データファイル (FILE.DAT) がプライマリサーバー (RED) 上に作成されてから、スタンバイサーバー (GREEN と BLUE) に複製されます。

c:\HA ディレクトリに runner.cbl という新しいファイルを作成してから、次のコードを貼り付けてそのファイルを保存します。

      $set callfh"FHREDIR"
       environment division.
       configuration section.
       input-output section.
       file-control.

           select optional idxfile
               assign to disk "file.dat"
               organization is indexed
               access is dynamic
               lock mode is automatic
               record key is idxfile-primary-key
               file status is file-status.

       data division.
       file section.

       fd  idxfile.
       01  idxfile-rec.
           03  idxfile-primary-key pic 999999999.
       
       working-storage section.
           01 file-status.
                05 status-key-1     pic x.
                05 status-key-2     pic x.
                05 binary-status redefines status-key-2  pic 99 comp-x.
           
       Procedure Division.
           open output idxfile
           move 0 to idxfile-primary-key
           perform 100 times
              perform 20 times
              add 1 to idxfile-primary-key
                  write idxfile-rec
              end-perform
              commit
           end-perform
           close idxfile
           stop run.

Enterprise Developer のコマンドプロンプトから以下を入力します。
```
cobol runner.cbl int();
```
COBOL ファイルが .int ファイルにコンパイルされます。
同じディレクトリに、COBOL プログラムで指定されている FHREDIR.cfg ファイルを作成してから、次のオプションを貼り付けてそのファイルを保存します。
```
/s FS1
/um
/ra 5
/rd 5000
/cm ccism
```
次のように入力してプログラムを実行します。
```
run runner.int
```
ヒント：プログラムの実行中に、Enterprise Server Administration ホームページでプライマリサーバーの [Details > ES Monitor & Control > iFSView > files get] をクリックして Fileshare 内の開いているファイルを表示します。
プログラムが完了したら、各サーバーのシステムディレクトリを調べ、各ファイルに FILE.DAT が含まれていることを確認します。これにより、複製がグループ内で正しく機能していることが検証されます。

このトピックに関するフィードバックを送信

テスト プログラムを実行した複製の検証

テストプログラムを実行した複製の検証