93c3cb74af
- 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>
49 lines
1.3 KiB
C
49 lines
1.3 KiB
C
/* @tier medium @module cl @transform closing-util */
|
|
/*
|
|
* cl_cu_0007.c - 마감 공통 유틸리티 (plain C) [tier=medium]
|
|
*/
|
|
#include "cl_cu_0007.h"
|
|
|
|
#include <string.h>
|
|
|
|
/* 할부 분할 수수료: rate_bp 를 할부개월(1..60)로 보고 회차수수료 산정 */
|
|
long cl_cu_0007_fee(long amount, int rate_bp)
|
|
{
|
|
long n, per;
|
|
if (amount <= 0)
|
|
return 0;
|
|
n = rate_bp <= 0 ? 1 : (rate_bp > 60 ? 60 : rate_bp);
|
|
per = amount / n;
|
|
if (amount % n != 0)
|
|
per += 1;
|
|
return per;
|
|
}
|
|
|
|
/* 반올림(0.5 초과에서만 올림, 정확히 0.5는 내림)으로 unit 정규화 */
|
|
long cl_cu_0007_round_unit(long amount, long unit)
|
|
{
|
|
long q, r;
|
|
if (unit <= 0)
|
|
return amount;
|
|
q = amount / unit;
|
|
r = amount - q * unit;
|
|
if (r < 0) { r += unit; q -= 1; }
|
|
if (r * 2 > unit)
|
|
q += 1;
|
|
return q * unit;
|
|
}
|
|
|
|
/* 날짜 산술: amount 를 YYYYMMDD 로 보고 Zeller 공식으로 요일 분류(0=일..6=토) */
|
|
int cl_cu_0007_classify(long amount)
|
|
{
|
|
int y = (int)(amount / 10000L);
|
|
int m = (int)((amount / 100L) % 100L);
|
|
int d = (int)(amount % 100L);
|
|
int k, j, h;
|
|
if (m < 1 || m > 12 || d < 1 || d > 31)
|
|
return -1;
|
|
if (m < 3) { m += 12; y -= 1; }
|
|
k = y % 100; j = y / 100;
|
|
h = (d + (13 * (m + 1)) / 5 + k + k / 4 + j / 4 + 5 * j) % 7;
|
|
return (h + 6) % 7;
|
|
}
|