src/client/LoggedIn/Msg.elm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

module LoggedIn.Msg exposing
  ( Msg(..)
  )

import Date exposing (Date)

import Model.Payment exposing (PaymentId)
import Model.Frequency exposing (Frequency)
import Model.Income exposing (IncomeId)
import Model.Category exposing (CategoryId)

import LoggedIn.Home.Msg as Home

type Msg =
  NoOp
  | HomeMsg Home.Msg
  | ValidateCreatePayment PaymentId String Int Date CategoryId Frequency
  | ValidateEditPayment PaymentId String Int Date CategoryId Frequency
  | ValidateDeletePayment PaymentId
  | ValidateCreateIncome IncomeId Int Date
  | ValidateEditIncome IncomeId Int Date
  | ValidateDeleteIncome IncomeId
  | ValidateCreateCategory CategoryId String String
  | ValidateEditCategory CategoryId String String
  | ValidateDeleteCategory CategoryId