ACOS-4コミュのＪＣＬマクロについて

ＪＣＬ。（ＪｏｂＣｏｎｔｒｏｌＬａｎｇｕａｇｅ）

￥で始まるユーティリティー（￥ＣＲＥＡＴＥＳＥＱ等）は全てＪＣＬマクロです。

ＪＣＬマクロとは。

例えば、
\CREATESEQ
INFILE=(FILE1,PUBLIC,FILESTAT=TEMP),
OUTFILE=(FILE2,CATLGD);

と書くと、

\STEP STDCREATE FILE=(SYS.JCL.SLLIB) NOLIMIT;
\ASSIGN INF INFILE,FILE1,PUBLIC,FILESTAT=TEMP,SHARE=NO,NORMAL=DELETE);
\ASSIGN OUT OUTFILE,FILE2,CATLGD,SHARE=NO;
\ENDSTEP;

など（一部覚えてません）に変換される事は皆さんお解かりでしょうか？
これはＪＣＬマクロになっています。
実はＪＣＬには規定値で「SYS.JCL.MACLIB」というＪＣＬマクロライブラリが
暗黙で参照することになっています。

ユーザーによっては自身で作成したＪＣＬマクロを「SYS.JCL.MACLIB」に
登録して運用しているところもあり、当たり前のように\xxxxxという
マニュアルに載っていないユーティリティを使っている所もあります。

ユーザＪＣＬマクロライブラリを別に管理したい場合は「\RETRIEVE」文を
使い、１番目の引数にユーザＪＣＬマクロライブラリ名を、
２番目にSYS.JCL.MACLIBを登録する事でシステムマクロとユーザーマクロを
分けることが出来ます。

例（だったかな？マニュアル紛失）
\RETRIEVE MACLIB1=(USER.JCL.MACLIB,CATLGD),MACLIB2=(SYS.JCL.MACLIB,RESIDENT);

例えば、古い話ですが、XVP Ver1.0だったかな？

以降では磁気テープの\ASSIGN文にNOREWINDパラメータが追加になりました。
これはそのままの意で「巻き戻ししない」というパラメータですが、
セーブやロード時間の短縮に大いに役に立ちます。（CGMTでも有効）
但し、最後に使用したSTEPでもNOREWINDパラメータが必要でした。
（今は知りませんが）

そこで、MTがその位置で止まったままになり、UNLOADできないことがありました。
小生がサポートしていたユーザで同じメディア名のMTを複数使用する場面が
あり、折角セーブしたMTのデータを潰してしまったトラブルがありました。

このとき小生が作成したのが「\UNLOAD」マクロでした。
ＪＣＬの\JOBの後に\RETRIEVEにてユーザＪＣＬマクロライブラリを指定して
\UNLOAD MEDIA=xxxxxx;
と書くとそのメディアをUNLOADするユーザマクロでした。
内容は、
\STEP UNLOAD FILE=(USER.LM,CATLGD);
\ASSIGN INF,%MEDIA,UNLOAD;
\ENDSTEP;
のようなマクロです。
UNLOADはただINPUTオープンしてCLOSEするだけのLMです。
MEDIAパラメータは%だったか今は覚えていません。
（どなたかフォローして下さい）
それにより、トラブルはなくなりました。

皆さんはSYS.JCL.MACLIBかユーザーＪＣＬマクロライブラリ。
どちらを使って何が標準で何がユーザマクロか区別が付いていますか？

尚、SYS.JCL.MACLIBはカタログ化されていない筈なので中身は
ソースだった筈ですがNEDITでは直接見れません。
カタログ化すれば見れますが中身をいじると大変ですので止めましょう！
.