/* @tier medium @module mm @transform master-online */
/*
 * mm_ol_0007.pgc - 한도 마스터 조회 서비스 (MM_OL_0007)  [tier=medium]
 *
 * 가맹점의 승인한도 마스터(mm_limit)에서 일한도(daily_limit)/월한도
 * (monthly_limit) 및 현재 사용액을 조회하고 잔여한도를 계산한다. (조회)
 */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "txcore.h"
#include "txcore_dbio.h"
#include "acq_util.h"
#include "mm_core.h"

EXEC SQL INCLUDE sqlca;

TX_SERVICE(MM_OL_0007, ctx)
{
    EXEC SQL BEGIN DECLARE SECTION;
    char h_merch_id[16];
    long h_daily;
    long h_monthly;
    long h_day_used;
    long h_mon_used;
    EXEC SQL END DECLARE SECTION;

    char merch_id[16];
    char won_buf[32];
    long day_remain;
    long mon_remain;

    tx_log(TX_LOG_INFO, "[MM_OL_0007] 한도 마스터 조회 서비스 진입");

    if (tx_buf_get(ctx->in, "MERCHID", merch_id, sizeof(merch_id)) != TX_OK) {
        tx_log(TX_LOG_ERROR, "[MM_OL_0007] MERCHID 누락");
        tx_buf_sets(ctx->out, "ERRCODE", "MM0700");
        tx_return(ctx, TX_EINVAL, ctx->out);
        return;
    }

    strncpy(h_merch_id, merch_id, sizeof(h_merch_id) - 1);
    h_merch_id[sizeof(h_merch_id) - 1] = '\0';

    EXEC SQL SELECT daily_limit, monthly_limit, day_used, mon_used
          INTO :h_daily, :h_monthly, :h_day_used, :h_mon_used
          FROM mm_limit
         WHERE merch_id = :h_merch_id;

    if (sqlca.sqlcode == TX_SQL_NOTFOUND) {
        tx_log(TX_LOG_WARN, "[MM_OL_0007] 한도 미등록 merch=%s", merch_id);
        tx_buf_sets(ctx->out, "ERRCODE", "MM0701");
        tx_return(ctx, TX_ENOENT, ctx->out);
        return;
    }
    if (sqlca.sqlcode != TX_SQL_OK) {
        TX_DBIO_LOG_ERR("SELECT mm_limit");
        tx_buf_sets(ctx->out, "ERRCODE", "MM0702");
        tx_return(ctx, TX_EDB, ctx->out);
        return;
    }

    day_remain = h_daily - h_day_used;
    mon_remain = h_monthly - h_mon_used;
    if (day_remain < 0) day_remain = 0;
    if (mon_remain < 0) mon_remain = 0;

    tx_buf_reset(ctx->out);
    tx_buf_sets(ctx->out, "MERCHID", merch_id);
    tx_buf_setlong(ctx->out, "DAILYLIMIT", h_daily);
    tx_buf_setlong(ctx->out, "MONTHLYLIMIT", h_monthly);
    tx_buf_setlong(ctx->out, "DAYUSED", h_day_used);
    tx_buf_setlong(ctx->out, "MONUSED", h_mon_used);
    tx_buf_setlong(ctx->out, "DAYREMAIN", day_remain);
    tx_buf_setlong(ctx->out, "MONREMAIN", mon_remain);
    amount_format_won(day_remain, won_buf, sizeof(won_buf));
    tx_buf_sets(ctx->out, "DAYREMAINWON", won_buf);
    tx_buf_sets(ctx->out, "ERRCODE", RESP_OK);
    tx_log(TX_LOG_INFO, "[MM_OL_0007] 조회완료 merch=%s 일잔여=%ld 월잔여=%ld",
           merch_id, day_remain, mon_remain);
    tx_return(ctx, TX_OK, ctx->out);
}
