module Common.Model.IncomePage
  ( IncomePage(..)
  ) where

import           Data.Aeson                (FromJSON, ToJSON)
import           GHC.Generics              (Generic)

import           Common.Model.Income       (Income)
import           Common.Model.IncomeHeader (IncomeHeader)

data IncomePage = IncomePage
  { _incomePage_page       :: Int
  , _incomePage_header     :: IncomeHeader
  , _incomePage_incomes    :: [Income]
  , _incomePage_totalCount :: Int
  } deriving (Show, Generic)

instance FromJSON IncomePage
instance ToJSON IncomePage