From 24d85e19fad660fa44ec4342329cf76020ca8b7a Mon Sep 17 00:00:00 2001 From: qiuqiuqiu Date: Wed, 22 Jul 2026 20:50:58 +0800 Subject: [PATCH] =?UTF-8?q?JIN03RAN-REC.cpy=20=E2=86=92=20JIN03REC.cpy=20?= =?UTF-8?q?=E3=81=AB=E7=B5=B1=E4=B8=80=EF=BC=88=E5=91=BD=E5=90=8D=E3=83=AB?= =?UTF-8?q?=E3=83=BC=E3=83=AB=E4=B8=80=E8=87=B4=EF=BC=89?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- cpy/{JIN03RAN-REC.cpy => JIN03REC.cpy} | 0 src/JIN03RAN.cbl | 2 +- 使用資源一覧/JIN03RAN_使用資源一覧.md | 4 ++-- 詳細設計書/詳細設計書_JIN03RAN.md | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) rename cpy/{JIN03RAN-REC.cpy => JIN03REC.cpy} (100%) diff --git a/cpy/JIN03RAN-REC.cpy b/cpy/JIN03REC.cpy similarity index 100% rename from cpy/JIN03RAN-REC.cpy rename to cpy/JIN03REC.cpy diff --git a/src/JIN03RAN.cbl b/src/JIN03RAN.cbl index 4862536..d191789 100644 --- a/src/JIN03RAN.cbl +++ b/src/JIN03RAN.cbl @@ -52,7 +52,7 @@ BLOCK CONTAINS 0 RECORDING MODE IS F. 01 W01OUTREC. - COPY JIN03RAN-REC REPLACING ==(A)== BY ==W01==. + COPY JIN03REC REPLACING ==(A)== BY ==W01==. * WORKING-STORAGE SECTION. * diff --git a/使用資源一覧/JIN03RAN_使用資源一覧.md b/使用資源一覧/JIN03RAN_使用資源一覧.md index 6622392..ace0368 100644 --- a/使用資源一覧/JIN03RAN_使用資源一覧.md +++ b/使用資源一覧/JIN03RAN_使用資源一覧.md @@ -10,14 +10,14 @@ | DD名 | ファイル識別子 | 編成 | レコード形式 | レコード長 | COPY句 | |------|---------------|------|-------------|-----------|--------| | JIN03R01 | SKILL-AGG | SEQUENTIAL | F (固定長) | 200B | SKILL-AGG-REC | -| JIN03W01 | RANK-OUT | SEQUENTIAL | F (固定長) | 200B | JIN03RAN-REC | +| JIN03W01 | RANK-OUT | SEQUENTIAL | F (固定長) | 200B | JIN03REC | ## 使用COPY句 | COPY句 | 用途 | 使用箇所 | |--------|------|---------| | SKILL-AGG-REC | スキル評価集計結果レコード定義（R01入力） | FILE SECTION | -| JIN03RAN-REC | ランキング出力レコード定義（W01出力） | FILE SECTION | +| JIN03REC | ランキング出力レコード定義（W01出力） | FILE SECTION | | JINDATAC | 運用日付サブPGM連絡領域 | WORKING-STORAGE | | JINMSGAC | メッセージ編集サブPGM連絡領域 | WORKING-STORAGE | | JINENDAC | ABENDサブPGM連絡領域 | WORKING-STORAGE | diff --git a/詳細設計書/詳細設計書_JIN03RAN.md b/詳細設計書/詳細設計書_JIN03RAN.md index dc8b7f2..dc26bdc 100644 --- a/詳細設計書/詳細設計書_JIN03RAN.md +++ b/詳細設計書/詳細設計書_JIN03RAN.md @@ -34,7 +34,7 @@ ### SKILL-AGG-REC（JIN03R01, 200B） JIN02SKL 詳細設計書の W01 定義と同じ（SKILL-AGG-REC.cpy 参照）。 -### JIN03RAN-REC（JIN03W01, 200B 新規COPY書式） +### JIN03REC（JIN03W01, 200B 新規COPY書式） | 項目 | PIC | 内容 | |:----|:---:|:-----|