JIN03RAN 使用資源一覧
プログラム概要
- プログラムID: JIN03RAN
- プログラム名: スキル評価ランキング出力処理
- 処理概要: SKILL-AGG（JIN02SKL出力の集計結果）を読み込み、平均点降順でランキングを出力する（前提：R01はJCL SORTにより平均点降順ソート済み）
使用ファイル
| DD名 |
ファイル識別子 |
編成 |
レコード形式 |
レコード長 |
COPY句 |
| JIN03R01 |
SKILL-AGG |
SEQUENTIAL |
F (固定長) |
200B |
SKILL-AGG-REC |
| JIN03W01 |
RANK-OUT |
SEQUENTIAL |
F (固定長) |
200B |
JIN03REC |
使用COPY句
| COPY句 |
用途 |
使用箇所 |
| SKILL-AGG-REC |
スキル評価集計結果レコード定義（R01入力） |
FILE SECTION |
| JIN03REC |
ランキング出力レコード定義（W01出力） |
FILE SECTION |
| JINDATAC |
運用日付サブPGM連絡領域 |
WORKING-STORAGE |
| JINMSGAC |
メッセージ編集サブPGM連絡領域 |
WORKING-STORAGE |
使用サブプログラム
| サブPGM |
役割 |
CALL箇所 |
| SUB01DAT |
運用日付取得 |
1000ITTSOR |
| SUB02MSG |
メッセージ編集出力 |
1000ITTSOR |
使用DB2テーブル
なし（DB操作なし）
処理フロー
- 初期処理（開始メッセージ→運用日付取得→OPEN→R01初回読込）
- R01読込→ランキング出力ループ（平均点降順ソート済み入力に順位付与）
- 終了処理（CLOSE→プログラム終了表示）
