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_0031.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

129 lines
4.5 KiB
Text

/* @tier hard @module lg @transform ledger-online */
/*
* lg_ol_0031.pgc - 원장 온라인 서비스 (LG_OL_0031) [tier=hard]
*
* 승인원장 요약조회: 가맹점(MERCHID)+영업일(BIZDATE) 조합의 처리완료(M)
* 승인건에 대한 건수/합계/평균(정수 나눗셈)을 단일 SELECT 로 조회 응답한다.
*/
#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;
/*
* [업무 개요]
* 가맹점 포털/정산 조회 화면에서 "가맹점 + 영업일" 조합의 승인 완료건
* 요약(건수/합계/평균)을 단일 호출로 제공한다. 평균은 실수 대신 정수
* 나눗셈(원 단위 절사)으로 산출하여 회계 표기와 일치시킨다.
*
* [집계 대상]
* status = 'M'(처리완료) 인 승인 전표만 포함. 접수(R)/취소(U)/정산(S) 는
* 승인원장 요약에서 제외한다.
*
* [평균 산식]
* AVG = SUM / CNT (정수 나눗셈; CNT=0 이면 미등록으로 별도 처리)
*
* [처리 절차]
* 1) MERCHID, BIZDATE 추출 및 검증.
* 2) 3개 조건(merch_id, biz_date, status='M') 단일 집계 SELECT.
* 3) 건수 0 이면 RESP_NOMERCH.
* 4) 평균 산출 및 원화 표기 구성 후 응답.
*
* [응답 필드]
* RESPCODE 처리결과코드
* MERCHID 가맹점번호(에코)
* BIZDATE 영업일(에코)
* CNT 승인 완료 건수
* SUM 승인 합계금액
* AVG 건당 평균(정수)
* AVGWON 평균 원화표기
*
* [주의]
* 조회 전용. 집계는 항상 1행이므로 singleton SELECT INTO 를 사용한다.
*/
TX_SERVICE(LG_OL_0031, ctx)
{
EXEC SQL BEGIN DECLARE SECTION;
char h_merch_id[16];
char h_biz_date[9];
char h_status_m[2];
long h_cnt;
long h_sum;
EXEC SQL END DECLARE SECTION;
char merch[16], bizdate[16];
char wonbuf[32];
long avg;
tx_log(TX_LOG_INFO, "[LG_OL_0031] 승인원장 요약조회 진입");
if (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, "[LG_OL_0031] 필수 필드 누락");
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_INVALID);
tx_return(ctx, TX_EINVAL, ctx->out);
return;
}
if (merch[0] == '\0' || !date_is_valid(bizdate)) {
tx_log(TX_LOG_WARN, "[LG_OL_0031] 입력 검증 실패 merch=%s date=%s", merch, bizdate);
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_biz_date, bizdate, sizeof(h_biz_date) - 1);
h_biz_date[sizeof(h_biz_date) - 1] = '\0';
strncpy(h_status_m, LG_ST_DONE, sizeof(h_status_m) - 1);
h_status_m[sizeof(h_status_m) - 1] = '\0';
/* 가맹점+영업일+승인완료 단일 집계 */
EXEC SQL SELECT count(*), coalesce(sum(amount), 0)
INTO :h_cnt, :h_sum
FROM lg_ledger
WHERE merch_id = :h_merch_id
AND biz_date = :h_biz_date
AND status = :h_status_m;
if (sqlca.sqlcode != TX_SQL_OK && sqlca.sqlcode != TX_SQL_NOTFOUND) {
TX_DBIO_LOG_ERR("lg_ol_0031 summary");
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_SYSERR);
tx_return(ctx, TX_EDB, ctx->out);
return;
}
if (h_cnt == 0) {
tx_log(TX_LOG_WARN, "[LG_OL_0031] 승인건 없음 merch=%s date=%s", merch, bizdate);
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_NOMERCH);
tx_buf_setlong(ctx->out, "CNT", 0);
tx_buf_setlong(ctx->out, "SUM", 0);
tx_buf_setlong(ctx->out, "AVG", 0);
tx_return(ctx, TX_ENOENT, ctx->out);
return;
}
/* 평균 = 합계 / 건수 (정수 나눗셈) */
avg = h_sum / h_cnt;
amount_format_won(avg, wonbuf, sizeof(wonbuf));
tx_buf_reset(ctx->out);
tx_buf_sets(ctx->out, "RESPCODE", RESP_OK);
tx_buf_sets(ctx->out, "MERCHID", merch);
tx_buf_sets(ctx->out, "BIZDATE", bizdate);
tx_buf_setlong(ctx->out, "CNT", h_cnt);
tx_buf_setlong(ctx->out, "SUM", h_sum);
tx_buf_setlong(ctx->out, "AVG", avg);
tx_buf_sets(ctx->out, "AVGWON", wonbuf);
tx_log(TX_LOG_INFO, "[LG_OL_0031] 요약조회 merch=%s date=%s 건수=%ld 평균=%ld",
merch, bizdate, h_cnt, avg);
tx_return(ctx, TX_OK, ctx->out);
}