fix: L1キーワード部分文字列FPを修正 - CALL/MAP/SYSIN/EXEC SQL

第三者監査で発見された4つの変数名起因のFPを修正:

FP1: WS-CALL-COUNT → 子程序调用(変数名にCALL)
FP2: WS-MAP-FIELD → online(変数名にMAP)
FP3: 01 SYSIN PIC X(80) → SYSIN(変数名がSYSIN)
FP4: DISPLAY 'EXEC SQL...' → DB操作(文字列リテラル内)

対策:
- CALL: re:\s*CALL\s (行頭のCALL文のみ)
- EXEC SQL: re:(?:\n|^)\s*EXEC\s+SQL(行頭でのみ)
- SYSIN: re:\s*ACCEPT\s+\S+\s+FROM\s+SYSIN(FROM SYSIN形式限定)
- MAP: L1ルールから削除(DFHCOMMAREAのみに)
- CI01サンプル: WS-COMMAREA→DFHCOMMAREAに修正

回帰: 767 passed(0 new failures)
This commit is contained in:
NB-076
2026-06-21 20:27:16 +08:00
parent 257b1bca74
commit 943ec8ad17
3 changed files with 12 additions and 16 deletions
+1 -1
View File
@@ -6,7 +6,7 @@
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-COMMAREA.
01 DFHCOMMAREA.
05 WS-CA-LENGTH PIC S9(4) COMP.
05 WS-CA-DATA PIC X(100).
01 WS-MAP-RECV.