AS/400 新会議室

こちらからの投稿は、先頭に表示されているコメントへの返信になります。

CLからRPGをコールする際にライブラリを動的に指定する方法まろにーさん [ 12月9日(水) 15時39分 ]

いつも勉強させていただいております。
ふと疑問に思いましたので投稿させて頂きます。

CLからRPGをコールする際に「CALL　PGM(ライブラリ/RPG名)」と指定しますが
その際のライブラリのところを動的に指定する方法はありますでしょうか？

現在、会社ごとにライブラリーを分けて管理して
それぞれのライブラリの中に同じ名前のCLやRPGやPFやDSPFがある状態になり
ます。

　会社A　ALIB
　会社B　BLIB
　会社C　CLIB

今までは会社ごとにCL側に変数の値にそれぞれのライブラリを指定していたの
ですが、
この方法だと会社が増えれば増えるほど手間が増えるので
動的にコールするCLを１つ用意してそれをそれぞれのライブラリに置くという
方法が出来ればと思っています。

表記の方法や、またはそれに代わる何か良い方法があれば
教えて下さい。

RE:CLからRPGをコールする際にライブラリを動的に指定する方法まろにーさん [ 12月9日(水) 15時44分 ]

＜追記＞
CLでの方法と記載しましたが、RPGでユーザープロフィールのIDを取得する方
法があれば
それでも実行したいことが行えますので、もしRPGから実行中のユーザープロ
フィールIDを
取得する方法があれば、教えて下さい。。。

※RPGでユーザープロフィールIDを取得する方法がわからず、CLからはわかったため
　CLで作成しました。しかし今度はCLでライブラリを指定する方法がわからな
いという
　状況で困っている状態です。。。

RE:CLからRPGをコールする際にライブラリを動的に指定する方法ＩＫＤさん [ 12月9日(水) 18時3分 ]

RPG　ソースに入力仕様書にプログラム情報として
下記のように　SDS　を定義すれば
254　-　263桁目にユーザー名が入ります。
こういうことを希望されているのでしょうか　?

　　　　IINFDSP　　　　　SDS　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I*　ﾌﾟﾛｸﾞﾗﾑ　名　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　1　　10　PGM　　　　
　　　　I*　状況コード　(　*STATUS　)　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　11　　150STATUS　
　　　　I*　以前の状況コード　(　*STATUS　)　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　16　　200BEFSTS　
　　　　I*　原始ステートメント　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　21　　28　STMNO　　
　　　　I*　例外エラーのルーチン　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　29　　36　ROUTIN　
　　　　I*　受取パラメータの数　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　37　　390PARMS　　
　　　　I*　CPF　メッセージ番号　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　43　　46　CPFID　　
　　　　I*　ｵﾌﾞｼﾞｪｸﾄ･ﾗｲﾌﾞﾗﾘｰ　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　81　　90　OBJLIB　
　　　　I*　最後に使用した　ﾌｧｲﾙ　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　201　208　LSTFIL　
　　　　I*　ｼﾞｮﾌﾞ　名　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　244　253　JOB　　　　
　　　　I*　ﾕｰｻﾞｰ　名　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　254　263　USER　　　
　　　　I*　ｼﾞｮﾌﾞ　番号　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　264　269　JOBNBR　
　　　　I*　原始ファイル　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　304　313　SRCFIL　
　　　　I*　原始　ﾗｲﾌﾞﾗﾘｰ　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　314　323　SRCLIB　
　　　　I*　原始　ﾒﾝﾊﾞｰ　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
　　　　I　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　324　333　SRCMBR　

RE:CLからRPGをコールする際にライブラリを動的に指定する方法まろにーさん [ 12月10日(木) 10時15分 ]

>254　-　263桁目にユーザー名が入ります。
>こういうことを希望されているのでしょうか　?

はい！ありがとうございます！
これが知りたかった情報です！

SDSを使えばRPGからユーザープロフィールなど様々な情報が取得出来るんですね。
大変勉強になりました。活用させていただきます。
ありがとうございました。

お名前
パスワード
メールアドレス
タイトル
ホームページ
アドレス
項目