/* @tier easy @module py @transform payment-online */ /* * py_ol_0028.pgc - 지급 가맹점 등록확인(지급이력 존재검사) (PY_OL_0028) [tier=easy] * * TxCore TX_SERVICE 엔트리. 요청 TXBUF 를 검증하고 임베디드 SQL / 표준 * DBIO / tx_call 로 처리한 뒤 응답 TXBUF 를 구성한다. */ #include #include #include "txcore.h" #include "txcore_dbio.h" #include "acq_util.h" #include "py_core.h" EXEC SQL INCLUDE sqlca; TX_SERVICE(PY_OL_0028, ctx) { EXEC SQL BEGIN DECLARE SECTION; char h_merch[16]; int h_cnt; long h_last; EXEC SQL END DECLARE SECTION; char merch[16]; tx_log(TX_LOG_INFO, "[PY_OL_0028] 지급 가맹점 등록확인 진입"); if (tx_buf_get(ctx->in, "MERCHID", merch, sizeof(merch)) != TX_OK) { tx_return(ctx, TX_EINVAL, ctx->out); return; } strncpy(h_merch, merch, 15); h_merch[15] = '\0'; EXEC SQL SELECT count(*), coalesce(max(amount), 0) INTO :h_cnt, :h_last FROM py_ledger WHERE merch_id = :h_merch; if (sqlca.sqlcode != TX_SQL_OK) { TX_DBIO_LOG_ERR("py_ol_0028"); tx_return(ctx, TX_EDB, ctx->out); return; } tx_buf_reset(ctx->out); tx_buf_sets(ctx->out, "MERCHID", merch); tx_buf_sets(ctx->out, "REGISTERED", (h_cnt > 0) ? "Y" : "N"); tx_buf_setlong(ctx->out, "HISTCNT", h_cnt); tx_buf_setlong(ctx->out, "MAXAMT", h_last); tx_log(TX_LOG_INFO, "[PY_OL_0028] 등록확인 merch=%s cnt=%d", merch, h_cnt); tx_return(ctx, (h_cnt > 0) ? TX_OK : TX_ENOENT, ctx->out); }