- ベストアンサー
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 値を照合しデータを分けるプログラムのようなのですが、イマイチ理解できません、何方か教えていただけませんか?
- みんなの回答 (3)
- 専門家の回答
質問者が選んだベストアンサー
EZTPA00は以下のユーティリティソフト easytrieve plus でしょう。 http://www.ca.com/products/product.aspx?ID=1270 そして、(2)はその制御文です。 はるか昔、plusのないのを扱ったことはありますが、 もうさすがに忘れました。まあ文をそのまま読めば良さそうですが。 FILE IN00001 入力ファイルの定義 たぶんIN00001はDD文にあるはず FILE IN00002 X1 1 16 A フィールドの定義 1バイト目から16バイト 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は余ってるような
その他の回答 (2)
- chukenkenkou
- ベストアンサー率43% (833/1926)
#1回答者です。 IBMはメインフレーム系のマニュアルも、オンラインマニュアルとして参照可能になっているようですね。 JCL関連のマニュアルもありました。 http://www.elink.ibmlink.ibm.com/puc/jsp/index.jsp;jsessionid=0005Q8PWoc3I-2aUNvpM2NkBKEv:T8PVSCSM2:54OJUE8V3?page=Search&activelink=search また、驚いたことに、WikipediaにもJCLやOS系ユーティリティー一覧まで記載されていました。 http://ja.wikipedia.org/wiki/JCL http://ja.wikipedia.org/wiki/IBM_%E3%83%A1%E3%82%A4%E3%83%B3%E3%83%95%E3%83%AC%E3%83%BC%E3%83%A0_%E3%83%A6%E3%83%BC%E3%83%86%E3%82%A3%E3%83%AA%E3%83%86%E3%82%A3%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0 (1)のEZTPA00、ISRSUPCについては、マニュアルを参照するなり、「IBM ISRSUPC」といったキーワードで検索すれば、英文の記事なども見れるようですよ? (2)はJCLの一部ではないのでは?なんらかのユーティリティー(?)の制御文(入力パラメタ)のように感じられますが?
- chukenkenkou
- ベストアンサー率43% (833/1926)
このサイトの利用方法について、少し誤解していませんか? これはIBM系のメインフレームのJCLですが、IBMに加え、富士通や日立といったIBM互換のOSでも似通った記述をします。その範囲の質問なら、IBMの社外秘といったことではないので、まだいいかも知れません。 しかし、EZTPA00やISRSUPCは、IBM固有のOS系(?)のユティリティのプログラムです。その仕様や入出力の内容は、ここで聞くべき話ではなく、IBMのマニュアル類で調べるべき問題です。
補足
ご返答ありがとうございます、 >X1 1 16 A フィールドの定義 1バイト目から16バイト この部分のフィールドの定義というのは、16バイト目まで値を取る、と言うことなのでしょうか? >JOB INPUT( IN00001(X1) IN00002(Z1) ) >ふたつのファイルを読んでマッチングする指示 この部分のマッチングというのがイマイチ意味がわからないんです、、、もう少し教えていただけないでしょうか?