다양화 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

@ -64,8 +64,7 @@ TX_SERVICE(MM_OL_0028, ctx)
date_today(h_chg_date);
/* 현재 대표자(이력 참고용) 조회 겸 존재 확인 */
EXEC SQL
SELECT owner_nm INTO :h_old_owner
EXEC SQL SELECT owner_nm INTO :h_old_owner
FROM mm_merchant
WHERE merch_id = :h_merch_id;
@ -85,8 +84,7 @@ TX_SERVICE(MM_OL_0028, ctx)
if (tx_begin() != TX_OK)
tx_log(TX_LOG_WARN, "[MM_OL_0028] tx_begin 경고");
EXEC SQL
UPDATE mm_merchant
EXEC SQL UPDATE mm_merchant
SET owner_nm = :h_owner_nm,
owner_birth = :h_owner_birth,
upd_date = :h_chg_date
@ -100,8 +98,7 @@ TX_SERVICE(MM_OL_0028, ctx)
return;
}
EXEC SQL
INSERT INTO mm_merchant_hist (merch_id, chg_type, chg_date, chg_status)
EXEC SQL INSERT INTO mm_merchant_hist (merch_id, chg_type, chg_date, chg_status)
VALUES (:h_merch_id, 'U', :h_chg_date, 'M');
if (sqlca.sqlcode != TX_SQL_OK) {