Safe Haskell	None
Language	Haskell2010

Accounts

Synopsis

data Account = Account {
- accBalance :: Balance
- accName :: String
- accInterest :: Maybe InterestInfo
- accType :: Maybe ReserveAmount
- accStmt :: Maybe Statement
}
data ReserveAmount
- = PctReserve DealStats Rate
- | FixReserve Balance
- | Either Pre ReserveAmount ReserveAmount
- | Max [ReserveAmount]
- | Min [ReserveAmount]
draw :: Amount -> Date -> TxnComment -> Account -> Account
deposit :: Amount -> Date -> TxnComment -> Account -> Account
transfer :: (Account, Account) -> Date -> Amount -> (Account, Account)
depositInt :: Date -> Account -> Account
data InterestInfo
- = BankAccount IRate DatePattern Date
- | InvestmentAccount Index Spread DatePattern DatePattern Date IRate
buildEarnIntAction :: [Account] -> Date -> [(String, Dates)] -> [(String, Dates)]
accBalLens :: Lens' Account Balance
tryDraw :: Amount -> Date -> TxnComment -> Account -> ((Amount, Amount), Account)
buildRateResetDates :: Date -> Account -> Maybe (String, Dates)
accrueInt :: Date -> Account -> Balance
accTypeLens :: Lens' Account (Maybe ReserveAmount)

Documentation

data Account Source #

Constructors

Account
Fields accBalance :: Balance account current balance accName :: String account name accInterest :: Maybe InterestInfo account reinvestment interest accType :: Maybe ReserveAmount target info if a reserve account accStmt :: Maybe Statement transactional history

Instances

Instances details

UseRate Account Source #

Instance details

Defined in Accounts

Methods

isAdjustbleRate :: Account -> Bool Source #

getIndex :: Account -> Maybe Index Source #

getIndexes :: Account -> Maybe [Index] Source #

getResetDates :: Account -> Dates Source #

getSpread :: Account -> Maybe Spread Source #

QueryByComment Account Source #

Instance details

Defined in Accounts

Methods

queryStmt :: Account -> TxnComment -> [Txn] Source #

queryStmtAsOf :: Account -> Date -> TxnComment -> [Txn] Source #

queryTxnAmt :: Account -> TxnComment -> Balance Source #

queryTxnAmtAsOf :: Account -> Date -> TxnComment -> Balance Source #

FromJSON Account Source #

Instance details

Defined in Accounts

Methods

parseJSON :: Value -> Parser Account #

parseJSONList :: Value -> Parser [Account] #

omittedField :: Maybe Account #

ToJSON Account Source #

Instance details

Defined in Accounts

Methods

toJSON :: Account -> Value #

toEncoding :: Account -> Encoding #

toJSONList :: [Account] -> Value #

toEncodingList :: [Account] -> Encoding #

omitField :: Account -> Bool #

Generic Account Source #

Instance details

Defined in Accounts

Associated Types

type Rep Account

Instance details

Defined in Accounts

type Rep Account = D1 ('MetaData "Account" "Accounts" "Hastructure-0.50.0-9tFAxbqhtE23KiGoJqUlJG" 'False) (C1 ('MetaCons "Account" 'PrefixI 'True) ((S1 ('MetaSel ('Just "accBalance") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Balance) :*: S1 ('MetaSel ('Just "accName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 String)) :*: (S1 ('MetaSel ('Just "accInterest") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe InterestInfo)) :*: (S1 ('MetaSel ('Just "accType") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe ReserveAmount)) :*: S1 ('MetaSel ('Just "accStmt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Statement))))))

Methods

from :: Account -> Rep Account x #

to :: Rep Account x -> Account #

Show Account Source #

Instance details

Defined in Accounts

Methods

showsPrec :: Int -> Account -> ShowS #

show :: Account -> String #

showList :: [Account] -> ShowS #

Eq Account Source #

Instance details

Defined in Accounts

Methods

(==) :: Account -> Account -> Bool #

(/=) :: Account -> Account -> Bool #

Ord Account Source #

Instance details

Defined in Accounts

Methods

compare :: Account -> Account -> Ordering #

(<) :: Account -> Account -> Bool #

(<=) :: Account -> Account -> Bool #

(>) :: Account -> Account -> Bool #

(>=) :: Account -> Account -> Bool #

max :: Account -> Account -> Account #

min :: Account -> Account -> Account #

type Rep Account Source #

Instance details

Defined in Accounts

type Rep Account = D1 ('MetaData "Account" "Accounts" "Hastructure-0.50.0-9tFAxbqhtE23KiGoJqUlJG" 'False) (C1 ('MetaCons "Account" 'PrefixI 'True) ((S1 ('MetaSel ('Just "accBalance") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Balance) :*: S1 ('MetaSel ('Just "accName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 String)) :*: (S1 ('MetaSel ('Just "accInterest") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe InterestInfo)) :*: (S1 ('MetaSel ('Just "accType") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe ReserveAmount)) :*: S1 ('MetaSel ('Just "accStmt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Statement))))))

data ReserveAmount Source #

Constructors

PctReserve DealStats Rate	target amount with reference to % of formula
FixReserve Balance	target amount with fixed balance amount
Either Pre ReserveAmount ReserveAmount	target amount depends on a test, if true, then use first one ,otherwise use second one
Max [ReserveAmount]	use higher of all reserve formulas
Min [ReserveAmount]	use lower of all reserve formulas

Instances

Instances details

FromJSON ReserveAmount Source #

Instance details

Defined in Accounts

Methods

parseJSON :: Value -> Parser ReserveAmount #

parseJSONList :: Value -> Parser [ReserveAmount] #

omittedField :: Maybe ReserveAmount #

ToJSON ReserveAmount Source #

Instance details

Defined in Accounts

Methods

toJSON :: ReserveAmount -> Value #

toEncoding :: ReserveAmount -> Encoding #

toJSONList :: [ReserveAmount] -> Value #

toEncodingList :: [ReserveAmount] -> Encoding #

omitField :: ReserveAmount -> Bool #

Generic ReserveAmount Source #

Instance details

Defined in Accounts

Associated Types

type Rep ReserveAmount

Instance details

Defined in Accounts

Methods

from :: ReserveAmount -> Rep ReserveAmount x #

to :: Rep ReserveAmount x -> ReserveAmount #

Show ReserveAmount Source #

Instance details

Defined in Accounts

Methods

showsPrec :: Int -> ReserveAmount -> ShowS #

show :: ReserveAmount -> String #

showList :: [ReserveAmount] -> ShowS #

Eq ReserveAmount Source #

Instance details

Defined in Accounts

Methods

(==) :: ReserveAmount -> ReserveAmount -> Bool #

(/=) :: ReserveAmount -> ReserveAmount -> Bool #

Ord ReserveAmount Source #

Instance details

Defined in Accounts

Methods

compare :: ReserveAmount -> ReserveAmount -> Ordering #

(<) :: ReserveAmount -> ReserveAmount -> Bool #

(<=) :: ReserveAmount -> ReserveAmount -> Bool #

(>) :: ReserveAmount -> ReserveAmount -> Bool #

(>=) :: ReserveAmount -> ReserveAmount -> Bool #

max :: ReserveAmount -> ReserveAmount -> ReserveAmount #

min :: ReserveAmount -> ReserveAmount -> ReserveAmount #

type Rep ReserveAmount Source #

Instance details

Defined in Accounts

draw :: Amount -> Date -> TxnComment -> Account -> Account Source #

draw cash from account with a comment

deposit :: Amount -> Date -> TxnComment -> Account -> Account Source #

deposit cash to account with a comment

transfer :: (Account, Account) -> Date -> Amount -> (Account, Account) Source #

move cash from account A to account B

depositInt :: Date -> Account -> Account Source #

sweep interest/investement income into account

data InterestInfo Source #

Constructors

BankAccount IRate DatePattern Date	fix reinvest return rate
InvestmentAccount Index Spread DatePattern DatePattern Date IRate	float type: index, spread, sweep dates, rate reset , last accrue day, last reset rate