This repository has been archived on 2026-07-19. You can view files and clone it, but you cannot make any changes to it's state, such as pushing and creating new issues, pull requests or comments.
acquire-core-full/app/online/lg_ol_0003.pgc
forge-bot c3a0259e95 다양화: 530개 online/batch 프로그램을 모듈별 고유 실업무 로직으로 재작성
- 템플릿 클론(정규화 후 0줄 상이) → 전 코퍼스 530/530 고유 바디
- 11개 모듈(mg/au/ac/rc/vl/st/py/lg/mm/cm/cl) 각 파일이 distinct한
  매입·대사·정산·수수료·지급·원장·마감·마스터·정합성·전문게이트웨이·공통 업무
- TxCore(ATMI 유사) + ECPG(EXEC SQL) 관용구, 프레임워크/헤더/DBIO API/파일ID·경로 유지
- 전체 docker make -j4 = EXIT 0, 958 오브젝트, 데모 바이너리 링크
- inventory.json loc 실측 갱신

Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>
2026-07-19 01:37:54 +00:00

127 lines
4.2 KiB
Text

/* @tier easy @module lg @transform ledger-online */
/*
* lg_ol_0003.pgc - 원장 온라인 서비스 (LG_OL_0003) [tier=easy]
*
* 승인원장 정리: 특정 가맹점(MERCHID)의 승인 접수건(status='R')을
* 일괄 확정(status='M') 처리하고 upd_ts 를 갱신한다. 마감 전에 접수
* 상태로 남아 있는 승인건을 확정 상태로 끌어올리는 정리성 서비스로,
* 반영된 건수(AFFECTED)를 응답으로 돌려준다.
*
* TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 lg_ledger 에
* 직접 임베디드 SQL(UPDATE) 을 수행한 뒤 응답 TXBUF 를 구성한다.
*/
#include <stdio.h>
#include <string.h>
#include "txcore.h"
#include "txcore_dbio.h"
#include "acq_util.h"
#include "lg_core.h"
EXEC SQL INCLUDE sqlca;
TX_SERVICE(LG_OL_0003, ctx)
{
EXEC SQL BEGIN DECLARE SECTION;
char h_merch_id[16];
char h_st_recv[2];
char h_st_done[2];
int h_pending;
EXEC SQL END DECLARE SECTION;
char merch[16];
long affected = 0;
tx_log(TX_LOG_INFO, "[LG_OL_0003] 승인원장 정리 서비스 진입");
/* ---- 1. 요청 필드 수신 및 검증 ---- */
if (tx_buf_get(ctx->in, "MERCHID", merch, sizeof(merch)) != TX_OK ||
merch[0] == '\0') {
tx_log(TX_LOG_ERROR, "[LG_OL_0003] MERCHID 누락");
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_INVALID);
tx_return(ctx, TX_EINVAL, ctx->out);
return;
}
strncpy(h_merch_id, merch, sizeof(h_merch_id) - 1);
h_merch_id[sizeof(h_merch_id) - 1] = '\0';
strncpy(h_st_recv, LG_ST_RECV, sizeof(h_st_recv) - 1);
h_st_recv[sizeof(h_st_recv) - 1] = '\0';
strncpy(h_st_done, LG_ST_DONE, sizeof(h_st_done) - 1);
h_st_done[sizeof(h_st_done) - 1] = '\0';
/* ---- 2. 정리 대상(접수 상태) 건수 사전 확인 ---- */
EXEC SQL SELECT count(*)
INTO :h_pending
FROM lg_ledger
WHERE merch_id = :h_merch_id
AND status = :h_st_recv;
if (sqlca.sqlcode != TX_SQL_OK && sqlca.sqlcode != TX_SQL_NOTFOUND) {
TX_DBIO_LOG_ERR("LG_OL_0003 count");
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_SYSERR);
tx_return(ctx, TX_EDB, ctx->out);
return;
}
tx_log(TX_LOG_INFO, "[LG_OL_0003] 가맹점 %s 접수(R) 대상 %d 건",
merch, h_pending);
if (h_pending == 0) {
/* 정리할 접수건이 없음 - 정상(0건) 처리 응답 */
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_OK);
tx_buf_sets(ctx->out, "MERCHID", merch);
tx_buf_setlong(ctx->out, "AFFECTED", 0);
tx_log(TX_LOG_INFO, "[LG_OL_0003] 정리 대상 없음 merch=%s", merch);
tx_return(ctx, TX_OK, ctx->out);
return;
}
/* ---- 3. 트랜잭션 시작 → 접수(R) 건 확정(M) 일괄 전이 ---- */
if (tx_begin() != TX_OK) {
tx_log(TX_LOG_ERROR, "[LG_OL_0003] 트랜잭션 시작 실패");
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_SYSERR);
tx_return(ctx, TX_FAIL, ctx->out);
return;
}
EXEC SQL UPDATE lg_ledger
SET status = :h_st_done, upd_ts = now()
WHERE merch_id = :h_merch_id
AND status = :h_st_recv;
if (sqlca.sqlcode != TX_SQL_OK) {
TX_DBIO_LOG_ERR("LG_OL_0003 update");
tx_abort();
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_SYSERR);
tx_return(ctx, TX_EDB, ctx->out);
return;
}
affected = (long)sqlca.sqlerrd[2];
if (tx_commit() != TX_OK) {
tx_log(TX_LOG_ERROR, "[LG_OL_0003] 커밋 실패 merch=%s", merch);
tx_abort();
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_SYSERR);
tx_return(ctx, TX_FAIL, ctx->out);
return;
}
/* ---- 4. 응답 구성 ---- */
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_OK);
tx_buf_sets(ctx->out, "MERCHID", merch);
tx_buf_setlong(ctx->out, "AFFECTED", affected);
tx_buf_sets(ctx->out, "STATUS", LG_ST_DONE);
tx_log(TX_LOG_INFO, "[LG_OL_0003] 승인원장 정리 완료 merch=%s 확정=%ld 건",
merch, affected);
tx_return(ctx, TX_OK, ctx->out);
}