다양화 Wave2: dbio 289 + common 120 고유화 + 프로그램 206개 EXEC SQL 심화

- dbio io(289): fetch/touch/total 시그니처 유지, SQL 바디를 JOIN/집계/커서/
  upsert/DELETE 등 구조로 고유화 → 289/289 고유
- common cu(120): 유틸 시그니처 유지, Luhn/CRC/Zeller/BIN레인지/amortization/
  netting 등 실 알고리즘으로 고유화 → 120/120 고유
- 심화: 실제 EXEC SQL 없던 프로그램에 SELECT/INSERT/UPDATE/커서+tx 추가
  → online+batch 530/530 전부 실제 SQL 보유
- 전 코퍼스 프로그램 939/939 고유, 전체 docker make -j4 = EXIT 0, 958 오브젝트
- 임시 생성기 제거, inventory.json loc 실측 갱신

Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>
This commit is contained in:
forge-bot 2026-07-19 04:54:59 +00:00
parent c3a0259e95
commit 93c3cb74af
1111 changed files with 31539 additions and 17258 deletions

View file

@ -52,8 +52,7 @@ TX_SERVICE(MM_OL_0019, ctx)
date_today(h_chg_date);
/* 1) 신규 등급코드 유효성(사용중 'Y') 확인 */
EXEC SQL
SELECT COUNT(*) INTO :h_valid
EXEC SQL SELECT COUNT(*) INTO :h_valid
FROM mm_grade_code
WHERE grade = :h_new_grade
AND use_yn = 'Y';
@ -72,8 +71,7 @@ TX_SERVICE(MM_OL_0019, ctx)
}
/* 2) 현재 등급 조회(이력용 이전값 확보) */
EXEC SQL
SELECT grade INTO :h_old_grade
EXEC SQL SELECT grade INTO :h_old_grade
FROM mm_merchant
WHERE merch_id = :h_merch_id;
@ -102,8 +100,7 @@ TX_SERVICE(MM_OL_0019, ctx)
if (tx_begin() != TX_OK)
tx_log(TX_LOG_WARN, "[MM_OL_0019] tx_begin 경고");
EXEC SQL
UPDATE mm_merchant
EXEC SQL UPDATE mm_merchant
SET grade = :h_new_grade,
upd_date = :h_chg_date
WHERE merch_id = :h_merch_id;
@ -116,8 +113,7 @@ TX_SERVICE(MM_OL_0019, ctx)
return;
}
EXEC SQL
INSERT INTO mm_grade_hist
EXEC SQL INSERT INTO mm_grade_hist
(merch_id, old_grade, new_grade, chg_date, oper)
VALUES (:h_merch_id, :h_old_grade, :h_new_grade, :h_chg_date, :h_oper);