93c3cb74af
- dbio io(289): fetch/touch/total 시그니처 유지, SQL 바디를 JOIN/집계/커서/ upsert/DELETE 등 구조로 고유화 → 289/289 고유 - common cu(120): 유틸 시그니처 유지, Luhn/CRC/Zeller/BIN레인지/amortization/ netting 등 실 알고리즘으로 고유화 → 120/120 고유 - 심화: 실제 EXEC SQL 없던 프로그램에 SELECT/INSERT/UPDATE/커서+tx 추가 → online+batch 530/530 전부 실제 SQL 보유 - 전 코퍼스 프로그램 939/939 고유, 전체 docker make -j4 = EXIT 0, 958 오브젝트 - 임시 생성기 제거, inventory.json loc 실측 갱신 Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>
127 lines
4.7 KiB
Text
127 lines
4.7 KiB
Text
/* @tier easy @module mg @transform msg-gateway-online */
|
|
/*
|
|
* mg_ol_0002.pgc - 전문게이트웨이 응답전문 송신 서비스 (MG_OL_0002) [tier=easy]
|
|
*
|
|
* 처리키(KEY)로 원장(mg_ledger)을 조회하여 원거래 정보를 확보한 뒤,
|
|
* 응답전문(0210)을 acq_msg_t 로 구성하고 msg_pack 으로 고정길이 프레임을
|
|
* 생성해 채널로 회신할 RAWMSG 를 반환한다.
|
|
*/
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "txcore.h"
|
|
#include "txcore_dbio.h"
|
|
#include "acq_util.h"
|
|
#include "mg_core.h"
|
|
|
|
EXEC SQL INCLUDE sqlca;
|
|
|
|
TX_SERVICE(MG_OL_0002, ctx)
|
|
{
|
|
char key[16];
|
|
char amtfld[FLD_AMOUNT_LEN + 1];
|
|
char raw[MSG_ACQ_LEN + 8];
|
|
acq_msg_t msg;
|
|
mg_rec_t rec;
|
|
int rc;
|
|
|
|
tx_log(TX_LOG_INFO, "[MG_OL_0002] 응답전문 송신 서비스 진입");
|
|
|
|
/* 1) 송신 대상 처리키 수신 */
|
|
if (tx_buf_get(ctx->in, "KEY", key, sizeof(key)) != TX_OK || key[0] == '\0') {
|
|
tx_log(TX_LOG_ERROR, "[MG_OL_0002] 처리키(KEY) 누락");
|
|
tx_return(ctx, TX_EINVAL, ctx->out);
|
|
return;
|
|
}
|
|
|
|
/* 2) 원장에서 원거래 조회 */
|
|
memset(&rec, 0, sizeof(rec));
|
|
rc = mg_rec_select(key, &rec);
|
|
if (rc == TX_ENOENT) {
|
|
tx_log(TX_LOG_WARN, "[MG_OL_0002] 원장 미존재 key=%s", key);
|
|
tx_buf_reset(ctx->out);
|
|
tx_buf_sets(ctx->out, "RESP", RESP_INVALID);
|
|
tx_return(ctx, TX_ENOENT, ctx->out);
|
|
return;
|
|
}
|
|
if (rc != TX_OK) {
|
|
tx_log(TX_LOG_ERROR, "[MG_OL_0002] 원장 조회 실패 key=%s rc=%d(%s)",
|
|
key, rc, tx_strerror(rc));
|
|
tx_return(ctx, rc, ctx->out);
|
|
return;
|
|
}
|
|
|
|
/* 3) 응답전문(0210) 필드 구성 - 고정길이 규칙에 맞춰 공백/영채움 */
|
|
memset(&msg, 0, sizeof(msg));
|
|
msg_field_set(msg.msg_type, MSG_TYPE_RESP, FLD_MSG_TYPE_LEN);
|
|
msg_field_set(msg.trans_code, "MGSEND", FLD_TRANS_CODE_LEN);
|
|
msg_field_set(msg.merch_id, rec.merch_id, FLD_MERCH_ID_LEN);
|
|
msg_field_set(msg.card_no, rec.card_no, FLD_CARD_NO_LEN);
|
|
msg_field_set(msg.approval_no, rec.key, FLD_APPROVAL_LEN);
|
|
msg_field_set(msg.txn_date, rec.biz_date, FLD_TXN_DATE_LEN);
|
|
msg_field_set(msg.txn_time, "000000", FLD_TXN_TIME_LEN);
|
|
msg_field_set(msg.inst_month, "00", FLD_INST_LEN);
|
|
|
|
/* 금액은 우측정렬 zero-fill 숫자 필드 */
|
|
if (amount_format(rec.amount, amtfld, FLD_AMOUNT_LEN) != 0) {
|
|
tx_log(TX_LOG_ERROR, "[MG_OL_0002] 금액 포맷 실패 amount=%ld", rec.amount);
|
|
tx_return(ctx, TX_FAIL, ctx->out);
|
|
return;
|
|
}
|
|
memcpy(msg.amount, amtfld, FLD_AMOUNT_LEN);
|
|
|
|
/* 4) 원장 상태코드 -> 응답코드 매핑 */
|
|
if (strncmp(rec.status, MG_ST_DONE, 1) == 0 ||
|
|
strncmp(rec.status, MG_ST_SETTLED, 1) == 0)
|
|
msg_field_set(msg.resp_code, RESP_OK, FLD_RESP_LEN);
|
|
else if (strncmp(rec.status, MG_ST_FAIL, 1) == 0)
|
|
msg_field_set(msg.resp_code, RESP_INVALID, FLD_RESP_LEN);
|
|
else
|
|
msg_field_set(msg.resp_code, RESP_SYSERR, FLD_RESP_LEN);
|
|
|
|
/* 5) 고정길이 프레임으로 팩 */
|
|
if (msg_pack(&msg, raw, MSG_ACQ_LEN) != 0) {
|
|
tx_log(TX_LOG_ERROR, "[MG_OL_0002] 전문 팩 실패 key=%s", key);
|
|
tx_return(ctx, TX_FAIL, ctx->out);
|
|
return;
|
|
}
|
|
|
|
/* 6) RAWMSG(고정길이) 및 요약필드 반환 */
|
|
tx_buf_reset(ctx->out);
|
|
tx_buf_set(ctx->out, "RAWMSG", raw, MSG_ACQ_LEN);
|
|
tx_buf_setlong(ctx->out, "RAWLEN", (long)MSG_ACQ_LEN);
|
|
tx_buf_sets(ctx->out, "MSGTYPE", MSG_TYPE_RESP);
|
|
tx_buf_sets(ctx->out, "KEY", rec.key);
|
|
tx_buf_setlong(ctx->out, "AMOUNT", rec.amount);
|
|
|
|
/* 7) 송신 이력(mg_send_log)에 임베디드 SQL 로 기록 */
|
|
{
|
|
EXEC SQL BEGIN DECLARE SECTION;
|
|
char h_slog_key[16];
|
|
char h_slog_type[8];
|
|
long h_slog_amt;
|
|
EXEC SQL END DECLARE SECTION;
|
|
|
|
strncpy(h_slog_key, rec.key, sizeof(h_slog_key) - 1);
|
|
h_slog_key[sizeof(h_slog_key) - 1] = '\0';
|
|
strncpy(h_slog_type, MSG_TYPE_RESP, sizeof(h_slog_type) - 1);
|
|
h_slog_type[sizeof(h_slog_type) - 1] = '\0';
|
|
h_slog_amt = rec.amount;
|
|
|
|
if (tx_begin() == TX_OK) {
|
|
EXEC SQL INSERT INTO mg_send_log
|
|
(send_key, msg_type, send_amount, send_status)
|
|
VALUES (:h_slog_key, :h_slog_type, :h_slog_amt, 'S');
|
|
if (sqlca.sqlcode != TX_SQL_OK) {
|
|
TX_DBIO_LOG_ERR("INSERT mg_send_log");
|
|
tx_abort();
|
|
} else {
|
|
tx_commit();
|
|
}
|
|
}
|
|
}
|
|
|
|
tx_log(TX_LOG_INFO, "[MG_OL_0002] 응답전문 송신완료 key=%s len=%d amount=%ld",
|
|
rec.key, MSG_ACQ_LEN, rec.amount);
|
|
tx_return(ctx, TX_OK, ctx->out);
|
|
}
|