diff options
| author | Joris | 2019-10-09 23:16:00 +0200 |
|---|---|---|
| committer | Joris | 2019-10-09 23:16:04 +0200 |
| commit | 7529a18ff0ac443e7f9764b5e2d0f57a5d3a850b (patch) | |
| tree | 3d5cfc1f2318c2d4f889ee70764929f1a96e4c41 /server/src/Model/EditPayment.hs | |
| parent | e5ac82f4808e974dec5f19fc6f059efaa5214022 (diff) | |
| download | budget-7529a18ff0ac443e7f9764b5e2d0f57a5d3a850b.tar.gz budget-7529a18ff0ac443e7f9764b5e2d0f57a5d3a850b.tar.bz2 budget-7529a18ff0ac443e7f9764b5e2d0f57a5d3a850b.zip | |
Use common payment validation in the backend
Remove deprecated backend validation
Diffstat (limited to 'server/src/Model/EditPayment.hs')
| -rw-r--r-- | server/src/Model/EditPayment.hs | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/server/src/Model/EditPayment.hs b/server/src/Model/EditPayment.hs new file mode 100644 index 0000000..ac4c906 --- /dev/null +++ b/server/src/Model/EditPayment.hs @@ -0,0 +1,17 @@ +module Model.EditPayment + ( EditPayment(..) + ) where + +import Data.Text (Text) +import Data.Time.Calendar (Day) + +import Common.Model (CategoryId, Frequency, PaymentId) + +data EditPayment = EditPayment + { _editPayment_id :: PaymentId + , _editPayment_name :: Text + , _editPayment_cost :: Int + , _editPayment_date :: Day + , _editPayment_category :: CategoryId + , _editPayment_frequency :: Frequency + } deriving (Show) |