diff options
Diffstat (limited to 'src/FundLab.Api/App.fs')
| -rw-r--r-- | src/FundLab.Api/App.fs | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/FundLab.Api/App.fs b/src/FundLab.Api/App.fs index 4313329..82f695e 100644 --- a/src/FundLab.Api/App.fs +++ b/src/FundLab.Api/App.fs @@ -364,8 +364,12 @@ type MarketProbes = type BondQuoteApiResponse = { code: string + sourceRevision: string name: string option price: string option + cleanPrice: string option + accruedInterest: string option + date: string option maturityDate: string option } @@ -1744,8 +1748,12 @@ module App = | Ok quote -> json ({ code = quote.Code + sourceRevision = quote.SourceRevision name = quote.Name price = quote.Price |> Option.map decimalText + cleanPrice = quote.CleanPrice |> Option.map decimalText + accruedInterest = quote.AccruedInterest |> Option.map decimalText + date = quote.Date |> Option.map dateText maturityDate = quote.MaturityDate |> Option.map dateText } : BondQuoteApiResponse) next |