Subsystem B: dead code cleanup (FILLER renames, CNS-MAX-HOURS/WRK-MONTH-OK removed), sync docs & coverage to production

This commit is contained in:
qiuqiuqiu
2026-06-24 23:04:48 +08:00
parent e0bcbbc1a9
commit 235de714ea
16 changed files with 1699 additions and 47 deletions
+4 -5
View File
@@ -14,7 +14,7 @@
| 8 | | またOVT-DBCLEANの各レコードについて、該当申請を取消状態に更新し、 |
| 9 | | OVT-MONTHLYから該当加班時間を減算する。 |
| 10 | | 新規カバレッジ:EXEC SQL(INSERT/UPDATE/SELECT)、COMMIT/ROLLBACK、 |
| 11 | | PERFORM VARYING/TEST AFTER、COBOL SUBTRACT/MULTIPLY |
| 11 | | PERFORM VARYING/TEST AFTER、COBOL MULTIPLY |
※PGMタイプ:メイン、サブ
※PGMパターン:マッチング(1:1、1:N、N:1、M:N)、レイアウト編集のみ(GETPUT)、振り分け(IF文、EVALUATE文)、キーブレイク(集計、集約、集計・集約の以外)、DB更新
@@ -142,7 +142,7 @@
WHERE APPL-ID = :WRK-SQL-APPL-ID
2-2-4.YEAR-MONTH抽出:APPL-DATE(1:6)
2-2-5.OVT-MONTHLYから減算(2210MONTHLYSUBSOR
【EXEC SQL UPDATE(減算)COBOL SUBTRACT検証
【EXEC SQL UPDATE(減算)】
UPDATE OVT-MONTHLY SET
OVT-HOURS = OVT-HOURS - :WRK-SQL-OVT-HOURS,
OVT-COUNT = OVT-COUNT - 1,
@@ -188,8 +188,7 @@
4-1.【EXEC SQL COMMIT】
COMMIT WORK
4-2.CUN-COMMITをZEROにリセット
4-3.CUN-ETHUSに1加算
5.終了処理(3000STPSOR
5-1.最終COMMIT2300COMMITDBX
5-2.入出力ファイルのクローズ
@@ -227,7 +226,7 @@
| 6 | PERFORM VARYING | 月(1-12)のバリデーションループ |
| 7 | PERFORM TEST AFTER VARYING | 月次減算のリトライ制御 |
| 8 | COBOL MULTIPLY | 加班時間→分変換 |
| 9 | COBOL SUBTRACT | 残加班容量検証 |
## 出力レコード定義