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

app/online/ac_ol_0001.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0001.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0001.pgc - 매입 온라인 서비스 (AC_OL_0001)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0001.pgc"
+
+
+TX_SERVICE(AC_OL_0001, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0001] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0001] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0001] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0001] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0001.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0001.pgc - 매입 온라인 서비스 (AC_OL_0001)  [tier=easy]
+ *
+ * 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_0001, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0001] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0001] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0001] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0001] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0002.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0002.pgc"
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0002.pgc - 매입 온라인 서비스 (AC_OL_0002)  [tier=medium]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0002.pgc"
+
+
+TX_SERVICE(AC_OL_0002, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0002] 매입 등록 서비스 진입");
+
+    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_0002] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0002] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0002] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0002] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0002] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0002.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0002.pgc - 매입 온라인 서비스 (AC_OL_0002)  [tier=medium]
+ *
+ * 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_0002, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0002] 매입 등록 서비스 진입");
+
+    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_0002] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0002] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0002] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0002] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0002] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0003.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0003.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0003.pgc - 매입 온라인 서비스 (AC_OL_0003)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0003.pgc"
+
+
+TX_SERVICE(AC_OL_0003, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0003] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0003] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0003] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0003] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0003.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0003.pgc - 매입 온라인 서비스 (AC_OL_0003)  [tier=easy]
+ *
+ * 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_0003, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0003] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0003] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0003] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0003] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0004.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0004.pgc"
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0004.pgc - 매입 온라인 서비스 (AC_OL_0004)  [tier=medium]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0004.pgc"
+
+
+TX_SERVICE(AC_OL_0004, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0004] 매입 등록 서비스 진입");
+
+    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_0004] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0004] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0004] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0004] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0004] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0004.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0004.pgc - 매입 온라인 서비스 (AC_OL_0004)  [tier=medium]
+ *
+ * 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_0004, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0004] 매입 등록 서비스 진입");
+
+    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_0004] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0004] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0004] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0004] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0004] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0005.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0005.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0005.pgc - 매입 온라인 서비스 (AC_OL_0005)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0005.pgc"
+
+
+TX_SERVICE(AC_OL_0005, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0005] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0005] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0005] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0005] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0005.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0005.pgc - 매입 온라인 서비스 (AC_OL_0005)  [tier=easy]
+ *
+ * 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_0005, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0005] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0005] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0005] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0005] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0006.c

@@ -0,0 +1,176 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0006.pgc"
+/* @tier hard @module ac @transform acquire-online */
+/*
+ * ac_ol_0006.pgc - 매입 온라인 서비스 (AC_OL_0006)  [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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0006.pgc"
+
+
+TX_SERVICE(AC_OL_0006, 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_0006] 매입 트랜잭션 오케스트레이션 진입");
+
+    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_0006] 필수 필드 누락");
+        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_0006] 입력 검증 실패 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_0006] 원장반영 실패 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_0006] 후속연계 경고 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_0006] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0006.pgc

@@ -0,0 +1,98 @@
+/* @tier hard @module ac @transform acquire-online */
+/*
+ * ac_ol_0006.pgc - 매입 온라인 서비스 (AC_OL_0006)  [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_0006, 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_0006] 매입 트랜잭션 오케스트레이션 진입");
+
+    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_0006] 필수 필드 누락");
+        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_0006] 입력 검증 실패 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_0006] 원장반영 실패 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_0006] 후속연계 경고 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_0006] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0007.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0007.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0007.pgc - 매입 온라인 서비스 (AC_OL_0007)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0007.pgc"
+
+
+TX_SERVICE(AC_OL_0007, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0007] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0007] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0007] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0007] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0007.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0007.pgc - 매입 온라인 서비스 (AC_OL_0007)  [tier=easy]
+ *
+ * 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_0007, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0007] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0007] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0007] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0007] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0008.c

@@ -0,0 +1,176 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0008.pgc"
+/* @tier hard @module ac @transform acquire-online */
+/*
+ * ac_ol_0008.pgc - 매입 온라인 서비스 (AC_OL_0008)  [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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0008.pgc"
+
+
+TX_SERVICE(AC_OL_0008, 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_0008] 매입 트랜잭션 오케스트레이션 진입");
+
+    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_0008] 필수 필드 누락");
+        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_0008] 입력 검증 실패 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_0008] 원장반영 실패 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_0008] 후속연계 경고 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_0008] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0008.pgc

@@ -0,0 +1,98 @@
+/* @tier hard @module ac @transform acquire-online */
+/*
+ * ac_ol_0008.pgc - 매입 온라인 서비스 (AC_OL_0008)  [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_0008, 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_0008] 매입 트랜잭션 오케스트레이션 진입");
+
+    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_0008] 필수 필드 누락");
+        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_0008] 입력 검증 실패 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_0008] 원장반영 실패 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_0008] 후속연계 경고 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_0008] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0009.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0009.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0009.pgc - 매입 온라인 서비스 (AC_OL_0009)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0009.pgc"
+
+
+TX_SERVICE(AC_OL_0009, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0009] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0009] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0009] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0009] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0009.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0009.pgc - 매입 온라인 서비스 (AC_OL_0009)  [tier=easy]
+ *
+ * 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_0009, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0009] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0009] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0009] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0009] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0010.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0010.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0010.pgc - 매입 온라인 서비스 (AC_OL_0010)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0010.pgc"
+
+
+TX_SERVICE(AC_OL_0010, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0010] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0010] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0010] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0010] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0010.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0010.pgc - 매입 온라인 서비스 (AC_OL_0010)  [tier=easy]
+ *
+ * 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_0010, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0010] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0010] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0010] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0010] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0011.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0011.pgc"
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0011.pgc - 매입 온라인 서비스 (AC_OL_0011)  [tier=medium]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0011.pgc"
+
+
+TX_SERVICE(AC_OL_0011, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0011] 매입 등록 서비스 진입");
+
+    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_0011] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0011] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0011] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0011] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0011] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0011.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0011.pgc - 매입 온라인 서비스 (AC_OL_0011)  [tier=medium]
+ *
+ * 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_0011, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0011] 매입 등록 서비스 진입");
+
+    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_0011] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0011] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0011] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0011] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0011] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0012.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0012.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0012.pgc - 매입 온라인 서비스 (AC_OL_0012)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0012.pgc"
+
+
+TX_SERVICE(AC_OL_0012, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0012] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0012] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0012] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0012] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0012.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0012.pgc - 매입 온라인 서비스 (AC_OL_0012)  [tier=easy]
+ *
+ * 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_0012, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0012] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0012] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0012] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0012] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0013.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0013.pgc"
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0013.pgc - 매입 온라인 서비스 (AC_OL_0013)  [tier=medium]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0013.pgc"
+
+
+TX_SERVICE(AC_OL_0013, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0013] 매입 등록 서비스 진입");
+
+    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_0013] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0013] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0013] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0013] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0013] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0013.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0013.pgc - 매입 온라인 서비스 (AC_OL_0013)  [tier=medium]
+ *
+ * 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_0013, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0013] 매입 등록 서비스 진입");
+
+    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_0013] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0013] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0013] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0013] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0013] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0014.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0014.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0014.pgc - 매입 온라인 서비스 (AC_OL_0014)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0014.pgc"
+
+
+TX_SERVICE(AC_OL_0014, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0014] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0014] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0014] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0014] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0014.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0014.pgc - 매입 온라인 서비스 (AC_OL_0014)  [tier=easy]
+ *
+ * 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_0014, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0014] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0014] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0014] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0014] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0015.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0015.pgc"
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0015.pgc - 매입 온라인 서비스 (AC_OL_0015)  [tier=medium]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0015.pgc"
+
+
+TX_SERVICE(AC_OL_0015, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0015] 매입 등록 서비스 진입");
+
+    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_0015] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0015] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0015] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0015] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0015] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0015.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0015.pgc - 매입 온라인 서비스 (AC_OL_0015)  [tier=medium]
+ *
+ * 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_0015, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0015] 매입 등록 서비스 진입");
+
+    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_0015] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0015] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0015] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0015] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0015] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0016.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0016.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0016.pgc - 매입 온라인 서비스 (AC_OL_0016)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0016.pgc"
+
+
+TX_SERVICE(AC_OL_0016, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0016] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0016] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0016] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0016] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0016.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0016.pgc - 매입 온라인 서비스 (AC_OL_0016)  [tier=easy]
+ *
+ * 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_0016, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0016] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0016] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0016] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0016] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0017.c

@@ -0,0 +1,176 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0017.pgc"
+/* @tier hard @module ac @transform acquire-online */
+/*
+ * ac_ol_0017.pgc - 매입 온라인 서비스 (AC_OL_0017)  [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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0017.pgc"
+
+
+TX_SERVICE(AC_OL_0017, 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_0017] 매입 트랜잭션 오케스트레이션 진입");
+
+    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_0017] 필수 필드 누락");
+        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_0017] 입력 검증 실패 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_0017] 원장반영 실패 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_0017] 후속연계 경고 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_0017] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0017.pgc

@@ -0,0 +1,98 @@
+/* @tier hard @module ac @transform acquire-online */
+/*
+ * ac_ol_0017.pgc - 매입 온라인 서비스 (AC_OL_0017)  [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_0017, 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_0017] 매입 트랜잭션 오케스트레이션 진입");
+
+    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_0017] 필수 필드 누락");
+        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_0017] 입력 검증 실패 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_0017] 원장반영 실패 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_0017] 후속연계 경고 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_0017] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0018.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0018.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0018.pgc - 매입 온라인 서비스 (AC_OL_0018)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0018.pgc"
+
+
+TX_SERVICE(AC_OL_0018, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0018] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0018] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0018] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0018] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0018.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0018.pgc - 매입 온라인 서비스 (AC_OL_0018)  [tier=easy]
+ *
+ * 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_0018, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0018] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0018] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0018] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0018] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0019.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0019.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0019.pgc - 매입 온라인 서비스 (AC_OL_0019)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0019.pgc"
+
+
+TX_SERVICE(AC_OL_0019, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0019] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0019] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0019] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0019] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0019.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0019.pgc - 매입 온라인 서비스 (AC_OL_0019)  [tier=easy]
+ *
+ * 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_0019, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0019] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0019] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0019] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0019] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0020.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0020.pgc"
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0020.pgc - 매입 온라인 서비스 (AC_OL_0020)  [tier=medium]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0020.pgc"
+
+
+TX_SERVICE(AC_OL_0020, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0020] 매입 등록 서비스 진입");
+
+    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_0020] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0020] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0020] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0020] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0020] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0020.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0020.pgc - 매입 온라인 서비스 (AC_OL_0020)  [tier=medium]
+ *
+ * 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_0020, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0020] 매입 등록 서비스 진입");
+
+    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_0020] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0020] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0020] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0020] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0020] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0021.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0021.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0021.pgc - 매입 온라인 서비스 (AC_OL_0021)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0021.pgc"
+
+
+TX_SERVICE(AC_OL_0021, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0021] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0021] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0021] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0021] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0021.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0021.pgc - 매입 온라인 서비스 (AC_OL_0021)  [tier=easy]
+ *
+ * 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_0021, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0021] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0021] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0021] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0021] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0022.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0022.pgc"
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0022.pgc - 매입 온라인 서비스 (AC_OL_0022)  [tier=medium]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0022.pgc"
+
+
+TX_SERVICE(AC_OL_0022, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0022] 매입 등록 서비스 진입");
+
+    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_0022] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0022] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0022] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0022] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0022] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0022.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0022.pgc - 매입 온라인 서비스 (AC_OL_0022)  [tier=medium]
+ *
+ * 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_0022, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0022] 매입 등록 서비스 진입");
+
+    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_0022] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0022] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0022] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0022] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0022] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0023.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0023.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0023.pgc - 매입 온라인 서비스 (AC_OL_0023)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0023.pgc"
+
+
+TX_SERVICE(AC_OL_0023, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0023] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0023] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0023] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0023] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0023.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0023.pgc - 매입 온라인 서비스 (AC_OL_0023)  [tier=easy]
+ *
+ * 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_0023, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0023] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0023] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0023] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0023] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0024.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0024.pgc"
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0024.pgc - 매입 온라인 서비스 (AC_OL_0024)  [tier=medium]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0024.pgc"
+
+
+TX_SERVICE(AC_OL_0024, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0024] 매입 등록 서비스 진입");
+
+    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_0024] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0024] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0024] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0024] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0024] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0024.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0024.pgc - 매입 온라인 서비스 (AC_OL_0024)  [tier=medium]
+ *
+ * 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_0024, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0024] 매입 등록 서비스 진입");
+
+    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_0024] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0024] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0024] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0024] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0024] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0025.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0025.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0025.pgc - 매입 온라인 서비스 (AC_OL_0025)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0025.pgc"
+
+
+TX_SERVICE(AC_OL_0025, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0025] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0025] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0025] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0025] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0025.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0025.pgc - 매입 온라인 서비스 (AC_OL_0025)  [tier=easy]
+ *
+ * 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_0025, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0025] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0025] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0025] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0025] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0026.c

@@ -0,0 +1,176 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0026.pgc"
+/* @tier hard @module ac @transform acquire-online */
+/*
+ * ac_ol_0026.pgc - 매입 온라인 서비스 (AC_OL_0026)  [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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0026.pgc"
+
+
+TX_SERVICE(AC_OL_0026, 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_0026] 매입 트랜잭션 오케스트레이션 진입");
+
+    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_0026] 필수 필드 누락");
+        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_0026] 입력 검증 실패 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_0026] 원장반영 실패 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_0026] 후속연계 경고 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_0026] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0026.pgc

@@ -0,0 +1,98 @@
+/* @tier hard @module ac @transform acquire-online */
+/*
+ * ac_ol_0026.pgc - 매입 온라인 서비스 (AC_OL_0026)  [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_0026, 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_0026] 매입 트랜잭션 오케스트레이션 진입");
+
+    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_0026] 필수 필드 누락");
+        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_0026] 입력 검증 실패 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_0026] 원장반영 실패 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_0026] 후속연계 경고 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_0026] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0027.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0027.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0027.pgc - 매입 온라인 서비스 (AC_OL_0027)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0027.pgc"
+
+
+TX_SERVICE(AC_OL_0027, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0027] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0027] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0027] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0027] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0027.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0027.pgc - 매입 온라인 서비스 (AC_OL_0027)  [tier=easy]
+ *
+ * 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_0027, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0027] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0027] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0027] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0027] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0028.c

@@ -0,0 +1,176 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0028.pgc"
+/* @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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0028.pgc"
+
+
+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);
+}

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);
+}

app/online/ac_ol_0029.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0029.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0029.pgc - 매입 온라인 서비스 (AC_OL_0029)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0029.pgc"
+
+
+TX_SERVICE(AC_OL_0029, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0029] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0029] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0029] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0029] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0029.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0029.pgc - 매입 온라인 서비스 (AC_OL_0029)  [tier=easy]
+ *
+ * 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_0029, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0029] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0029] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0029] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0029] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0030.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0030.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0030.pgc - 매입 온라인 서비스 (AC_OL_0030)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0030.pgc"
+
+
+TX_SERVICE(AC_OL_0030, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0030] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0030] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0030] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0030] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0030.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0030.pgc - 매입 온라인 서비스 (AC_OL_0030)  [tier=easy]
+ *
+ * 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_0030, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0030] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0030] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0030] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0030] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0031.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0031.pgc"
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0031.pgc - 매입 온라인 서비스 (AC_OL_0031)  [tier=medium]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0031.pgc"
+
+
+TX_SERVICE(AC_OL_0031, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0031] 매입 등록 서비스 진입");
+
+    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_0031] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0031] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0031] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0031] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0031] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0031.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module ac @transform acquire-online */
+/*
+ * ac_ol_0031.pgc - 매입 온라인 서비스 (AC_OL_0031)  [tier=medium]
+ *
+ * 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_0031, ctx)
+{
+    ac_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0031] 매입 등록 서비스 진입");
+
+    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_0031] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0031] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0031] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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;   /* 수수료 1% 가정 */
+
+    rc = ac_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0031] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = ac_rec_count(bizdate, AC_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AC_OL_0031] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0032.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/ac_ol_0032.pgc"
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0032.pgc - 매입 온라인 서비스 (AC_OL_0032)  [tier=easy]
+ *
+ * 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"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/ac_ol_0032.pgc"
+
+
+TX_SERVICE(AC_OL_0032, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0032] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0032] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0032] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0032] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/ac_ol_0032.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module ac @transform acquire-online */
+/*
+ * ac_ol_0032.pgc - 매입 온라인 서비스 (AC_OL_0032)  [tier=easy]
+ *
+ * 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_0032, ctx)
+{
+    ac_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AC_OL_0032] 매입 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AC_OL_0032] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = ac_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AC_OL_0032] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AC_OL_0032] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0001.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0001.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0001.pgc - 승인한도 온라인 서비스 (AU_OL_0001)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0001.pgc"
+
+
+TX_SERVICE(AU_OL_0001, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0001] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0001] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0001] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0001] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0001.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0001.pgc - 승인한도 온라인 서비스 (AU_OL_0001)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0001, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0001] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0001] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0001] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0001] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0002.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0002.pgc"
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0002.pgc - 승인한도 온라인 서비스 (AU_OL_0002)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0002.pgc"
+
+
+TX_SERVICE(AU_OL_0002, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0002] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0002] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0002] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0002] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0002] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0002] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0002.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0002.pgc - 승인한도 온라인 서비스 (AU_OL_0002)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0002, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0002] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0002] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0002] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0002] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0002] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0002] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0003.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0003.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0003.pgc - 승인한도 온라인 서비스 (AU_OL_0003)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0003.pgc"
+
+
+TX_SERVICE(AU_OL_0003, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0003] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0003] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0003] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0003] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0003.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0003.pgc - 승인한도 온라인 서비스 (AU_OL_0003)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0003, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0003] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0003] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0003] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0003] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0004.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0004.pgc"
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0004.pgc - 승인한도 온라인 서비스 (AU_OL_0004)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0004.pgc"
+
+
+TX_SERVICE(AU_OL_0004, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0004] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0004] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0004] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0004] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0004] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0004] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0004.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0004.pgc - 승인한도 온라인 서비스 (AU_OL_0004)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0004, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0004] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0004] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0004] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0004] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0004] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0004] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0005.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0005.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0005.pgc - 승인한도 온라인 서비스 (AU_OL_0005)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0005.pgc"
+
+
+TX_SERVICE(AU_OL_0005, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0005] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0005] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0005] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0005] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0005.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0005.pgc - 승인한도 온라인 서비스 (AU_OL_0005)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0005, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0005] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0005] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0005] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0005] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0006.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0006.pgc"
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0006.pgc - 승인한도 온라인 서비스 (AU_OL_0006)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0006.pgc"
+
+
+TX_SERVICE(AU_OL_0006, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0006] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0006] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0006] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0006] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0006] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0006] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0006.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0006.pgc - 승인한도 온라인 서비스 (AU_OL_0006)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0006, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0006] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0006] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0006] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0006] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0006] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0006] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0007.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0007.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0007.pgc - 승인한도 온라인 서비스 (AU_OL_0007)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0007.pgc"
+
+
+TX_SERVICE(AU_OL_0007, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0007] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0007] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0007] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0007] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0007.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0007.pgc - 승인한도 온라인 서비스 (AU_OL_0007)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0007, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0007] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0007] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0007] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0007] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0008.c

@@ -0,0 +1,176 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0008.pgc"
+/* @tier hard @module au @transform authorization-online */
+/*
+ * au_ol_0008.pgc - 승인한도 온라인 서비스 (AU_OL_0008)  [tier=hard]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0008.pgc"
+
+
+TX_SERVICE(AU_OL_0008, ctx)
+{
+    au_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, "[AU_OL_0008] 승인한도 트랜잭션 오케스트레이션 진입");
+
+    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, "[AU_OL_0008] 필수 필드 누락");
+        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, "[AU_OL_0008] 입력 검증 실패 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0008] 원장반영 실패 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("AU_POST", sub_in, sub_out);
+        if (rc != TX_OK)
+            tx_log(TX_LOG_WARN, "[AU_OL_0008] 후속연계 경고 rc=%d", rc);
+    }
+    tx_buf_free(sub_in);
+    tx_buf_free(sub_out);
+
+    /* 교차 검증: 당일 합계 재계산 */
+    if (au_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, "[AU_OL_0008] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0008.pgc

@@ -0,0 +1,98 @@
+/* @tier hard @module au @transform authorization-online */
+/*
+ * au_ol_0008.pgc - 승인한도 온라인 서비스 (AU_OL_0008)  [tier=hard]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0008, ctx)
+{
+    au_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, "[AU_OL_0008] 승인한도 트랜잭션 오케스트레이션 진입");
+
+    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, "[AU_OL_0008] 필수 필드 누락");
+        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, "[AU_OL_0008] 입력 검증 실패 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0008] 원장반영 실패 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("AU_POST", sub_in, sub_out);
+        if (rc != TX_OK)
+            tx_log(TX_LOG_WARN, "[AU_OL_0008] 후속연계 경고 rc=%d", rc);
+    }
+    tx_buf_free(sub_in);
+    tx_buf_free(sub_out);
+
+    /* 교차 검증: 당일 합계 재계산 */
+    if (au_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, "[AU_OL_0008] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0009.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0009.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0009.pgc - 승인한도 온라인 서비스 (AU_OL_0009)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0009.pgc"
+
+
+TX_SERVICE(AU_OL_0009, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0009] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0009] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0009] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0009] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0009.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0009.pgc - 승인한도 온라인 서비스 (AU_OL_0009)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0009, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0009] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0009] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0009] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0009] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0010.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0010.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0010.pgc - 승인한도 온라인 서비스 (AU_OL_0010)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0010.pgc"
+
+
+TX_SERVICE(AU_OL_0010, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0010] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0010] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0010] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0010] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0010.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0010.pgc - 승인한도 온라인 서비스 (AU_OL_0010)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0010, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0010] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0010] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0010] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0010] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0011.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0011.pgc"
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0011.pgc - 승인한도 온라인 서비스 (AU_OL_0011)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0011.pgc"
+
+
+TX_SERVICE(AU_OL_0011, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0011] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0011] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0011] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0011] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0011] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0011] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0011.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0011.pgc - 승인한도 온라인 서비스 (AU_OL_0011)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0011, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0011] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0011] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0011] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0011] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0011] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0011] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0012.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0012.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0012.pgc - 승인한도 온라인 서비스 (AU_OL_0012)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0012.pgc"
+
+
+TX_SERVICE(AU_OL_0012, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0012] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0012] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0012] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0012] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0012.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0012.pgc - 승인한도 온라인 서비스 (AU_OL_0012)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0012, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0012] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0012] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0012] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0012] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0013.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0013.pgc"
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0013.pgc - 승인한도 온라인 서비스 (AU_OL_0013)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0013.pgc"
+
+
+TX_SERVICE(AU_OL_0013, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0013] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0013] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0013] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0013] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0013] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0013] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0013.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0013.pgc - 승인한도 온라인 서비스 (AU_OL_0013)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0013, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0013] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0013] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0013] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0013] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0013] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0013] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0014.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0014.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0014.pgc - 승인한도 온라인 서비스 (AU_OL_0014)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0014.pgc"
+
+
+TX_SERVICE(AU_OL_0014, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0014] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0014] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0014] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0014] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0014.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0014.pgc - 승인한도 온라인 서비스 (AU_OL_0014)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0014, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0014] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0014] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0014] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0014] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0015.c

@@ -0,0 +1,148 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0015.pgc"
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0015.pgc - 승인한도 온라인 서비스 (AU_OL_0015)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0015.pgc"
+
+
+TX_SERVICE(AU_OL_0015, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0015] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0015] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0015] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0015] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0015] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0015] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0015.pgc

@@ -0,0 +1,70 @@
+/* @tier medium @module au @transform authorization-online */
+/*
+ * au_ol_0015.pgc - 승인한도 온라인 서비스 (AU_OL_0015)  [tier=medium]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0015, ctx)
+{
+    au_rec_t rec;
+    char key[16], merch[16], bizdate[16];
+    long amount = 0, cnt;
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0015] 승인한도 등록 서비스 진입");
+
+    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, "[AU_OL_0015] 필수 필드 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    tx_buf_getlong(ctx->in, "AMOUNT", &amount);
+
+    /* 업무검증: 금액 범위 + 영업일 형식 */
+    if (!amount_is_valid(amount)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0015] 금액 범위 오류 amount=%ld", amount);
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+    if (!date_is_valid(bizdate)) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0015] 영업일 오류 date=%s", bizdate);
+        tx_return(ctx, TX_EINVAL, 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;   /* 수수료 1% 가정 */
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0015] 등록 실패 rc=%d(%s)", rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    cnt = au_rec_count(bizdate, AU_ST_RECV);
+
+    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, "DAYCNT", (cnt < 0) ? 0 : cnt);
+    tx_log(TX_LOG_INFO, "[AU_OL_0015] 등록완료 key=%s 당일건수=%ld", key, cnt);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0016.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0016.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0016.pgc - 승인한도 온라인 서비스 (AU_OL_0016)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0016.pgc"
+
+
+TX_SERVICE(AU_OL_0016, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0016] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0016] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0016] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0016] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0016.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0016.pgc - 승인한도 온라인 서비스 (AU_OL_0016)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0016, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0016] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0016] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0016] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0016] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0017.c

@@ -0,0 +1,176 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0017.pgc"
+/* @tier hard @module au @transform authorization-online */
+/*
+ * au_ol_0017.pgc - 승인한도 온라인 서비스 (AU_OL_0017)  [tier=hard]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0017.pgc"
+
+
+TX_SERVICE(AU_OL_0017, ctx)
+{
+    au_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, "[AU_OL_0017] 승인한도 트랜잭션 오케스트레이션 진입");
+
+    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, "[AU_OL_0017] 필수 필드 누락");
+        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, "[AU_OL_0017] 입력 검증 실패 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0017] 원장반영 실패 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("AU_POST", sub_in, sub_out);
+        if (rc != TX_OK)
+            tx_log(TX_LOG_WARN, "[AU_OL_0017] 후속연계 경고 rc=%d", rc);
+    }
+    tx_buf_free(sub_in);
+    tx_buf_free(sub_out);
+
+    /* 교차 검증: 당일 합계 재계산 */
+    if (au_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, "[AU_OL_0017] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0017.pgc

@@ -0,0 +1,98 @@
+/* @tier hard @module au @transform authorization-online */
+/*
+ * au_ol_0017.pgc - 승인한도 온라인 서비스 (AU_OL_0017)  [tier=hard]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0017, ctx)
+{
+    au_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, "[AU_OL_0017] 승인한도 트랜잭션 오케스트레이션 진입");
+
+    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, "[AU_OL_0017] 필수 필드 누락");
+        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, "[AU_OL_0017] 입력 검증 실패 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, AU_ST_RECV, sizeof(rec.status) - 1);
+    rec.amount = amount;
+    rec.fee    = amount / 100;
+
+    rc = au_rec_insert(&rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0017] 원장반영 실패 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("AU_POST", sub_in, sub_out);
+        if (rc != TX_OK)
+            tx_log(TX_LOG_WARN, "[AU_OL_0017] 후속연계 경고 rc=%d", rc);
+    }
+    tx_buf_free(sub_in);
+    tx_buf_free(sub_out);
+
+    /* 교차 검증: 당일 합계 재계산 */
+    if (au_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, "[AU_OL_0017] 완료 key=%s 당일합계=%ld", key, daysum);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0018.c

@@ -0,0 +1,125 @@
+/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */
+/* These include files are added by the preprocessor */
+#include <ecpglib.h>
+#include <ecpgerrno.h>
+#include <sqlca.h>
+/* End of automatic include section */
+
+#line 1 "app/online/au_ol_0018.pgc"
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0018.pgc - 승인한도 온라인 서비스 (AU_OL_0018)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+
+#line 1 "/usr/include/postgresql/sqlca.h"
+#ifndef POSTGRES_SQLCA_H
+#define POSTGRES_SQLCA_H
+
+#ifndef PGDLLIMPORT
+#if  defined(WIN32) || defined(__CYGWIN__)
+#define PGDLLIMPORT __declspec (dllimport)
+#else
+#define PGDLLIMPORT
+#endif							/* __CYGWIN__ */
+#endif							/* PGDLLIMPORT */
+
+#define SQLERRMC_LEN	150
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+struct sqlca_t
+{
+	char		sqlcaid[8];
+	long		sqlabc;
+	long		sqlcode;
+	struct
+	{
+		int			sqlerrml;
+		char		sqlerrmc[SQLERRMC_LEN];
+	}			sqlerrm;
+	char		sqlerrp[8];
+	long		sqlerrd[6];
+	/* Element 0: empty						*/
+	/* 1: OID of processed tuple if applicable			*/
+	/* 2: number of rows processed				*/
+	/* after an INSERT, UPDATE or				*/
+	/* DELETE statement					*/
+	/* 3: empty						*/
+	/* 4: empty						*/
+	/* 5: empty						*/
+	char		sqlwarn[8];
+	/* Element 0: set to 'W' if at least one other is 'W'	*/
+	/* 1: if 'W' at least one character string		*/
+	/* value was truncated when it was			*/
+	/* stored into a host variable.             */
+
+	/*
+	 * 2: if 'W' a (hopefully) non-fatal notice occurred
+	 */	/* 3: empty */
+	/* 4: empty						*/
+	/* 5: empty						*/
+	/* 6: empty						*/
+	/* 7: empty						*/
+
+	char		sqlstate[5];
+};
+
+struct sqlca_t *ECPGget_sqlca(void);
+
+#ifndef POSTGRES_ECPG_INTERNAL
+#define sqlca (*ECPGget_sqlca())
+#endif
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif
+
+#line 15 "app/online/au_ol_0018.pgc"
+
+
+TX_SERVICE(AU_OL_0018, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0018] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0018] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0018] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0018] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}

app/online/au_ol_0018.pgc

@@ -0,0 +1,47 @@
+/* @tier easy @module au @transform authorization-online */
+/*
+ * au_ol_0018.pgc - 승인한도 온라인 서비스 (AU_OL_0018)  [tier=easy]
+ *
+ * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 au 표준 DBIO 를
+ * 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
+ */
+#include <stdio.h>
+#include <string.h>
+
+#include "txcore.h"
+#include "acq_util.h"
+#include "au_core.h"
+
+EXEC SQL INCLUDE sqlca;
+
+TX_SERVICE(AU_OL_0018, ctx)
+{
+    au_rec_t rec;
+    char key[16];
+    int  rc;
+
+    tx_log(TX_LOG_INFO, "[AU_OL_0018] 승인한도 단건조회 서비스 진입");
+
+    if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
+        tx_log(TX_LOG_ERROR, "[AU_OL_0018] KEY 누락");
+        tx_return(ctx, TX_EINVAL, ctx->out);
+        return;
+    }
+
+    memset(&rec, 0, sizeof(rec));
+    rc = au_rec_select(key, &rec);
+    if (rc != TX_OK) {
+        tx_log(TX_LOG_WARN, "[AU_OL_0018] 조회 실패 key=%s rc=%d(%s)",
+               key, rc, tx_strerror(rc));
+        tx_return(ctx, rc, ctx->out);
+        return;
+    }
+
+    tx_buf_reset(ctx->out);
+    tx_buf_sets(ctx->out, "KEY", rec.key);
+    tx_buf_sets(ctx->out, "MERCHID", rec.merch_id);
+    tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
+    tx_buf_sets(ctx->out, "STATUS", rec.status);
+    tx_log(TX_LOG_INFO, "[AU_OL_0018] 조회완료 key=%s amount=%ld", key, rec.amount);
+    tx_return(ctx, TX_OK, ctx->out);
+}