다양화: 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>
This commit is contained in:
forge-bot
parent
b96cf702ee
commit
c3a0259e95
1027 changed files with 68915 additions and 40962 deletions
|
|
@ -1,9 +1,11 @@
|
|||
/* @tier easy @module cm @transform common-online */
|
||||
/*
|
||||
* cm_ol_0002.pgc - 공통 온라인 서비스 (CM_OL_0002) [tier=easy]
|
||||
* cm_ol_0002.pgc - 영업일 계산 서비스 (CM_OL_0002) [tier=easy]
|
||||
*
|
||||
* TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 cm 표준 DBIO 를
|
||||
* 통해 처리한 뒤 응답 TXBUF 를 구성한다. (ATMI void SVC(TPSVCINFO*) 대응)
|
||||
* 요청의 기준일자(DATE, YYYYMMDD)를 검증한 뒤 date_next_business 로
|
||||
* 다음 영업일을 산출하고, 기준일의 요일번호/요일명/주말여부를 함께
|
||||
* 응답한다. DB 접근이 없는 순수 유틸리티 로직.
|
||||
* (ATMI void SVC(TPSVCINFO*) 대응)
|
||||
*/
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
|
|
@ -14,34 +16,59 @@
|
|||
|
||||
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)
|
||||
{
|
||||
cm_rec_t rec;
|
||||
char key[16];
|
||||
int rc;
|
||||
char base_date[9];
|
||||
char next_date[9];
|
||||
int wd;
|
||||
int weekend;
|
||||
|
||||
tx_log(TX_LOG_INFO, "[CM_OL_0002] 공통 단건조회 서비스 진입");
|
||||
tx_log(TX_LOG_INFO, "[CM_OL_0002] 영업일 계산 서비스 진입");
|
||||
|
||||
if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK) {
|
||||
tx_log(TX_LOG_ERROR, "[CM_OL_0002] KEY 누락");
|
||||
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;
|
||||
}
|
||||
|
||||
memset(&rec, 0, sizeof(rec));
|
||||
rc = cm_rec_select(key, &rec);
|
||||
if (rc != TX_OK) {
|
||||
tx_log(TX_LOG_WARN, "[CM_OL_0002] 조회 실패 key=%s rc=%d(%s)",
|
||||
key, rc, tx_strerror(rc));
|
||||
tx_return(ctx, rc, ctx->out);
|
||||
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, "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, "[CM_OL_0002] 조회완료 key=%s amount=%ld", key, rec.amount);
|
||||
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);
|
||||
}
|
||||
|
|
|
|||
Reference in a new issue