/* @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);
}