/* @tier medium @module py @transform payment-batch */ /* * py_bt_0014.pgc - 미지급 대기건 정리 배치 (장기 대기건 실효) [tier=medium] * * 배치 main 엔트리 포함. 실행: py_bt_0014 [db@host] */ #include #include #include #include "txcore.h" #include "txcore_dbio.h" #include "acq_util.h" #include "py_core.h" EXEC SQL INCLUDE sqlca; static int run_py_bt_0014(const char *biz_date) { EXEC SQL BEGIN DECLARE SECTION; char h_cutoff[9]; int h_cnt, h_aff; EXEC SQL END DECLARE SECTION; strncpy(h_cutoff, biz_date, 8); h_cutoff[8] = '\0'; EXEC SQL SELECT count(*) INTO :h_cnt FROM py_ledger WHERE status = 'R' AND biz_date < :h_cutoff; if (sqlca.sqlcode != TX_SQL_OK) { TX_DBIO_LOG_ERR("py_bt_0014 집계"); return TX_EDB; } if (tx_begin() != TX_OK) tx_log(TX_LOG_WARN, "[py_bt_0014] tx_begin 경고"); EXEC SQL UPDATE py_ledger SET status = 'U', upd_ts = now() WHERE status = 'R' AND biz_date < :h_cutoff; if (sqlca.sqlcode != TX_SQL_OK) { TX_DBIO_LOG_ERR("py_bt_0014 실효"); tx_abort(); return TX_EDB; } h_aff = (int)sqlca.sqlerrd[2]; tx_commit(); printf("===== 미지급 대기건 정리 [py_bt_0014] 기준일<%s =====\n", biz_date); printf(" 대상(R)=%d 실효처리=%d\n", h_cnt, h_aff); tx_log(TX_LOG_INFO, "[py_bt_0014] 미지급 실효 %d건", h_aff); return TX_OK; } int main(int argc, char **argv) { const char *biz_date; const char *target; int rc; tx_set_loglevel(TX_LOG_INFO); if (argc < 2) { fprintf(stderr, "사용법: %s [db@host]\n", argv[0]); return 2; } biz_date = argv[1]; target = (argc >= 3) ? argv[2] : NULL; if (!date_is_valid(biz_date)) { fprintf(stderr, "오류: 유효하지 않은 영업일 '%s'\n", biz_date); return 2; } tx_log(TX_LOG_INFO, "[py_bt_0014] 배치 시작 date=%s", biz_date); rc = py_dbio_connect(target); if (rc != TX_OK) { tx_log(TX_LOG_ERROR, "[py_bt_0014] DB 접속 실패 rc=%d", rc); return 1; } rc = run_py_bt_0014(biz_date); py_dbio_disconnect(); tx_log(TX_LOG_INFO, "[py_bt_0014] 배치 종료 rc=%d(%s)", rc, tx_strerror(rc)); return (rc == TX_OK) ? 0 : 1; }