JCLの基本について教えてください

(1)JCLの基本をどなたか教えて頂けないでしょうか？わからない事だらけで困っています。

EXEC PGM=xxxxxxxx　　　　でのプログラム宣言なんですが、、、
　　　　　　　　　　　　　コピーはわかるんですが、、、、
　　　　・EZTPA00
　　　　・ISRSUPC の二つがわかりません。
わかる方いらっしゃいませんか？
----------------------------------------------------------------
(2)～宣言やファイルの場所の書き込み～
・
・
・
FILE IN00001
FILE IN00002
X1 1 16 A
Z1 1 16 A
FILE OUT00001
FILE OUT00002
JOB INPUT( IN00001(X1) IN00002(Z1) )
IF NOT MATCHED
IF IN000001
OUT00001 FROM IN00001
ELSE IF IN00002
OUT00002 FROM INO0OO2
EDD-IF
END-IF
END-IF
値を照合しデータを分けるプログラムのようなのですが、イマイチ理解できません、何方か教えていただけませんか？

No.3 ベストアンサー 回答者： fire-- 回答日時： 2007/04/24 17:18

EZTPA00は以下のユーティリティソフト easytrieve plus

でしょう。

http://www.ca.com/products/product.aspx?ID=1270

そして、(2)はその制御文です。

はるか昔、plusのないのを扱ったことはありますが、
もうさすがに忘れました。まあ文をそのまま読めば良さそうですが。

FILE IN00001　入力ファイルの定義　たぶんIN00001はDD文にあるはず
FILE IN00002
X1 1 16 A　フィールドの定義　１バイト目から１６バイト
Z1 1 16 A
FILE OUT00001
FILE OUT00002
JOB INPUT( IN00001(X1) IN00002(Z1) )
　　　　　ふたつのファイルを読んでマッチングする指示
IF NOT MATCHED　マッチングしない場合
　　IF IN000001　IN0001だけがある場合
　　　　　OUT00001 FROM IN00001　IN00001をOUT00001に出力
　　ELSE IF IN00002
　　　　　OUT00002 FROM INO0OO2
　　EDD-IF
END-IF
END-IF　　なんか、このEND-IFは余ってるような

この回答への補足

ご返答ありがとうございます、

＞X1 1 16 A　フィールドの定義　１バイト目から１６バイト
この部分のフィールドの定義というのは、１６バイト目まで値を取る、と言うことなのでしょうか？

＞JOB INPUT( IN00001(X1) IN00002(Z1) )
　　　　　＞ふたつのファイルを読んでマッチングする指示
この部分のマッチングというのがイマイチ意味がわからないんです、、、もう少し教えていただけないでしょうか？

補足日時：2007/04/24 19:32

No.2 回答者： chukenkenkou 回答日時： 2007/04/24 02:36

#1回答者です。

IBMはメインフレーム系のマニュアルも、オンラインマニュアルとして参照可能になっているようですね。
JCL関連のマニュアルもありました。

http://www.elink.ibmlink.ibm.com/puc/jsp/index.j …

また、驚いたことに、WikipediaにもJCLやOS系ユーティリティー一覧まで記載されていました。

http://ja.wikipedia.org/wiki/JCL
http://ja.wikipedia.org/wiki/IBM_%E3%83%A1%E3%82 …

(1)のEZTPA00、ISRSUPCについては、マニュアルを参照するなり、「IBM ISRSUPC」といったキーワードで検索すれば、英文の記事なども見れるようですよ？

(2)はJCLの一部ではないのでは？なんらかのユーティリティー（？）の制御文（入力パラメタ）のように感じられますが？

No.1 回答者： chukenkenkou 回答日時： 2007/04/23 22:48

このサイトの利用方法について、少し誤解していませんか？

これはIBM系のメインフレームのJCLですが、IBMに加え、富士通や日立といったIBM互換のOSでも似通った記述をします。その範囲の質問なら、IBMの社外秘といったことではないので、まだいいかも知れません。

しかし、EZTPA00やISRSUPCは、IBM固有のOS系（？）のユティリティのプログラムです。その仕様や入出力の内容は、ここで聞くべき話ではなく、IBMのマニュアル類で調べるべき問題です。