다양화 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 2026-07-19 04:54:59 +00:00
parent c3a0259e95
commit 93c3cb74af
1111 changed files with 31539 additions and 17258 deletions

View file

@ -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;
}