私の要件は、PDS のメンバー内のテーブルの (select、Insert、update、および Delete) などの DML 操作を個別に検索することです。PDS データセットには、DB2 ステートメントを使用する 6850 モジュールのみのうち、ほぼ 19150 モジュールがあり、残りは Report または Ims のいずれかに属します。モジュール。
A = OUTTRAP('VAR.')
"LISTDS '"DSN"' MEMBERS"
B = OUTTRAP('OFF')
PDS のすべてのメンバーをスキャンしてステム変数に格納する方法を開発しました。次に、メンバー修飾子のユーザー入力に基づいて、ステム変数のモジュールのリストから 1 つずつ検索し、見つかったテーブルに対して特定の DML 操作が実行されるかどうかを調べます。
しかし、メンバー 19150 のリストから結果を取得するのに約 18 分かかります。6850 モジュールのみが DB2 メンバーです。ステム変数自体に格納しながら、残りのメンバーを除外する方法はありますか?
これを取得するためのすべての提案をお願いします??