高橋CTOのSystemiテクニカル講座

最近は、ＰＣ側からクライント(iSeries) Accessのデータ転送やODBC,JDBC,OLE DBを使用したos400のＤＢとのやりとりも多いと思います。
以上の処理は、事前開始JOBのQZDASOINITで処理されます。
QZDASOINITが開始する時には、様々な処理が発生するので、システム負荷が高くなりパフォーマンスにも影響を与える様です。
そこで、今回はパフォーマンスチューニングをお伝えします。

１．ピーク時の稼動ジョブ数を調べる

DSPACTPJ SBS(QUSRWRK) PGM(QZDASOINIT)

２.現在の初期ジョブ数を調べる

DSPSBSD QUSRWRK

３．初期ジョブ数を変更する

CHGPJE SBSD(QUSRWRK) PGM(QZDASOINIT) INLJOBS(25)

４．実行後、２の手順で変更内容を確認する。

５．ＩＰＬ後にWRKACTJOBで確認

一見、立ち上がってないようですが、F14キー押下で

状態がPSRW(ジョブの初期スレッドは，プログラム開始要求を待って いる事前開始ジョブ)で立ち上がってます。

IFS(統合ファイルシステム）上のあるディレクトリーのオブジェクトに対してＣＬで一括でなにか処理(RMVLNKやCRTJVAPGM….)を行い
たい場合は、IFS上のオブジェクトを取得する必要がありますね。
IFS上のオブジェクト情報がファイルへ出力できれば、CLでDCLFで定義しRCVFでファイルを読込む事ができるので、一括で処理する事が可能です。

DSPLNKでは画面又はスプールへの出力がありますが、残念ながらファイルへの出力がありません。
(APIを使用すれば、可能なのでしょうが・・・)

V5R3からですが、RTVDIRINFコマンドが用意されています。
RTVDIRINFを実行すると、指定したライブラリー（デフォルトではQUSRSYS)
に２つのファイルが作成されます。

1.QAEZDXXXXO
2.QAEZDXXXXD
XXXXの部分は連番になります。

1のファイルはオブジェクト情報で、2のファイルはディレクトリー情報になります。
オブジェクトがどこのディレクトリーにあるかを確認するには２つのファイルをdirectory indexで結合すれば把握できます。

また、ファイルの出力先ライブラリーですが、QTEMPを指定する事はできません。# 不要になったら削除しましょう。

実は、RTVDIRINFと一緒にPRTDIRINFコマンドが用意されています。
これはRTVDIRINFコマンドで作成されたファイルを元に、ディレクトリー情報を印刷するものです。
RTVDIRINFコマンドの本来の正しい使い方は、RTVDIRINFで情報を取得し、PRTDIRINFで情報を印刷なのでしょうが、
作成されるファイルをうまく利用すれば色々できますね。