다양화 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:
parent
c3a0259e95
commit
93c3cb74af
1111 changed files with 31539 additions and 17258 deletions
|
|
@ -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;
|
||||
}
|
||||
|
||||
|
|
|
|||
Reference in a new issue