[掲示板に戻る] 全部  1-  最新50

1	SULのメンバー一覧
	あゆりーな 2005-6-14 12:32  [返信] [編集] たびたびすみません。 最近は小細工も覚えてきて、SULのメンバを#NFCNVでテキストに出力することもできるようになりました。 たとえばAAA BBB CCCという3プログラムがあったら プログラム一覧をソースコードに貼り付けると、自動的にSUFを経由してAAA.TXT?CCC.TXTまで作るようにするというものです。 でも本当は、SULの中に何が入っているかを取得できれば もっと簡単にできるはずなのです。 SULの中身一括コンパイルとかもできるようになるはず。 そう思って調べてみたのですが、 ファイルの属性はSYS@FDFで確認できても SULのメンバを知る方法が分かりませんでした。 どなたかご存知ではないでしょうか。
2	Re:SULのメンバー一覧
	うどん 2005-6-14 19:16  [返信] [編集] いつもＲＯＭばっかりなので、たまには恩返しを．． そちらの環境で動くかどうは解りませんが、参考までに。 １．メンバをスプール（ファイル）出力する。 　　#ABCでディレクトリの印刷をシステムスプールに出力する。 　　この時、実行結果リスト(PRD=)にSPOOLと指定する。　　 　　※この時スプールライタが起動していると、紙が出てしまうので 　　スプールライタは止めておく。 ２．出来たファイルの確認 　MSD000にSYS@SPxxxx(xxxxは数値です)というファイルが作成 　　されます。そのファイルの内容を見ると、位置はバラバラですが、 　　メンバ一覧があります。規則性がありますので、プログラムを\r 　　作成すればメンバ等を拾えます。ちなみに44(16進)という値で 　　改行して、数バイト先からメンバ名、リビジョン、登録日、 　　更新日と入っている様です。 　うちでは、朝一番のバッチ処理で、昨日修正，新規，削除になった 　プログラムがどれだけ有ったかというリストを出しています。
3	Re:SULのメンバー一覧
	BLUELION 2005-6-14 23:07  [返信] [編集] 私も使ったことはありませんが 確か待機結合編成のファイルを操作するサブルーチンがあるとこのサイトで過去に読んだ記憶があります。 実際、ほかのメーカーのオフコンなら標準機能です なぜ非公開なんでしょうね？ 東芝なんてメンバーをシーケンシャルファイルとしてＲＥＡＤ＆ＷＲＩＴＥできるんでとっても便利でした
4	Re:SULのメンバー一覧
	温泉好きのうさぎ 2005-6-15 11:38  [返信] [編集] NECおよび関係会社の開発部門向けに、「SUL/PML/JSL入出力サブルーチン」というものが提供されています。 通常のユーザーマシンには 99%無いとは思いますが、万一、そちらのA-VXのSYS@CUL等の中に 「CBL@XL」というメンバが有れば、COBOLのプログラムを組むことによって、SULやPML、JSLのディレクトリ情報を取得することができます。（CUL、LMLは不可） CALL ”QLOPEN” USING 〜 や、CALL ”QLSFGET” USING 〜 といった命令によって行います。 もちろん、ディレクトリ情報の取得だけではなく、他にもいろいろな命令があり、個々のメンバに対する読み込みや書き出し、ヘッダ情報の変更などもできます。 残念ながら、このサブルーチンの入手方法は不明です。
5	Re:SULのメンバー一覧
	0e0e 2005-6-15 16:20  [返信] [編集] SYS@SPnnnn => #ABC 複写 => SEQファイル このとき　オプション機能　出力形式で 01.FIXEDを選択すると 固定位置でデータ化できます。 それ知るまではうどんさんと同じやりかた？（かな）でプログラム 組んでやってました。(^^; 今毎日うごいているのは、CALL ”QL*GET”使っています。 3100の頃にRPQ入手したものですが、A-VXIVでも動いているようです。
6	ありがとうございました
	あゆりーな 2005-6-17 20:11  [返信] [編集] 皆様ありがとうございました。 画面を範囲選択してコピーしたり、 スプールを出力して一覧を作ったり、 ということはやっていたのですが どうしても手作業が多いのが気になっていました。 （でもありがとうございました、うどんさん、0e0eさん） 早速NECに問い合わせてみたところ、 RPQに書くようにとフォーマットをくれました。 あとは安いことを祈るのみです（無料だといいな…）。 しかし便利なものを隠し持っているのですね。 もっと公開してくれればいいのに。
7	もらえました！
	あゆりーな 2005-7-15 18:38  [返信] [編集] 先日は皆様に回答いただき大変助かりました。 あれからＮＥＣにＲＰＱを出したところ、 無償で提供してもらえました。 いただいたのはサブルーチンが２つと説明書です。 　CBL@XL（QL編成　SUL JCL PML CUL用） 　CBL@XM（QP編成　LML用） こんないいものがあるなら 最初から配布してくれればいいのに… 他にも隠し持っているものがあるかも？？？ 早速これからテストしてみます！

[掲示板に戻る] 全部 次100 最新50