From d2a547b6a60ea769092894fff1f2b5105954f226 Mon Sep 17 00:00:00 2001 From: "Somhairle H. Marisol" Date: Mon, 21 Sep 2026 12:38:56 +0800 Subject: Drive SIP plans through the shared order pipeline (3d-6) MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Advance executes due periods as real subscription orders: each due trade date claims a sip_executions row (PRIMARY KEY plan_id+trade_date makes same-plan same-day runs atomic), places the order through CreateSubscriptionOrder with a deterministic idempotency key (sip:{plan}:{date}) and the period's trade date, then confirms through the shared ConfirmSubscriptionOrder pipeline with key sip-confirm:{plan}:{date} — identical freeze/fee/units math as manual orders, nothing bypasses confirmation. Outcomes: succeeded, pending_nav (cash stays frozen; later drives retry the confirmation once the NAV lands), insufficient_cash (no order placed, period fails visibly, reruns keep the marker), failed. Plans roll their next_trade_date past the processed window and repeats of the same endDate replay recorded executions instead of re-debiting. Domain adds SipPolicy.advancePlan (due-date enumeration; weekends-only trading-calendar approximation, noted in code). POST /funds/{id}/sip/advance {endDate?, limit?} drives execution on demand (no daemon). Plan responses/rows now carry last execution status/date; front-end shows 已执行/待净值/现金不足 per plan. Optional tradeDateOverride/anchorOverride keep manual flows untouched. --- tests/FundLab.Domain.Tests/DomainTests.fs | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) (limited to 'tests/FundLab.Domain.Tests') diff --git a/tests/FundLab.Domain.Tests/DomainTests.fs b/tests/FundLab.Domain.Tests/DomainTests.fs index 13be13f..42dd2a5 100644 --- a/tests/FundLab.Domain.Tests/DomainTests.fs +++ b/tests/FundLab.Domain.Tests/DomainTests.fs @@ -621,3 +621,25 @@ module SipPolicyTests = Assert.Equal(Ok 200.00m, SipPolicy.executionNetAmount 200.00m) Assert.Equal(Error "sip amount must be positive", SipPolicy.executionNetAmount 0m) + + [] + let ``advance plan enumerates due dates up to the end date`` () = + let anchor = d 2026 9 21 + + Assert.Equal( + [ d 2026 9 28; d 2026 10 5; d 2026 10 12 ], + SipPolicy.advancePlan Weekly anchor (d 2026 9 28) (d 2026 10 12) + ) + + Assert.Equal([ d 2026 9 28 ], SipPolicy.advancePlan Weekly anchor (d 2026 9 28) (d 2026 9 30)) + Assert.Equal([], SipPolicy.advancePlan Weekly anchor (d 2026 10 5) (d 2026 9 30)) + + [] + let ``advance plan never emits weekend dates`` () = + let anchor = d 2026 1 31 + + let dates = SipPolicy.advancePlan Monthly anchor (d 2026 2 2) (d 2026 5 31) + + Assert.All(dates, fun (date: DateOnly) -> Assert.NotEqual(DayOfWeek.Saturday, date.DayOfWeek); Assert.NotEqual(DayOfWeek.Sunday, date.DayOfWeek)) + Assert.Contains(d 2026 3 2, dates) + Assert.Equal(4, dates.Length) -- cgit v1.2.3