/* @tier easy @module cm @transform common-online */
/*
 * cm_ol_0002.pgc - 영업일 계산 서비스 (CM_OL_0002)  [tier=easy]
 *
 * 요청의 기준일자(DATE, YYYYMMDD)를 검증한 뒤 date_next_business 로
 * 다음 영업일을 산출하고, 기준일의 요일번호/요일명/주말여부를 함께
 * 응답한다. 아울러 휴일 마스터(cm_holiday)를 조회하여 기준일이 지정
 * 공휴일인지(HOLIDAY=Y/N)와 휴일명을 응답에 반영한다.
 * (ATMI void SVC(TPSVCINFO*) 대응)
 */
#include <stdio.h>
#include <string.h>

#include "txcore.h"
#include "txcore_dbio.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)
{
    EXEC SQL BEGIN DECLARE SECTION;
    char h_date[9];
    char h_holi_nm[64];
    long h_holi_cnt;
    EXEC SQL END DECLARE SECTION;

    char base_date[9];
    char next_date[9];
    int  wd;
    int  weekend;
    int  is_holiday;

    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;
    }

    /* 지정 공휴일 여부 조회 (휴일 마스터) */
    strncpy(h_date, base_date, sizeof(h_date) - 1);
    h_date[sizeof(h_date) - 1] = '\0';
    h_holi_cnt   = 0;
    h_holi_nm[0] = '\0';

    EXEC SQL SELECT count(*), coalesce(max(holi_nm), '')
        INTO :h_holi_cnt, :h_holi_nm
        FROM cm_holiday
        WHERE holi_date = :h_date
          AND use_yn    = 'Y';

    if (sqlca.sqlcode != TX_SQL_OK && sqlca.sqlcode != TX_SQL_NOTFOUND) {
        TX_DBIO_LOG_ERR("CM_OL_0002 SELECT cm_holiday");
        h_holi_cnt   = 0;
        h_holi_nm[0] = '\0';
    }
    is_holiday = (h_holi_cnt > 0) ? 1 : 0;

    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_buf_sets(ctx->out, "HOLIDAY", is_holiday ? "Y" : "N");
    tx_buf_sets(ctx->out, "HOLINM", h_holi_nm);

    tx_log(TX_LOG_INFO, "[CM_OL_0002] 계산완료 date=%s(%s) next=%s weekend=%s holiday=%s",
           base_date, weekday_name(wd), next_date, weekend ? "Y" : "N",
           is_holiday ? "Y" : "N");
    tx_return(ctx, TX_OK, ctx->out);
}
