/* Processed by ecpg (15.18 (Debian 15.18-0+deb12u1)) */ /* These include files are added by the preprocessor */ #include #include #include /* End of automatic include section */ #line 1 "app/online/rc_ol_0031.pgc" /* @tier medium @module rc @transform reconciliation-online */ /* * rc_ol_0031.pgc - 대사 진행률 조회 온라인 서비스 (RC_OL_0031) * * 요청 영업일(BIZDATE)에 대해 상태별 원장 건수를 집계하여 대사 처리의 * 진행률과 완료율, 잔여 미처리 건수를 산출한다. * 상태별로 rc_rec_count 를 호출한다: * 접수('R'), 매입확정('M'), 불일치('U'), 정산완료('S'). * * 업무규칙: * - total = 접수 + 매입확정 + 불일치 + 정산완료 (0 방어) * - 처리완료 PROCESSED = 매입확정 + 불일치 + 정산완료 (접수를 제외한 건) * - 진행률 PROGRESS = PROCESSED * 100 / total * - 최종완료율 COMPLETION = 정산완료 * 100 / total * - 잔여 PENDING = 접수('R') 건수 * * 응답: BIZDATE, TOTAL, PROCESSED, PROGRESS, COMPLETION, PENDING * * 비고: * - PROGRESS 는 "접수를 벗어난" 모든 건(매입/불일치/정산) 을 처리로 보고, * COMPLETION 은 최종 정산완료('S') 만을 완료로 본다. 따라서 항상 * COMPLETION <= PROGRESS 관계가 성립한다. * - 상태별 집계 API 만 사용하며 커서를 열지 않는다 (읽기 전용). */ #include #include #include "txcore.h" #include "txcore_dbio.h" #include "acq_util.h" #include "rc_core.h" #line 1 "/usr/include/postgresql/sqlca.h" #ifndef POSTGRES_SQLCA_H #define POSTGRES_SQLCA_H #ifndef PGDLLIMPORT #if defined(WIN32) || defined(__CYGWIN__) #define PGDLLIMPORT __declspec (dllimport) #else #define PGDLLIMPORT #endif /* __CYGWIN__ */ #endif /* PGDLLIMPORT */ #define SQLERRMC_LEN 150 #ifdef __cplusplus extern "C" { #endif struct sqlca_t { char sqlcaid[8]; long sqlabc; long sqlcode; struct { int sqlerrml; char sqlerrmc[SQLERRMC_LEN]; } sqlerrm; char sqlerrp[8]; long sqlerrd[6]; /* Element 0: empty */ /* 1: OID of processed tuple if applicable */ /* 2: number of rows processed */ /* after an INSERT, UPDATE or */ /* DELETE statement */ /* 3: empty */ /* 4: empty */ /* 5: empty */ char sqlwarn[8]; /* Element 0: set to 'W' if at least one other is 'W' */ /* 1: if 'W' at least one character string */ /* value was truncated when it was */ /* stored into a host variable. */ /* * 2: if 'W' a (hopefully) non-fatal notice occurred */ /* 3: empty */ /* 4: empty */ /* 5: empty */ /* 6: empty */ /* 7: empty */ char sqlstate[5]; }; struct sqlca_t *ECPGget_sqlca(void); #ifndef POSTGRES_ECPG_INTERNAL #define sqlca (*ECPGget_sqlca()) #endif #ifdef __cplusplus } #endif #endif #line 33 "app/online/rc_ol_0031.pgc" TX_SERVICE(RC_OL_0031, ctx) { char bizdate[16]; long cnt_r, cnt_m, cnt_u, cnt_s; long total, processed; long progress; /* 처리 진행률 (%) */ long completion; /* 최종 완료율 (%) */ long pending; /* 잔여 접수 건수 */ tx_log(TX_LOG_INFO, "[RC_OL_0031] 대사 진행률 조회 서비스 진입"); if (tx_buf_get(ctx->in, "BIZDATE", bizdate, sizeof(bizdate)) != TX_OK) { tx_log(TX_LOG_ERROR, "[RC_OL_0031] BIZDATE 누락"); tx_return(ctx, TX_EINVAL, ctx->out); return; } if (!date_is_valid(bizdate)) { tx_log(TX_LOG_WARN, "[RC_OL_0031] 영업일 형식 오류 date=%s", bizdate); tx_return(ctx, TX_EINVAL, ctx->out); return; } cnt_r = rc_rec_count(bizdate, RC_ST_RECV); cnt_m = rc_rec_count(bizdate, RC_ST_DONE); cnt_u = rc_rec_count(bizdate, RC_ST_FAIL); cnt_s = rc_rec_count(bizdate, RC_ST_SETTLED); if (cnt_r < 0 || cnt_m < 0 || cnt_u < 0 || cnt_s < 0) { tx_log(TX_LOG_ERROR, "[RC_OL_0031] 건수 집계 실패 date=%s R=%ld M=%ld U=%ld S=%ld", bizdate, cnt_r, cnt_m, cnt_u, cnt_s); tx_return(ctx, TX_EDB, ctx->out); return; } total = cnt_r + cnt_m + cnt_u + cnt_s; processed = cnt_m + cnt_u + cnt_s; /* 접수를 제외한 처리 진행 건 */ pending = cnt_r; /* 상태 내역을 감사 로그로 남겨 진행 추이를 추적한다. */ tx_log(TX_LOG_INFO, "[RC_OL_0031] 상태내역 date=%s 접수=%ld 매입=%ld 불일치=%ld 정산=%ld", bizdate, cnt_r, cnt_m, cnt_u, cnt_s); /* --- 진행률/완료율 산출 (0 나눗셈 방어) --- */ if (total > 0) { progress = processed * 100 / total; completion = cnt_s * 100 / total; } else { progress = 0; completion = 0; tx_log(TX_LOG_WARN, "[RC_OL_0031] 대상 원장 없음 date=%s → 진행률 0%%", bizdate); } tx_log(TX_LOG_INFO, "[RC_OL_0031] date=%s 총=%ld 처리=%ld 진행률=%ld%% 완료율=%ld%% 잔여=%ld", bizdate, total, processed, progress, completion, pending); /* --- 진행 단계별 정성 상태를 로그로 남긴다 (응답에는 미포함) --- */ if (total == 0) tx_log(TX_LOG_INFO, "[RC_OL_0031] 단계=대상없음"); else if (pending == 0 && completion >= 100) tx_log(TX_LOG_INFO, "[RC_OL_0031] 단계=정산마감 (100%% 완료)"); else if (pending == 0) tx_log(TX_LOG_INFO, "[RC_OL_0031] 단계=대사완료 정산진행 (완료율 %ld%%)", completion); else if (progress >= 50) tx_log(TX_LOG_INFO, "[RC_OL_0031] 단계=진행중 (진행률 %ld%% 잔여 %ld건)", progress, pending); else tx_log(TX_LOG_WARN, "[RC_OL_0031] 단계=초기 (진행률 %ld%% 잔여 %ld건)", progress, pending); tx_buf_reset(ctx->out); tx_buf_sets(ctx->out, "BIZDATE", bizdate); tx_buf_setlong(ctx->out, "TOTAL", total); tx_buf_setlong(ctx->out, "PROCESSED", processed); tx_buf_setlong(ctx->out, "PROGRESS", progress); tx_buf_setlong(ctx->out, "COMPLETION", completion); tx_buf_setlong(ctx->out, "PENDING", pending); /* 잔여 미처리(접수 'R') 건수를 원장에서 직접 임베디드 SQL 로 집계 (DBPENDING) */ { /* exec sql begin declare section */ #line 122 "app/online/rc_ol_0031.pgc" char h_r31_bd [ 9 ] ; #line 123 "app/online/rc_ol_0031.pgc" long h_r31_pend ; /* exec sql end declare section */ #line 124 "app/online/rc_ol_0031.pgc" strncpy(h_r31_bd, bizdate, sizeof(h_r31_bd) - 1); h_r31_bd[sizeof(h_r31_bd) - 1] = '\0'; h_r31_pend = 0; { ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select count ( * ) from rc_ledger where biz_date = $1 and status = 'R'", ECPGt_char,(h_r31_bd),(long)9,(long)1,(9)*sizeof(char), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_long,&(h_r31_pend),(long)1,(long)1,sizeof(long), ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);} #line 134 "app/online/rc_ol_0031.pgc" if (sqlca.sqlcode != TX_SQL_OK && sqlca.sqlcode != TX_SQL_NOTFOUND) { TX_DBIO_LOG_ERR("SELECT rc_ledger dbpending"); h_r31_pend = pending; } tx_buf_setlong(ctx->out, "DBPENDING", h_r31_pend); } tx_log(TX_LOG_INFO, "[RC_OL_0031] 대사 진행률 조회 서비스 정상 종료 date=%s", bizdate); tx_return(ctx, TX_OK, ctx->out); }