- 템플릿 클론(정규화 후 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>
74 lines
2.3 KiB
Text
74 lines
2.3 KiB
Text
/* @tier easy @module cm @transform common-online */
|
|
/*
|
|
* cm_ol_0002.pgc - 영업일 계산 서비스 (CM_OL_0002) [tier=easy]
|
|
*
|
|
* 요청의 기준일자(DATE, YYYYMMDD)를 검증한 뒤 date_next_business 로
|
|
* 다음 영업일을 산출하고, 기준일의 요일번호/요일명/주말여부를 함께
|
|
* 응답한다. DB 접근이 없는 순수 유틸리티 로직.
|
|
* (ATMI void SVC(TPSVCINFO*) 대응)
|
|
*/
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "txcore.h"
|
|
#include "acq_util.h"
|
|
#include "cm_core.h"
|
|
|
|
EXEC SQL INCLUDE sqlca;
|
|
|
|
/* 요일번호(0=일..6=토)를 한글 표기로 변환 */
|
|
static const char *weekday_name(int wd)
|
|
{
|
|
static const char *names[7] = {
|
|
"일요일", "월요일", "화요일", "수요일", "목요일", "금요일", "토요일"
|
|
};
|
|
if (wd < 0 || wd > 6) {
|
|
return "미상";
|
|
}
|
|
return names[wd];
|
|
}
|
|
|
|
TX_SERVICE(CM_OL_0002, ctx)
|
|
{
|
|
char base_date[9];
|
|
char next_date[9];
|
|
int wd;
|
|
int weekend;
|
|
|
|
tx_log(TX_LOG_INFO, "[CM_OL_0002] 영업일 계산 서비스 진입");
|
|
|
|
memset(base_date, 0, sizeof(base_date));
|
|
memset(next_date, 0, sizeof(next_date));
|
|
|
|
if (tx_buf_get(ctx->in, "DATE", base_date, sizeof(base_date)) != TX_OK) {
|
|
tx_log(TX_LOG_ERROR, "[CM_OL_0002] 기준일자(DATE) 누락");
|
|
tx_return(ctx, TX_EINVAL, ctx->out);
|
|
return;
|
|
}
|
|
|
|
if (!date_is_valid(base_date)) {
|
|
tx_log(TX_LOG_WARN, "[CM_OL_0002] 유효하지 않은 일자 date=%s", base_date);
|
|
tx_return(ctx, TX_EINVAL, ctx->out);
|
|
return;
|
|
}
|
|
|
|
wd = date_weekday(base_date);
|
|
weekend = date_is_weekend(base_date);
|
|
|
|
if (date_next_business(base_date, next_date) != 0) {
|
|
tx_log(TX_LOG_ERROR, "[CM_OL_0002] 다음 영업일 계산 실패 date=%s", base_date);
|
|
tx_return(ctx, TX_FAIL, ctx->out);
|
|
return;
|
|
}
|
|
|
|
tx_buf_reset(ctx->out);
|
|
tx_buf_sets(ctx->out, "DATE", base_date);
|
|
tx_buf_sets(ctx->out, "NEXTBIZ", next_date);
|
|
tx_buf_setlong(ctx->out, "WEEKDAY", (long)wd);
|
|
tx_buf_sets(ctx->out, "WEEKDAYNM", weekday_name(wd));
|
|
tx_buf_sets(ctx->out, "WEEKEND", weekend ? "Y" : "N");
|
|
|
|
tx_log(TX_LOG_INFO, "[CM_OL_0002] 계산완료 date=%s(%s) next=%s weekend=%s",
|
|
base_date, weekday_name(wd), next_date, weekend ? "Y" : "N");
|
|
tx_return(ctx, TX_OK, ctx->out);
|
|
}
|