ユーティリティー・プログラム

MSS には数多くのユーティリティー・プログラムがあります。これらのユーティリティーの多くは、一般に使用されているメインフレーム・バッチ・ユーティリティーの機能をエミュレートします。これらのユーティリティーは、JCL ジョブストリームまたは REXX exec で呼び出すことができます。

ユーティリティー・プログラムには、次の 2 つのタイプがあります。

• メインフレーム・ユーティリティーのエミュレーション
• Micro Focus ユーティリティー

この章では、必要に応じて独自のユーティリティー・プログラムを記述する方法についても説明します。詳細については、独自のユーティリティー・プログラムの記述を参照してください。

メインフレーム・ユーティリティーのエミュレーション

このセクションでは、メインフレーム・エミュレーション・ユーティリティーについて説明します。これらのユーティリティーは、メインフレームの場合と同じプログラム名、データ・セット、およびコマンドを使用して JCL ジョブストリームまたは REXX exec で呼び出すことができます。MSS によってエミュレートされるメインフレーム・ユーティリティーは次のとおりです。

• DFSORT および SORT - ソート/マージ操作を実行します。
• IDCAMS - VSAM データ・セットを管理します。
• IEBCOMPR - 2 つの順次または区分データ・セットを比較します。
• IEBCOPY - 区分データ・セットをコピーまたはマージします。
• IEBGENER - 順次データ・セットをコピーします。
• IEBUPDTE - 順次または区分データ・セットを作成または変更します。
• IEFBR14 - 単に呼び出し元に戻ることによってダミー・プログラム機能を提供します。
• IKJEFT01 - バッチ・モードで TSO コマンドをサブミットします。
• IRXJCL - MVS バッチ・モードで REXX exec を実行します。
• IEBDG - テスト・データを作成します。

このセクションでは、これらのユーティリティーを MSS 環境で使用する場合に適用される特別な考慮事項について説明します。これには、メインフレームと MSS 環境で同一である動作に関する情報は含まれません。このセクションで言及しているメインフレーム・ユーティリティーの詳細については、IBM の関連マニュアルを参照してください。

ソート/マージ操作 (MFJSORT)

MFJSORT は、DFSORT および SORT メインフレーム・ユーティリティーをエミュレートします。MFJSORT では、順次データ・セットに対する次のソート/マージ操作が提供されます。

• 昇順または降順キーによるデータ・セットのソート
• 昇順または降順キーによるデータ・セットのマージ
• データ・セットのコピー
• 処理されるレコードの選択
• レコード内のフィールドの再編成
• 2 桁の年フィールドの正しい処理
• 2 桁の年フィールドから 4 桁のフィールドへの変換
• 重複キーを持つレコード内の数値フィールドの合計
• 複数の出力データ・セットの作成
• 代替照合順序の使用
• E15 および E35 出口プログラムの実行

JCL 文

このセクションでは、MFJSORT ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、MFJSORT という名前のプログラム、あるいはそれのエイリアスである DFSORT または SORT を指定する必要があります。その例を次に示します。

//STEPEXEC PGM=DFSORT,......

DD 文

MFJSORT を使用する場合は、常に次の DD 文が必要です。

• SYSIN - プログラム制御文が含まれているデータ・セット用。これは、インストリーム・データ・セットにすることができます。
• SYSPRINT - 出力リスティング・データ・セット用。このデータ・セットは、少なくとも 132 の LRECL 値を持っている必要があります。
• SORTIN - 入力データ・セット用。SORTIN に対するデータ・セットは 16 個まで連結できます。
• SORTOUT - 出力データ・セット用。SORTOFnn を使用する場合は、これは必要ありません。

次の DD 文はオプションです。

• SORTINnn - 複数の入力データ・セット用。nn は 01 で始まり、最大 16 まで 1 ずつ増加します。SORTINnn と SORTIN は相互に排他的です。
• SORTOFnn - 複数の出力データ・セット用。nn は 01 で始まり、最大 16 まで 1 ずつ増加します。SORTOFnn は、OUTFIL 文によって使用されます。

統計レポートの作成

プログラム制御文

MFJSORT によってサポートされるプログラム制御文を制限事項と共に次に示します。文のコード化のルールは、メインフレーム・ユーティリティーと同じです。

出口

MFJSORT は、それに相当するメインフレームのユーティリティーと同様に、E15 読み取り出口および E35 書き込み出口に対するユーザー出口プログラムを呼び出します。出口プログラムは、COBOL で記述し、Micro Focus 構文チェッカーでコンパイルする必要があります。これらの出口プログラムは、他の COBOL プログラムと同様に、普通に実行したり、デバッグすることができます。出口プログラムの記述とテストの手順については、メインフレームのマニュアルを参照してください。

リンケージ領域

MFJSORT は、標準リンケージ領域を E15 および E35 出口プログラムに提供します。標準リンケージ領域は、メインフレーム・ユーティリティーと互換性があり、次のように定義する必要があります。

戻りコード

次の表に示すように、MFJSORT は出口プログラムから、メインフレーム・ユーティリティーと同じ戻りコードを認識します。

SYNCSORT エミュレーション

MSS は、SYNCSORT 動作の限定的なエミュレーションも提供します。SYNCSORT エミュレーションの動作は、次の点を除き、DFSORT エミュレーションの動作と基本的に同じです。

• SYNCSORT では、括弧で囲まれたパラメータを、等号 (=) で区切ることなくキーワードのすぐ後に使用できます。
• SYNCSORT を使用した場合、OUTREC 文は、オプションとして FIELDS オプションの後に CONVERT オプションを取ることができます。

SYNCSORT を使用することを指定するには、現在使用しているエンタープライズ・サーバーの [Server > Properties > General] ページにある [Configuration Information] で環境変数 MFJSENGINE=SYNCSORT を設定します。

VSAM アクセス方式サービス (MFJAMS)

MFJAMS は、IDCAMS メインフレーム・ユーティリティーの主要な機能をエミュレートします。MFJAMS では、VSAM キー順データ・セット (Key-Sequenced Data Sets; DSDS)、入力順データ・セット (Entry-Sequenced Data Dets; ESDS)、および相対レコード・データ・セット (Relative-Record Data Sets; RRDS) に対する次の管理サービスが提供されます。

• ALTER - VSAM データ・セットの属性を変更します。
• DEFINE ALTERNATEINDEX - VSAM データ・セットの代替索引を定義します。
• DEFINE CLUSTER - 新しい VSAM データ・セットを定義します。
• DEFINE PATH - パス・データ・セットをサポートします。
• DELETE - データ・セットを削除します。
• LISTCAT - カタログ・エントリーをリストします。
• PRINT - データ・セットを印刷します。
• REPRO - データ・セットをコピーします。
• SET - 条件コードを変更します。
• VERIFY - VSAM データ・セットを検証します。

これらのサービスの一部は、順次データ・セット、区分データ・セット、および世代別データ・グループに使用できます。これらのコマンドの略称とパラメータは、メインフレーム上で有効なものであれば、すべて MFJAMS によってサポートされます。

MFJAMS は、JCL ジョブストリームまたは REXX exec によって実行できます。

VSAM アクセス方式サービスの詳細については、IBM のマニュアル『DFSMS/MVS Access Method Services for VSAM』(SC26-4905) を参照してください。

ファイル構造

メインフレームとは異なり、VSAM KSDS または ESDS データ・セットは、Windows または UNIX では通常 2 つのファイルで表されます。1 つは、VSAM データ・セットの実際のデータ・レコードが含まれているデータ・ファイル、もう 1 つは、主キー・データと代替キー・データが含まれている索引ファイルです。通常、これらのファイルには、ファイル名の拡張子として .dat と .idx がそれぞれ付いています。例外は、IDXFORMAT8 ファイルが使用されている場合です。これらには .dat ファイルしかありません。

2 ファイル構造は IDCAMS コマンドの処理方法に影響しますが、コマンドの最終的な結果は変わりません。非メインフレーム環境におけるコマンド実行の結果は、メインフレームの場合と同じです。MFJAMS は、非メインフレーム環境では関連性がないコマンドの部分を無視します。例えば、Windows または UNIX のもとでの VSAM ファイル構造では、操作する CI または CA サイズが提供されないため、これらのコマンド・パラメータは無視されます。

JCL 文

このセクションでは、MFJAMS ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、プログラム名の MFJAMS、あるいはそれのエイリアスである IDCAMS を指定する必要があります。その例を次に示します。

//STEPEXEC PGM=IDCAMS,.......

DD 文

MFJAMS を使用する場合は、常に次の DD 文が必要です。

• SYSIN - 入力コマンドが含まれているデータ・セット用。これは、インストリーム・データ・セットにすることができます。
• SYSPRINT - 出力リスティング・データ・セット用。このデータ・セットは、少なくとも 121 の LRECL 値を持っている必要があります。

次の DD 文は、一部のコマンドによって使用されます。

• PRINT、REPRO、および VERIFY コマンドへの入力に使用されるデータ・セット用。DD 文には、任意の有効な dd 名 (INFILE など) を使用できます。
• PRINT および REPRO コマンドからの出力に使用されるデータ・セット用。DD 文には、任意の有効な dd 名 (OUTFILE など) を使用できます。

コマンド

このセクションでは、MFJAMS コマンドについて説明します。

ALTER

ALTER コマンドは、MVS データ・セットの属性を変更します。

MFJAMS は、次の表に示したパラメータを使用します。他のパラメータは、すべて無視されます。

パラメータ：

コメント：

* を修飾子として使用して、複数のデータ・セットの名前を 1 つのコマンドで変更することはできません。例えば、ABC.*.FILE は許可されません。

DEFINE ALTERNATEINDEX

DEFINE ALTERNATEINDEX コマンドは、既存の VSAM データ・セットに対する代替索引を作成します。また、自動的にデータ・セットを再索引付けして、PC 上のデータと索引ファイルの間の整合性を維持します。代替索引は、主索引と同じファイルに含まれます。

MFJAMS は、次の表に示したパラメータを使用します。他のパラメータは、すべて無視されます。

パラメータ：

コメント：

• UNIQUEKEY と NONUNIQUEKEY は相互に排他的です。 デフォルトは NONUNIQUEKEY です。
• MFJAMS は自動的にデータ・セットを再索引付けするため、たとえ BLDINDEX パラメータが指定されていなくても、BLDINDEX パラメータが想定されます。
• MFJAMS の 1 回の呼び出しでは、代替索引を 7 つまで作成できます。索引ごとに別々のコマンドを入力してください。MFJAMS は、すべての代替索引に対して単一の再索引付け操作を実行します。
• MFJAMS は、Micro Focus 分割キーおよびキー圧縮機能をサポートしていません。これらの機能のいずれかを使用する VSAM データ・セットを MSS で開くことはできません。

DEFINE CLUSTER

DEFINE CLUSTER コマンドは、新しい VSAM データ・セットを作成します。このコマンドにより、データおよび索引ファイルがローカル・マシン上に作成され、データ・セット名がカタログされます。

MFJAMS は、次の表に示したパラメータを使用します。他のパラメータは、すべて無視されます。

パラメータ：

コメント：

• INDEXED、NONINDEXED、および NUMBERED は相互に排他的です。デフォルトは INDEXED です。
• MFJAMS では、主キーの重複エントリーは許可されません。
• MODEL から取得された値は、KEYS および RECORDSIZE によってオーバーライドされます。
• MFJAMS は、Micro Focus 分割キーおよびキー圧縮機能をサポートしていません。これらの機能のいずれかを使用する VSAM データ・セットを MSS で開くことはできません。

例：

クラスターを定義する典型的なジョブを次に示します。

//DEFCLUS  JOB  CLASS=A
//IDCSTEP  EXEC PGM=IDCAMS
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
DEFINE CLUSTER(NAME(TEST.KSDS.DUMMY) KEYS(5,0) -
       RECORDSIZE(80,80))

DEFINE CLUSTER 文で継続文字 (-) を使用していることに注目してください。

DEFINE PATH

DEFINE PATH コマンドを使用すると、MFJAMS がダミーのパス・データ・セットを作成します。これにより、そのデータ・セットを参照する DD 文はどれも失敗しなくなります。MFJAMS はメインフレームとは異なる方法でこの機能を実装するため、ダミーのパス・データ・セットが他の用途で必要になることはありません。

MFJAMS は、次の表に示したパラメータを使用します。他のパラメータは、すべて無視されます。

パラメータ：

DELETE

DELETE コマンドは、最大 99 個のデータ・セットを削除します。このコマンドは、VSAM データ・セットと非 VSAM データ・セットの両方に使用できます。このコマンドにより、データ・セットに関連付けられたローカル・ファイルは削除され、そのエントリーはカタログから削除されます。

MFJAMS は、次の表に示したパラメータを使用します。他のパラメータは、すべて無視されます。

パラメータ：

コメント：

FORCE と NOFORCE は相互に排他的です。デフォルトは NOFORCE です。

LISTCAT

LISTCAT コマンドは、カタログに含まれているデータ・セット名をリストします。

MFJAMS は、次の表に示したパラメータを使用します。他のパラメータは、すべて無視されます。

パラメータ：

コメント：

ENTRIES と LEVEL は相互に排他的であり、いずれか一方のみ指定できます。どちらも指定されていない場合は、LEVEL(*) がデフォルトになります。

PRINT

PRINT コマンドは、VSAM データ・セットと非 VSAM データ・セットの両方の内容を印刷します。このコマンドにより、完全なデータ・セット、またはデータ・セットの一部が文字フォーマット、16 進フォーマット、またはその両方のフォーマットで印刷されます。

MFJAMS は、次の表に示したパラメータを使用します。他のパラメータは、すべて無視されます。

パラメータ：

コメント：

• INFILE と INDATASET は相互に排他的です。いずれか一方を指定してください。
• FROMKEY と SKIP は相互に排他的です。どちらも指定しない場合は、最初の物理レコードから印刷が開始されます。
• TOKEY と COUNT は相互に排他的です。どちらも指定しない場合は、ファイルの終わりで印刷が終了します。
• CHARACTER、HEX、および DUMP は相互に排他的です。デフォルトは DUMP です。
• MFJAMS は、必要に応じてキー値を EBCDIC に変換します。
• MFJAMS は、部分キーをスペースで埋めます。

REPRO

REPRO は、データ・セットの内容を別のデータ・セットにコピーします。データ・セットの編成は、VSAM 編成または順次編成にすることができます。したがって、REPRO コマンドは次の処理を実行できます。

• 順次データ・セットを VSAM データ・セットにロードする
• VSAM データ・セットを VSAM データ・セットにロードし、オプションとして、入力レコードと同じ主キー値を持つレコードを置換する
• VSAM データ・セットを順次データ・セットにコピーする
• 順次データ・セットを順次データ・セットにコピーする

MFJAMS は、次の表に示したパラメータを使用します。他のパラメータは、すべて無視されます。

パラメータ：

コメント：

• INFILE と INDATASET は相互に排他的です。いずれか一方を指定してください。
• OUTFILE と OUTDATASET は相互に排他的です。いずれか一方を指定してください。
• REPLACE と NOREPLACE は相互に排他的です。デフォルトは NOREPLACE です。
• 代替キー・エントリーが以前に定義されている場合は、それらの代替キー・エントリーが出力データ・セットに自動的に追加されます。
• IDCAMS REPRO は、VSAM データ・セットに対する主キーおよび代替キーの最小レコード長まで LSEQ 入力レコードをブランクで埋めます。

SET

SET コマンドは、このジョブ・ステップ内の以前の MFJAMS コマンドによって設定された条件コードを変更します。MFJAMS は、下記の MAXCC および LASTCC パラメータだけを使用します。他のパラメータは、すべて無視されます。

パラメータ：

コメント：

いずれの場合も、最高有効値は 16 です。それよりも高い値を指定した場合は、MFJAMS によって条件コードが 16 に設定されます。

VERIFY

VERIFY コマンドは、VSAM データ・セットが読み取り可能であること、および索引が使用可能であることを確認するために VSAM データ・セットのオープンを試みます。VSAM データ・セットがエラーなしにオープンできる場合や別のプロセスにロックされている場合は、そのデータ・セットは読み取り可能であるとみなされます。

索引を使用できないことが分かった場合、VERIFY コマンドは、主キーとすべての代替キーに対する新しい索引ファイルを作成して索引を再構築します。データ・セットのデータ部分は変更されません。

MFJAMS は、次の表に示したパラメータを使用します。他のパラメータは、すべて無視されます。

パラメータ：

コメント：

FILE と DATASET は相互に排他的です。いずれか一方を指定してください。

データ・セットの比較 (MFJMATCH - IEBCOMPR)

JCL 文

EXEC 文

//STEPEXEC PGM=IEBCOMPR, ...

DD 文

制御文

区分データ・セットのコピーとマージ (MFJCOPY)

MFJCOPY は、区分データ・セットのコピーとマージについて IEBCOPY メインフレーム・ユーティリティーの操作をエミュレートします。

JCL 文

このセクションでは、MFJCOPY ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、プログラム名の MFJCOPY、あるいはそれのエイリアスである IEBCOPY を指定する必要があります。その例を次に示します。

//STEPEXEC PGM=IEBCOPY, ...

DD 文

MFJCOPY を使用する場合は、常に次の DD 文が必要です。

• SYSPRINT - 制御文とメッセージのリスティングに使用される順次データ・セット用
• SYSUT1 - 入力区分データ・セット用
• SYSUT2 - 出力区分データ・セット用

次の DD 文はオプションです。

• SYSIN - 制御データ・セット用

メインフレーム・ユーティリティーによって使用される次の DD 文は、MFJCOPY では無視されます。

• SYSUT3 - 入力データ・セットの仮想メモリーに空き領域がない場合のスピル・データ・セット用
• SYSUT4 - 出力データ・セットの仮想メモリーに空き領域がない場合のスピル・データ・セット用

制御文

次の制御文は解析されますが、処理されません。

• ALTERMOD
• COMPRESS
• COPYGRP
• COPYMOD

メインフレームと MSS での動作上の違いとしては、他に次のようなものがあります。

• MSS は PDS 編成と PDSE 編成を区別しないため、PDSE 固有の操作は処理されません。
• メインフレームでは、INDD と OUTDD に対して同じデータ・セットを指定すると、そのデータ・セットが圧縮されます。MSS では、そのような圧縮は用意されていないため、処理は行われません。
• メインフレームでは、(PDS を INDD として指定し、順次データ・セットを SYSIN のない OUTDD として指定することにより) PDS をアンロード・データ・セットにアンロードし、(順次データ・セットを INDD として指定し、PDS を OUTDD として指定することにより) アンロード・データ・セットから PDS にメンバーを再ロードすることができます。MSS では、上記のどちらの操作もサポートされません。
• MSSでは、ロード・モジュールに対する操作は処理されません。

順次データ・セットのコピー (MFJGENER)

MFJGENER は、順次データ・セット (つまり、PS または PSU データ・セット、あるいは PO または POU データ・セットのメンバー) について IEBGENER メインフレーム・ユーティリティーの基本コピー操作をエミュレートします。MFJGENER では、SYSIN データ・セットで指定されたコマンドは無視されます。

JCL 文

このセクションでは、MFJGENER ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、プログラム名の MFJGENER、あるいはそれのエイリアスである IEBGENER を指定する必要があります。その例を次に示します。

//STEPEXEC PGM=IEBGENER,......

DD 文

次の DD 文は必須です。

• SYSIN - コマンド入力データ・セット用
• SYSUT1 - 入力データ・セット用。SYSUT1 に対するデータ・セットは 16 個まで連結できます。
• SYSUT2 - 出力データ・セット用

メインフレーム・ユーティリティーによって使用される次の DD 文は、MFJGENER では無視されます。

• SYSPRINT - 出力リスティング・データ・セット用

制御文

次のリストでは、MFJGENER による制御文の処理が IEBGENER とどのように違うかを説明します。

• EXITS および LABELS 文は解析されますが、処理されません。
• GENERATE 文の場合、DBCS オペランドは解析されますが、処理されません。
• MEMBER 文の場合、指定されたエイリアスは解析されますが、処理されません。
• RECORD 文の場合：
  • 2 バイト文字セットに関連するオペランド (IDENTG や 変換タイプ CG および CV など) は解析されますが、処理されません。
  • 変換タイプ HE はサポートされません。
  • LABELS オペランドは解析されますが、処理されません。

データ・セットの作成と変更 (MFJUPDTE)

MFJUPDTE は、順次または区分データ・セットの作成や変更について IEBUPDTE メインフレーム・ユーティリティーをエミュレートします。

JCL 文

このセクションでは、MFJUPDTE ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、プログラム名の MFJUPDTE、あるいはそれのエイリアスである IEBUPDTE を指定する必要があります。その例を次に示します。

//STEPEXEC PGM=IEBUPDTE, ...

DD 文

次の DD 文は必須です。

• SYSUT1 - 入力データ・セット用
• SYSUT2 - 出力データ・セット用
• SYSIN - 制御データ・セット用
• SYSPRINT - 出力リスティング・データ・セット用

制御文

次の制御文は解析されますが、処理されません。

• ALIAS
• LABEL

関数文 (ADD、CHANGE、REPL、または REPRO) に対する次のサブオペランドは解析されますが、処理されません。

• INHDR
• INTLR
• LEVEL
• OUTDR
• OUTTLR
• SOURCE
• SSI
• TOTAL

ダミー・プログラム (MFJBR14)

MFJBR14 は、IEFBR14 メインフレーム・ユーティリティーをエミュレートします。このユーティリティーは、単に呼び出し元に戻ることによってダミー・プログラム機能を提供します。例えば、ジョブ・ステップで MFJBR14 を使用してデータ・セットを適時に削除することができます。また、MFJBR14 を使用して、ローカル・マシン上にバージョンがないプログラムを置き換えることもできるため、ジョブ・ステップに対するデータ・セットの割り当てとディスポジションを引き続きテストすることができます。

JCL 文

このセクションでは、MFJBR14 ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、プログラム名の MFJBR14、あるいはそれのエイリアスである IEFBR14 を指定する必要があります。その例を次に示します。

//STEPEXEC PGM=IEFBR14,......

バッチ・モードでの TSO コマンドの実行 (IDAEFT01)

IDAEFT01 は、IKJEFT01 メインフレーム・ユーティリティー・プログラムをエミュレートします。IDAEFT01 はバッチで TSO セッションを開始し、SYSTSIN DD 文によって定義されたデータ・セットに含まれている TSO コマンドをその TSO セッションが実行します。

SYSTSIN データ・セットには MSS がサポートしている TSO および DB2 コマンドをどれでも含めることができますが、通常は、バッチ・モードで DB2/TSO アプリケーションを実行する場合に IDAEFT01 を使用します。そのようなアプリケーションの最小限の入力は、次のとおりです。

DSN SYSTEM(system)
RUN PROGRAM(name) PARM(parm-string)
 ....
END

DB2 アプリケーションを実行する場合は、データベース・マネージャーの XA リソースを定義する必要があります。この操作は、ES Admin または ESMAC のいずれかで行うことができます。

操作方法...

JCL 文

このセクションでは、IDAEFT01 ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、プログラム名の IDAEFT01、あるいはそれのエイリアスである IKJEFT01 を指定する必要があります。その例を次に示します。

//STEPEXEC PGM=IKJEFT01,PARM='initial-command',.......

DD 文

次の DD 文は必須です。

• SYSTSIN - TSO コマンドが含まれている入力データ・セット用。これは、インストリーム・データ・セットにすることができます。

また、アプリケーション・プログラムによってアクセスされる順次および VSAM データ・セットに対する任意の DD 文を含めることもできます。

MVS バッチ・モードでの REXX Exec の実行 (MFIRXJCL)

MFIRXJCL は、IRXJCL メインフレーム・ユーティリティー・プログラムをエミュレートします。MFIRXJCL はバッチ・モードで MVS セッションを開始し、PARM パラメータで指定された REXX exec を実行します。MSS における REXX サポートの詳細については、REXX サポートの章を参照してください。

JCL 文

このセクションでは、MFIRXJCL ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、プログラム名の MFIRXJCL、またはそのエイリアスである IRXJCLを指定し、REXX exec の名前を PARM パラメータの最初のワードとして指定する必要があります。その例を次に示します。

//STEPEXEC PGM=IRXJCL,PARM='REXXEXEC'

DD 文

場合によっては、次の DD 文が必要になります。

• SYSTSIN - REXX exec への入力が含まれているデータ・セット用。これは、インストリーム・データ・セットにすることができます。
• SYSTSPRT - exec からの出力が含まれているデータ・セット用。
• SYSEXEC または SYSPROC - exec が PDS のメンバーである場合。

また、exec によってアクセスされるデータ・セットに対する DD 文もすべて含める必要があります。

テスト・データの生成 (MFJDG)

MFJDG は、テスト・データの作成について IEBDG メインフレーム・ユーティリティーをエミュレートします。

JCL 文

このセクションでは、MFJDG ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、プログラム名の MFJDG または IEBDG を指定する必要があります。その例を次に示します。

//STEPEXEC PGM=IEBDG, ...

exec 文の PARM はすべて無視されます。

DD 文

次の DD 文は必須です。

• anyname1 - オプションの入力データ・セット用
• anyname2 - 出力データ・セット用
• SYSIN - 制御データ・セット用
• SYSPRINT - 出力リスティング・データ・セット用

制御文

次のサブオペランドは解析されますが、処理されません。

• FD 文の場合：
  • ACTION
  • CHARACTER
  • CYCLE
  • FORMAT
  • FROMLOCK
  • INDEX
  • RANGE
  • SIGN
• CREATE 文の場合：
  • EXIT

Micro Focus ユーティリティー

このセクションでは、Micro Focus ユーティリティーの MFJMATCH について説明します。

データ・セットの比較 (MFJMATCH)

MFJMATCH ユーティリティーは、2 つの MVS データ・セットを比較します。このユーティリティーでは、ユーザーの COBOL 開発システム によってサポートされる任意のレコード・フォーマット、レコード長、またはデータ・セット編成が許容されます。データ・セットが一致した場合、MFJMATCH ユーティリティーは 0 の戻りコードで終了します。2 つのデータ・セットが一致しない場合、MFJMATCH ユーティリティーは、最初の不一致を検出すると、異なる 2 つのレコードを第 3 のデータ・セットに書き込んでから (異なるカラムの下にアスタリスクが付く)、12 の戻りコードで終了します。最初の不一致の後に続くレコードは比較されません。

JCL 文

このセクションでは、MFJMATCH ユーティリティーで使用される JCL 文について説明します。

EXEC 文

EXEC 文では、プログラム名の MFJMATCH を指定する必要があります。その例を次に示します。

//STEPEXEC PGM=MFJMATCH

DD 文

次の DD 文は必須です。

• SYSUT1 - 比較される最初のデータ・セット用。
• SYSUT2 - 比較される 2 番目のデータ・セット用。
• SYSIN - プログラム制御文が含まれているデータ・セット用。これは、インストリーム・データ・セットにすることができます。
• SYSUT3 - 結果が書き込まれるファイル用。これは、SYSUT1 と同じ DCB パラメータも持っている必要があります。

プログラム制御文

MFJMATCH によってサポートされるプログラム制御文を次に示します。プログラム制御文では、特定のレコード範囲とレコードの一部に照合を限定する検索条件が定義されます。

例

次の例では、

• キー・フィールドは、レコードの最初の 10 バイトとして定義されます。
• AAAAAAAAAA～BBBBBBBBBB および WWWWWWWWW～ZZZZZZZZZZ の範囲内にあるレコードが比較されます。
• 2 番目の範囲では、11～15 および 21～25 の位置が無視されます。

//SYSIN DD *
 KEY=(1,10)
 INCLUDE FROMKEY='AAAAAAAAAA' TOKEY='BBBBBBBBBB'
 INCLUDE FROMKEY='WWWWWWWWWW' TOKEY='YYYYYYYYYY'
 FD=(11,5)
 FD=(21,5)

独自のユーティリティー・プログラムの記述

場合によっては、独自のユーティリティー・プログラムを記述したり、他のソフトウェア・ベンダーからユーティリティー・プログラムを入手したりする必要があります。これらのプログラムが TSO コマンドまたは JCL 文によって呼び出されると、MSS は標準 MVS パラメータ領域をこれらのプログラムに渡します。

COBOL プログラムの場合、パラメータ領域には次の定義があります。

01 PARM.
      03 PARM-LENGTH         PIC 9(4)COMP.
      03 PARM-DATA.
         05 PARM-DATA-ARRAY  PIC X OCCURS 100.

PARM-DATA には、TSO コマンドまたは JCL 文のパラメータ・フィールドで指定されたデータが含まれます。MSS は、そのデータをシステムに対して定義されたデフォルトのデータ表現 (ANSI または EBCDIC) に変換します。ユーティリティー・プログラムでは、パラメータ・データを検査してそのデータ表現を確認し、必要に応じてプログラムで使用される表現に変換する必要があります。