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

app/online/st_ol_0003.pgc

@@ -3,12 +3,14 @@
  * st_ol_0003.pgc - 가맹점 할인수수료(MDR) 계산 (ST_OL_0003)  [tier=easy]
  *
  * 가맹점 거래금액에 MDR(가맹점 할인수수료) 요율(만분율)을 적용하여
- * 수수료와 정산순액(net)을 원단위 반올림으로 산출한다.
+ * 수수료와 정산순액(net)을 원단위 반올림으로 산출한다. 요율 미입력 시
+ * 가맹점 수수료율 마스터(st_fee_rate)에서 계약 요율을 조회한다.
  */
 #include <stdio.h>
 #include <string.h>
 
 #include "txcore.h"
+#include "txcore_dbio.h"
 #include "acq_util.h"
 #include "st_core.h"
 
@@ -25,8 +27,14 @@ static long st_fee_round(long amount, long rate_bp)
 
 TX_SERVICE(ST_OL_0003, ctx)
 {
+    EXEC SQL BEGIN DECLARE SECTION;
+    char h_merch[16];
+    long h_mdr_bp;
+    EXEC SQL END DECLARE SECTION;
+
     char merch[16];
     long amount = 0, mdr_bp = 0, fee, net;
+    const char *rate_src = "INPUT";
 
     tx_log(TX_LOG_INFO, "[ST_OL_0003] MDR 수수료 계산 진입");
 
@@ -37,6 +45,29 @@ TX_SERVICE(ST_OL_0003, ctx)
     tx_buf_getlong(ctx->in, "AMOUNT", &amount);
     tx_buf_getlong(ctx->in, "MDRBP",  &mdr_bp);
 
+    /* 요율 미입력 시 가맹점 계약요율 조회 */
+    if (mdr_bp <= 0) {
+        strncpy(h_merch, merch, sizeof(h_merch) - 1);
+        h_merch[sizeof(h_merch) - 1] = '\0';
+        h_mdr_bp = 0;
+        EXEC SQL SELECT mdr_bp
+            INTO :h_mdr_bp
+            FROM st_fee_rate
+            WHERE merch_id = :h_merch
+              AND fee_type = 'MDR';
+        if (sqlca.sqlcode == TX_SQL_OK) {
+            mdr_bp   = h_mdr_bp;
+            rate_src = "CONTRACT";
+        } else if (sqlca.sqlcode == TX_SQL_NOTFOUND) {
+            mdr_bp   = 180;             /* 기본 표준요율 1.80% */
+            rate_src = "DEFAULT";
+        } else {
+            TX_DBIO_LOG_ERR("SELECT st_fee_rate");
+            tx_return(ctx, TX_EDB, ctx->out);
+            return;
+        }
+    }
+
     if (!amount_is_valid(amount) || mdr_bp <= 0 || mdr_bp > 10000) {
         tx_log(TX_LOG_WARN, "[ST_OL_0003] 요율/금액 오류 amount=%ld bp=%ld", amount, mdr_bp);
         tx_buf_reset(ctx->out);
@@ -51,11 +82,12 @@ TX_SERVICE(ST_OL_0003, ctx)
     tx_buf_reset(ctx->out);
     tx_buf_sets(ctx->out, "RESPCODE", RESP_OK);
     tx_buf_sets(ctx->out, "MERCHID", merch);
+    tx_buf_sets(ctx->out, "RATESRC", rate_src);
     tx_buf_setlong(ctx->out, "AMOUNT", amount);
     tx_buf_setlong(ctx->out, "MDRBP", mdr_bp);
     tx_buf_setlong(ctx->out, "FEE", fee);
     tx_buf_setlong(ctx->out, "NET", net);
-    tx_log(TX_LOG_INFO, "[ST_OL_0003] MDR 산출 amount=%ld bp=%ld fee=%ld net=%ld",
-           amount, mdr_bp, fee, net);
+    tx_log(TX_LOG_INFO, "[ST_OL_0003] MDR 산출 amount=%ld bp=%ld(%s) fee=%ld net=%ld",
+           amount, mdr_bp, rate_src, fee, net);
     tx_return(ctx, TX_OK, ctx->out);
 }