feat: acquire-core full legacy C corpus (~2066 files, build-verified) + generator + inventory

2026-07-18 11:24:15 +00:00 · 2026-07-18 11:24:15 +00:00 · b96cf702ee
commit b96cf702ee
2897 changed files with 264970 additions and 0 deletions
--- a/app/online/ac_ol_0028.pgc
+++ b/app/online/ac_ol_0028.pgc
@ -0,0 +1,98 @@
+/* @tier hard @module ac @transform acquire-online */
+/*
+ * ac_ol_0028.pgc - 매입 온라인 서비스 (AC_OL_0028)  [tier=hard]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 ac 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "ac_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AC_OL_0028, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16], nextbiz[9];
+    long amount = 0, daysum = 0;
+    int  rc;
+    TXBUF *sub_in;
+    TXBUF *sub_out;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0028] 매입 트랜잭션 오케스트레이션 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK ||
+        tx_buf_get(ctx->in, "MERCHID", merch, sizeof(merch)) != TX_OK ||
+        tx_buf_get(ctx->in, "BIZDATE", bizdate, sizeof(bizdate)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0028] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    if (!amount_is_valid(amount) || !date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0028] 입력 검증 실패 amount=%ld date=%s",
+               amount, bizdate);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    /* 트랜잭션 시작 → 원장 반영 → 후속 서비스 연계 → 커밋 */
+    if (tx_begin() != TX_OK) {
+        tx_return(ctx, TX_FAIL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    strncpy(rec.key, key, sizeof(rec.key) - 1);
+    strncpy(rec.merch_id, merch, sizeof(rec.merch_id) - 1);
+    strncpy(rec.biz_date, bizdate, sizeof(rec.biz_date) - 1);
+    strncpy(rec.status, AC_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0028] 원장반영 실패 rc=%d", rc);
+        tx_abort();
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    /* 정산 영업일 = 거래일의 다음 영업일 */
+    if (date_next_business(bizdate, nextbiz) != 0) {
+        memcpy(nextbiz, bizdate, 8);
+        nextbiz[8] = '\0';
+    }
+
+    /* 후속 정산집계 서비스 연계 (레지스트리 문자열 디스패치) */
+    sub_in  = tx_buf_alloc();
+    sub_out = tx_buf_alloc();
+    if (sub_in && sub_out) {
+        tx_buf_sets(sub_in, "MERCHID", merch);
+        tx_buf_sets(sub_in, "BIZDATE", nextbiz);
+        tx_buf_setlong(sub_in, "AMOUNT", amount);
+        rc = tx_call("AC_POST", sub_in, sub_out);
+        if (rc != TX_OK)
+            tx_log(TX_LOG_WARN, "[AC_OL_0028] 후속연계 경고 rc=%d", rc);
+    }
+    tx_buf_free(sub_in);
+    tx_buf_free(sub_out);
+
+    /* 교차 검증: 당일 합계 재계산 */
+    if (ac_rec_sum(bizdate, &daysum) != TX_OK)
+        daysum = 0;
+
+    tx_commit();
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "RESPCODE", RESP_OK);
+    tx_buf_sets(ctx->out, "KEY", key);
+    tx_buf_setlong(ctx->out, "DAYSUM", daysum);
+    tx_log(TX_LOG_INFO, "[AC_OL_0028] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}