From b5a80f69cb2e2793e5134e23a0eb3e72cdbdbe0b Mon Sep 17 00:00:00 2001
From: "Somhairle H. Marisol" <muqiu-han@outlook.com>
Date: Tue, 22 Sep 2026 03:48:12 +0800
Subject: Add multi-source bond quote probe fields and daily fallback (3d-20)

---
 src/FundLab.Web/App.fs | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'src/FundLab.Web')

diff --git a/src/FundLab.Web/App.fs b/src/FundLab.Web/App.fs
index 7a0e56c..d18cff9 100644
--- a/src/FundLab.Web/App.fs
+++ b/src/FundLab.Web/App.fs
@@ -397,6 +397,9 @@ type RawBondQuote =
         code: string
         name: obj
         price: obj
+        cleanPrice: obj
+        accruedInterest: obj
+        date: obj
         maturityDate: obj
     }
 
@@ -727,6 +730,9 @@ type BondQuoteView =
         code: string
         name: string option
         price: string option
+        cleanPrice: string option
+        accruedInterest: string option
+        quoteDate: string option
         maturityDate: string option
     }
 
@@ -1081,6 +1087,9 @@ module Api =
             code = raw.code
             name = decodeOptionalText raw.name
             price = decodeOptionalText raw.price
+            cleanPrice = decodeOptionalText raw.cleanPrice
+            accruedInterest = decodeOptionalText raw.accruedInterest
+            quoteDate = decodeOptionalText raw.date
             maturityDate = decodeOptionalText raw.maturityDate
         }
 
@@ -4759,6 +4768,9 @@ let private bondsPanel model dispatch =
                             prop.children [
                                 bondQuoteMetric "名称" quote.name
                                 bondQuoteMetric "价格" quote.price
+                                bondQuoteMetric "净价" quote.cleanPrice
+                                bondQuoteMetric "应计利息" quote.accruedInterest
+                                bondQuoteMetric "行情日期" quote.quoteDate
                                 bondQuoteMetric "到期日" quote.maturityDate
                             ]
                         ]
-- 
cgit v1.2.3