/* @tier medium @module cm @transform common-online */
/*
 * cm_ol_0018.pgc - 영업일 여부 판정 서비스 (CM_OL_0018)  [tier=medium]
 *
 * 요청의 일자(DATE)에 대해 (1) 주말여부(date_is_weekend) 판정과
 * (2) 공휴일 마스터(cm_holiday) 등록여부 조회를 종합하여 영업일 여부
 * (BIZYN=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;

TX_SERVICE(CM_OL_0018, ctx)
{
    EXEC SQL BEGIN DECLARE SECTION;
    char h_date[9];
    char h_holi_name[64];
    int  h_holi_cnt;
    EXEC SQL END DECLARE SECTION;

    char date[16];
    char reason[80];
    int  is_weekend;
    int  is_holiday = 0;
    int  is_biz;

    tx_log(TX_LOG_INFO, "[CM_OL_0018] 영업일 여부 판정 서비스 진입");

    if (tx_buf_get(ctx->in, "DATE", date, sizeof(date)) != TX_OK) {
        tx_log(TX_LOG_ERROR, "[CM_OL_0018] DATE 누락");
        tx_return(ctx, TX_EINVAL, ctx->out);
        return;
    }

    if (!date_is_valid(date)) {
        tx_log(TX_LOG_WARN, "[CM_OL_0018] 유효하지 않은 일자 date=%s", date);
        tx_return(ctx, TX_EINVAL, ctx->out);
        return;
    }

    is_weekend = date_is_weekend(date);

    /* 공휴일 마스터 조회 (등록건수 + 공휴일명) */
    memset(h_date, 0, sizeof(h_date));
    memset(h_holi_name, 0, sizeof(h_holi_name));
    strncpy(h_date, date, sizeof(h_date) - 1);
    h_holi_cnt = 0;

    EXEC SQL
        SELECT COUNT(*)
          INTO :h_holi_cnt
          FROM cm_holiday
         WHERE holi_date = :h_date;

    if (sqlca.sqlcode != TX_SQL_OK && sqlca.sqlcode != TX_SQL_NOTFOUND) {
        TX_DBIO_LOG_ERR("CM_OL_0018 SELECT cm_holiday");
        tx_return(ctx, TX_EDB, ctx->out);
        return;
    }
    if (h_holi_cnt > 0) {
        is_holiday = 1;
        EXEC SQL
            SELECT holi_name
              INTO :h_holi_name
              FROM cm_holiday
             WHERE holi_date = :h_date;
        if (sqlca.sqlcode != TX_SQL_OK)
            strncpy(h_holi_name, "공휴일", sizeof(h_holi_name) - 1);
    }

    /* 영업일 = 주말 아님 AND 공휴일 아님 */
    is_biz = (!is_weekend && !is_holiday) ? 1 : 0;
    if (is_biz)
        strncpy(reason, "영업일", sizeof(reason) - 1);
    else if (is_holiday)
        snprintf(reason, sizeof(reason), "공휴일(%s)", h_holi_name);
    else
        strncpy(reason, "주말", sizeof(reason) - 1);

    tx_buf_reset(ctx->out);
    tx_buf_sets(ctx->out, "DATE", date);
    tx_buf_sets(ctx->out, "BIZYN", is_biz ? "Y" : "N");
    tx_buf_sets(ctx->out, "WEEKEND", is_weekend ? "Y" : "N");
    tx_buf_sets(ctx->out, "HOLIDAY", is_holiday ? "Y" : "N");
    tx_buf_sets(ctx->out, "REASON", reason);
    tx_log(TX_LOG_INFO, "[CM_OL_0018] 판정완료 date=%s 영업일=%s 사유=%s",
           date, is_biz ? "Y" : "N", reason);
    tx_return(ctx, TX_OK, ctx->out);
}
