module Common.Model.CreatedPayment
  ( CreatedPayment(..)
  ) where

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

import           Common.Model.Payment         (Payment)
import           Common.Model.PaymentCategory (PaymentCategory)

data CreatedPayment = CreatedPayment
  { _createdPayment_payment         :: Payment
  , _createdPayment_paymentCategory :: PaymentCategory
  } deriving (Show, Generic)

instance FromJSON CreatedPayment
instance ToJSON CreatedPayment