다양화 Wave2: dbio 289 + common 120 고유화 + 프로그램 206개 EXEC SQL 심화
- 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>
This commit is contained in:
forge-bot
parent
c3a0259e95
commit
93c3cb74af
1111 changed files with 31539 additions and 17258 deletions
|
|
@ -100,9 +100,32 @@ struct sqlca_t *ECPGget_sqlca(void);
|
|||
|
||||
static int run_cm_bt_0015(const char *biz_date)
|
||||
{
|
||||
/* exec sql begin declare section */
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
#line 26 "app/batch/cm_bt_0015.pgc"
|
||||
char h_biz_date [ 9 ] ;
|
||||
|
||||
#line 27 "app/batch/cm_bt_0015.pgc"
|
||||
char h_merch_id [ 16 ] ;
|
||||
|
||||
#line 28 "app/batch/cm_bt_0015.pgc"
|
||||
long h_merch_cnt ;
|
||||
|
||||
#line 29 "app/batch/cm_bt_0015.pgc"
|
||||
long h_merch_sum ;
|
||||
/* exec sql end declare section */
|
||||
#line 30 "app/batch/cm_bt_0015.pgc"
|
||||
|
||||
|
||||
long n_recv, n_done, n_fail, n_settled, total;
|
||||
long sum_amt = 0;
|
||||
long merch_lines = 0;
|
||||
char won[32];
|
||||
char merch_won[32];
|
||||
int rc;
|
||||
|
||||
n_recv = cm_rec_count(biz_date, CM_ST_RECV);
|
||||
|
|
@ -139,6 +162,57 @@ static int run_cm_bt_0015(const char *biz_date)
|
|||
printf(" 거래총액 : %s\n", won);
|
||||
if (total > 0)
|
||||
printf(" 완료율 : %ld%%\n", (n_done * 100) / total);
|
||||
|
||||
/*
|
||||
* 가맹점별 상세 브레이크다운: cm_ledger 를 가맹점번호로 그룹집계하는
|
||||
* 커서를 순회하며 건수 내림차순으로 상위 가맹점을 리포트한다.
|
||||
*/
|
||||
strncpy(h_biz_date, biz_date, sizeof(h_biz_date) - 1);
|
||||
h_biz_date[sizeof(h_biz_date) - 1] = '\0';
|
||||
|
||||
ECPGset_var( 0, ( h_biz_date ), __LINE__);\
|
||||
/* declare cur_cm_bt_0015 cursor for select merch_id , count ( * ) , coalesce ( sum ( amount ) , 0 ) from cm_ledger where biz_date = $1 group by merch_id order by count ( * ) desc , merch_id */
|
||||
#line 86 "app/batch/cm_bt_0015.pgc"
|
||||
|
||||
#line 86 "app/batch/cm_bt_0015.pgc"
|
||||
|
||||
|
||||
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare cur_cm_bt_0015 cursor for select merch_id , count ( * ) , coalesce ( sum ( amount ) , 0 ) from cm_ledger where biz_date = $1 group by merch_id order by count ( * ) desc , merch_id",
|
||||
ECPGt_char,(h_biz_date),(long)9,(long)1,(9)*sizeof(char),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);}
|
||||
#line 88 "app/batch/cm_bt_0015.pgc"
|
||||
|
||||
if (sqlca.sqlcode != TX_SQL_OK) {
|
||||
TX_DBIO_LOG_ERR("cm_bt_0015 OPEN cur");
|
||||
} else {
|
||||
printf(" ----- 가맹점별 상세 -----\n");
|
||||
for (;;) {
|
||||
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "fetch cur_cm_bt_0015", ECPGt_EOIT,
|
||||
ECPGt_char,(h_merch_id),(long)16,(long)1,(16)*sizeof(char),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
|
||||
ECPGt_long,&(h_merch_cnt),(long)1,(long)1,sizeof(long),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
|
||||
ECPGt_long,&(h_merch_sum),(long)1,(long)1,sizeof(long),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
|
||||
#line 95 "app/batch/cm_bt_0015.pgc"
|
||||
|
||||
|
||||
if (sqlca.sqlcode == TX_SQL_NOTFOUND)
|
||||
break;
|
||||
if (sqlca.sqlcode != TX_SQL_OK) {
|
||||
TX_DBIO_LOG_ERR("cm_bt_0015 FETCH cur");
|
||||
break;
|
||||
}
|
||||
merch_lines++;
|
||||
amount_format_won(h_merch_sum, merch_won, sizeof(merch_won));
|
||||
printf(" %-12s 건수=%-6ld 금액=%s\n",
|
||||
h_merch_id, h_merch_cnt, merch_won);
|
||||
}
|
||||
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close cur_cm_bt_0015", ECPGt_EOIT, ECPGt_EORT);}
|
||||
#line 108 "app/batch/cm_bt_0015.pgc"
|
||||
|
||||
}
|
||||
printf(" 가맹점 수 : %ld\n", merch_lines);
|
||||
printf("=============================================\n");
|
||||
|
||||
return TX_OK;
|
||||
|
|
|
|||
|
|
@ -22,9 +22,18 @@ EXEC SQL INCLUDE sqlca;
|
|||
|
||||
static int run_cm_bt_0015(const char *biz_date)
|
||||
{
|
||||
EXEC SQL BEGIN DECLARE SECTION;
|
||||
char h_biz_date[9];
|
||||
char h_merch_id[16];
|
||||
long h_merch_cnt;
|
||||
long h_merch_sum;
|
||||
EXEC SQL END DECLARE SECTION;
|
||||
|
||||
long n_recv, n_done, n_fail, n_settled, total;
|
||||
long sum_amt = 0;
|
||||
long merch_lines = 0;
|
||||
char won[32];
|
||||
char merch_won[32];
|
||||
int rc;
|
||||
|
||||
n_recv = cm_rec_count(biz_date, CM_ST_RECV);
|
||||
|
|
@ -61,6 +70,44 @@ static int run_cm_bt_0015(const char *biz_date)
|
|||
printf(" 거래총액 : %s\n", won);
|
||||
if (total > 0)
|
||||
printf(" 완료율 : %ld%%\n", (n_done * 100) / total);
|
||||
|
||||
/*
|
||||
* 가맹점별 상세 브레이크다운: cm_ledger 를 가맹점번호로 그룹집계하는
|
||||
* 커서를 순회하며 건수 내림차순으로 상위 가맹점을 리포트한다.
|
||||
*/
|
||||
strncpy(h_biz_date, biz_date, sizeof(h_biz_date) - 1);
|
||||
h_biz_date[sizeof(h_biz_date) - 1] = '\0';
|
||||
|
||||
EXEC SQL DECLARE cur_cm_bt_0015 CURSOR FOR
|
||||
SELECT merch_id, count(*), coalesce(sum(amount), 0)
|
||||
FROM cm_ledger
|
||||
WHERE biz_date = :h_biz_date
|
||||
GROUP BY merch_id
|
||||
ORDER BY count(*) DESC, merch_id;
|
||||
|
||||
EXEC SQL OPEN cur_cm_bt_0015;
|
||||
if (sqlca.sqlcode != TX_SQL_OK) {
|
||||
TX_DBIO_LOG_ERR("cm_bt_0015 OPEN cur");
|
||||
} else {
|
||||
printf(" ----- 가맹점별 상세 -----\n");
|
||||
for (;;) {
|
||||
EXEC SQL FETCH cur_cm_bt_0015
|
||||
INTO :h_merch_id, :h_merch_cnt, :h_merch_sum;
|
||||
|
||||
if (sqlca.sqlcode == TX_SQL_NOTFOUND)
|
||||
break;
|
||||
if (sqlca.sqlcode != TX_SQL_OK) {
|
||||
TX_DBIO_LOG_ERR("cm_bt_0015 FETCH cur");
|
||||
break;
|
||||
}
|
||||
merch_lines++;
|
||||
amount_format_won(h_merch_sum, merch_won, sizeof(merch_won));
|
||||
printf(" %-12s 건수=%-6ld 금액=%s\n",
|
||||
h_merch_id, h_merch_cnt, merch_won);
|
||||
}
|
||||
EXEC SQL CLOSE cur_cm_bt_0015;
|
||||
}
|
||||
printf(" 가맹점 수 : %ld\n", merch_lines);
|
||||
printf("=============================================\n");
|
||||
|
||||
return TX_OK;
|
||||
|
|
|
|||
|
|
@ -107,12 +107,37 @@ static long mg_pct_x10(long part, long whole)
|
|||
|
||||
static int run_mg_bt_0005(const char *biz_date)
|
||||
{
|
||||
/* exec sql begin declare section */
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
#line 33 "app/batch/mg_bt_0005.pgc"
|
||||
char h_bd [ 9 ] ;
|
||||
|
||||
#line 34 "app/batch/mg_bt_0005.pgc"
|
||||
char h_merch [ 16 ] ;
|
||||
|
||||
#line 35 "app/batch/mg_bt_0005.pgc"
|
||||
long h_mcnt ;
|
||||
|
||||
#line 36 "app/batch/mg_bt_0005.pgc"
|
||||
long h_msum ;
|
||||
/* exec sql end declare section */
|
||||
#line 37 "app/batch/mg_bt_0005.pgc"
|
||||
|
||||
|
||||
long c_recv, c_done, c_fail, c_settled, total;
|
||||
long sum_amt = 0;
|
||||
long rate;
|
||||
int rc;
|
||||
int shown;
|
||||
char amtbuf[32];
|
||||
|
||||
strncpy(h_bd, biz_date, sizeof(h_bd) - 1);
|
||||
h_bd[sizeof(h_bd) - 1] = '\0';
|
||||
|
||||
c_recv = mg_rec_count(biz_date, MG_ST_RECV);
|
||||
c_done = mg_rec_count(biz_date, MG_ST_DONE);
|
||||
c_fail = mg_rec_count(biz_date, MG_ST_FAIL);
|
||||
|
|
@ -149,6 +174,55 @@ static int run_mg_bt_0005(const char *biz_date)
|
|||
printf(" 처리율 : %ld.%ld%%\n", rate / 10, rate % 10);
|
||||
printf("=============================================\n");
|
||||
|
||||
/* 가맹점별 거래 상위 내역을 커서로 순회하여 부가 리포트 출력 */
|
||||
ECPGset_var( 0, ( h_bd ), __LINE__);\
|
||||
/* declare cur_mg_bt_0005 cursor for select merch_id , count ( * ) , coalesce ( SUM ( amount ) , 0 ) from mg_ledger where biz_date = $1 group by merch_id order by 3 desc */
|
||||
#line 91 "app/batch/mg_bt_0005.pgc"
|
||||
|
||||
#line 91 "app/batch/mg_bt_0005.pgc"
|
||||
|
||||
|
||||
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "declare cur_mg_bt_0005 cursor for select merch_id , count ( * ) , coalesce ( SUM ( amount ) , 0 ) from mg_ledger where biz_date = $1 group by merch_id order by 3 desc",
|
||||
ECPGt_char,(h_bd),(long)9,(long)1,(9)*sizeof(char),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT, ECPGt_EORT);}
|
||||
#line 93 "app/batch/mg_bt_0005.pgc"
|
||||
|
||||
if (sqlca.sqlcode != TX_SQL_OK) {
|
||||
TX_DBIO_LOG_ERR("OPEN cur_mg_bt_0005");
|
||||
return TX_OK; /* 부가 리포트 실패는 배치 성공에 영향 없음 */
|
||||
}
|
||||
|
||||
printf("---------- 가맹점별 거래 상위 (mg_bt_0005) ----------\n");
|
||||
shown = 0;
|
||||
for (;;) {
|
||||
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "fetch cur_mg_bt_0005", ECPGt_EOIT,
|
||||
ECPGt_char,(h_merch),(long)16,(long)1,(16)*sizeof(char),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
|
||||
ECPGt_long,&(h_mcnt),(long)1,(long)1,sizeof(long),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
|
||||
ECPGt_long,&(h_msum),(long)1,(long)1,sizeof(long),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
|
||||
#line 102 "app/batch/mg_bt_0005.pgc"
|
||||
|
||||
if (sqlca.sqlcode == TX_SQL_NOTFOUND)
|
||||
break;
|
||||
if (sqlca.sqlcode != TX_SQL_OK) {
|
||||
TX_DBIO_LOG_ERR("FETCH cur_mg_bt_0005");
|
||||
break;
|
||||
}
|
||||
if (shown < 10) {
|
||||
amount_format_won(h_msum, amtbuf, sizeof(amtbuf));
|
||||
printf(" %-14s 건수=%-6ld 금액=%s\n", h_merch, h_mcnt, amtbuf);
|
||||
}
|
||||
shown++;
|
||||
}
|
||||
printf(" (가맹점 수: %d)\n", shown);
|
||||
printf("=============================================\n");
|
||||
|
||||
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "close cur_mg_bt_0005", ECPGt_EOIT, ECPGt_EORT);}
|
||||
#line 118 "app/batch/mg_bt_0005.pgc"
|
||||
|
||||
|
||||
return TX_OK;
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -29,12 +29,23 @@ static long mg_pct_x10(long part, long whole)
|
|||
|
||||
static int run_mg_bt_0005(const char *biz_date)
|
||||
{
|
||||
EXEC SQL BEGIN DECLARE SECTION;
|
||||
char h_bd[9];
|
||||
char h_merch[16];
|
||||
long h_mcnt;
|
||||
long h_msum;
|
||||
EXEC SQL END DECLARE SECTION;
|
||||
|
||||
long c_recv, c_done, c_fail, c_settled, total;
|
||||
long sum_amt = 0;
|
||||
long rate;
|
||||
int rc;
|
||||
int shown;
|
||||
char amtbuf[32];
|
||||
|
||||
strncpy(h_bd, biz_date, sizeof(h_bd) - 1);
|
||||
h_bd[sizeof(h_bd) - 1] = '\0';
|
||||
|
||||
c_recv = mg_rec_count(biz_date, MG_ST_RECV);
|
||||
c_done = mg_rec_count(biz_date, MG_ST_DONE);
|
||||
c_fail = mg_rec_count(biz_date, MG_ST_FAIL);
|
||||
|
|
@ -71,6 +82,41 @@ static int run_mg_bt_0005(const char *biz_date)
|
|||
printf(" 처리율 : %ld.%ld%%\n", rate / 10, rate % 10);
|
||||
printf("=============================================\n");
|
||||
|
||||
/* 가맹점별 거래 상위 내역을 커서로 순회하여 부가 리포트 출력 */
|
||||
EXEC SQL DECLARE cur_mg_bt_0005 CURSOR FOR
|
||||
SELECT merch_id, COUNT(*), COALESCE(SUM(amount), 0)
|
||||
FROM mg_ledger
|
||||
WHERE biz_date = :h_bd
|
||||
GROUP BY merch_id
|
||||
ORDER BY 3 DESC;
|
||||
|
||||
EXEC SQL OPEN cur_mg_bt_0005;
|
||||
if (sqlca.sqlcode != TX_SQL_OK) {
|
||||
TX_DBIO_LOG_ERR("OPEN cur_mg_bt_0005");
|
||||
return TX_OK; /* 부가 리포트 실패는 배치 성공에 영향 없음 */
|
||||
}
|
||||
|
||||
printf("---------- 가맹점별 거래 상위 (mg_bt_0005) ----------\n");
|
||||
shown = 0;
|
||||
for (;;) {
|
||||
EXEC SQL FETCH cur_mg_bt_0005 INTO :h_merch, :h_mcnt, :h_msum;
|
||||
if (sqlca.sqlcode == TX_SQL_NOTFOUND)
|
||||
break;
|
||||
if (sqlca.sqlcode != TX_SQL_OK) {
|
||||
TX_DBIO_LOG_ERR("FETCH cur_mg_bt_0005");
|
||||
break;
|
||||
}
|
||||
if (shown < 10) {
|
||||
amount_format_won(h_msum, amtbuf, sizeof(amtbuf));
|
||||
printf(" %-14s 건수=%-6ld 금액=%s\n", h_merch, h_mcnt, amtbuf);
|
||||
}
|
||||
shown++;
|
||||
}
|
||||
printf(" (가맹점 수: %d)\n", shown);
|
||||
printf("=============================================\n");
|
||||
|
||||
EXEC SQL CLOSE cur_mg_bt_0005;
|
||||
|
||||
return TX_OK;
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -101,11 +101,35 @@ struct sqlca_t *ECPGget_sqlca(void);
|
|||
|
||||
static int run_rc_bt_0006(const char *biz_date)
|
||||
{
|
||||
/* exec sql begin declare section */
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
#line 27 "app/batch/rc_bt_0006.pgc"
|
||||
char h_bd [ 9 ] ;
|
||||
|
||||
#line 28 "app/batch/rc_bt_0006.pgc"
|
||||
long h_db_total ;
|
||||
|
||||
#line 29 "app/batch/rc_bt_0006.pgc"
|
||||
long h_db_unmatch ;
|
||||
|
||||
#line 30 "app/batch/rc_bt_0006.pgc"
|
||||
long h_db_sum ;
|
||||
/* exec sql end declare section */
|
||||
#line 31 "app/batch/rc_bt_0006.pgc"
|
||||
|
||||
|
||||
long cntR, cntM, cntU, cntS;
|
||||
long total, processed;
|
||||
long proc_rate, settle_rate, fail_rate;
|
||||
int mismatch;
|
||||
|
||||
strncpy(h_bd, biz_date, sizeof(h_bd) - 1);
|
||||
h_bd[sizeof(h_bd) - 1] = '\0';
|
||||
|
||||
/* 상태별 건수 조회 (읽기전용) */
|
||||
cntR = rc_rec_count(biz_date, RC_ST_RECV);
|
||||
cntM = rc_rec_count(biz_date, RC_ST_DONE);
|
||||
|
|
@ -166,6 +190,47 @@ static int run_rc_bt_0006(const char *biz_date)
|
|||
printf(" 미처리 여부 : %s\n", mismatch ? "미처리(접수 잔량)" : "완료");
|
||||
printf("===============================================\n");
|
||||
|
||||
/* 원장에서 직접 총건수/불일치건수/총금액을 임베디드 SQL 로 교차집계 */
|
||||
h_db_total = 0;
|
||||
h_db_unmatch = 0;
|
||||
h_db_sum = 0;
|
||||
|
||||
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select count ( * ) , coalesce ( SUM ( amount ) , 0 ) from rc_ledger where biz_date = $1 ",
|
||||
ECPGt_char,(h_bd),(long)9,(long)1,(9)*sizeof(char),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT,
|
||||
ECPGt_long,&(h_db_total),(long)1,(long)1,sizeof(long),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L,
|
||||
ECPGt_long,&(h_db_sum),(long)1,(long)1,sizeof(long),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
|
||||
#line 109 "app/batch/rc_bt_0006.pgc"
|
||||
|
||||
if (sqlca.sqlcode != TX_SQL_OK && sqlca.sqlcode != TX_SQL_NOTFOUND) {
|
||||
TX_DBIO_LOG_ERR("SELECT rc_ledger dbtotal (rc_bt_0006)");
|
||||
return TX_EDB;
|
||||
}
|
||||
|
||||
{ ECPGdo(__LINE__, 0, 1, NULL, 0, ECPGst_normal, "select count ( * ) from rc_ledger where biz_date = $1 and status = 'U'",
|
||||
ECPGt_char,(h_bd),(long)9,(long)1,(9)*sizeof(char),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EOIT,
|
||||
ECPGt_long,&(h_db_unmatch),(long)1,(long)1,sizeof(long),
|
||||
ECPGt_NO_INDICATOR, NULL , 0L, 0L, 0L, ECPGt_EORT);}
|
||||
#line 119 "app/batch/rc_bt_0006.pgc"
|
||||
|
||||
if (sqlca.sqlcode != TX_SQL_OK && sqlca.sqlcode != TX_SQL_NOTFOUND) {
|
||||
TX_DBIO_LOG_ERR("SELECT rc_ledger unmatch (rc_bt_0006)");
|
||||
return TX_EDB;
|
||||
}
|
||||
|
||||
printf("------- 원장 직접 교차집계 (rc_bt_0006) -------\n");
|
||||
printf(" DB 총건수 : %ld\n", h_db_total);
|
||||
printf(" DB 불일치건수 : %ld\n", h_db_unmatch);
|
||||
printf(" DB 총금액 : %ld\n", h_db_sum);
|
||||
if (h_db_total != total)
|
||||
tx_log(TX_LOG_WARN,
|
||||
"[rc_bt_0006] 집계 교차검증 상이 count=%ld db=%ld",
|
||||
total, h_db_total);
|
||||
printf("===============================================\n");
|
||||
|
||||
return TX_OK;
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -23,11 +23,21 @@ EXEC SQL INCLUDE sqlca;
|
|||
|
||||
static int run_rc_bt_0006(const char *biz_date)
|
||||
{
|
||||
EXEC SQL BEGIN DECLARE SECTION;
|
||||
char h_bd[9];
|
||||
long h_db_total;
|
||||
long h_db_unmatch;
|
||||
long h_db_sum;
|
||||
EXEC SQL END DECLARE SECTION;
|
||||
|
||||
long cntR, cntM, cntU, cntS;
|
||||
long total, processed;
|
||||
long proc_rate, settle_rate, fail_rate;
|
||||
int mismatch;
|
||||
|
||||
strncpy(h_bd, biz_date, sizeof(h_bd) - 1);
|
||||
h_bd[sizeof(h_bd) - 1] = '\0';
|
||||
|
||||
/* 상태별 건수 조회 (읽기전용) */
|
||||
cntR = rc_rec_count(biz_date, RC_ST_RECV);
|
||||
cntM = rc_rec_count(biz_date, RC_ST_DONE);
|
||||
|
|
@ -88,6 +98,40 @@ static int run_rc_bt_0006(const char *biz_date)
|
|||
printf(" 미처리 여부 : %s\n", mismatch ? "미처리(접수 잔량)" : "완료");
|
||||
printf("===============================================\n");
|
||||
|
||||
/* 원장에서 직접 총건수/불일치건수/총금액을 임베디드 SQL 로 교차집계 */
|
||||
h_db_total = 0;
|
||||
h_db_unmatch = 0;
|
||||
h_db_sum = 0;
|
||||
|
||||
EXEC SQL SELECT COUNT(*), COALESCE(SUM(amount), 0)
|
||||
INTO :h_db_total, :h_db_sum
|
||||
FROM rc_ledger
|
||||
WHERE biz_date = :h_bd;
|
||||
if (sqlca.sqlcode != TX_SQL_OK && sqlca.sqlcode != TX_SQL_NOTFOUND) {
|
||||
TX_DBIO_LOG_ERR("SELECT rc_ledger dbtotal (rc_bt_0006)");
|
||||
return TX_EDB;
|
||||
}
|
||||
|
||||
EXEC SQL SELECT COUNT(*)
|
||||
INTO :h_db_unmatch
|
||||
FROM rc_ledger
|
||||
WHERE biz_date = :h_bd
|
||||
AND status = 'U';
|
||||
if (sqlca.sqlcode != TX_SQL_OK && sqlca.sqlcode != TX_SQL_NOTFOUND) {
|
||||
TX_DBIO_LOG_ERR("SELECT rc_ledger unmatch (rc_bt_0006)");
|
||||
return TX_EDB;
|
||||
}
|
||||
|
||||
printf("------- 원장 직접 교차집계 (rc_bt_0006) -------\n");
|
||||
printf(" DB 총건수 : %ld\n", h_db_total);
|
||||
printf(" DB 불일치건수 : %ld\n", h_db_unmatch);
|
||||
printf(" DB 총금액 : %ld\n", h_db_sum);
|
||||
if (h_db_total != total)
|
||||
tx_log(TX_LOG_WARN,
|
||||
"[rc_bt_0006] 집계 교차검증 상이 count=%ld db=%ld",
|
||||
total, h_db_total);
|
||||
printf("===============================================\n");
|
||||
|
||||
return TX_OK;
|
||||
}
|
||||
|
||||
|
|
|
|||
Reference in a new issue