packages feed

ochintin-daicho 0.3.1.1 → 0.3.2.0

raw patch · 2 files changed

+16/−3 lines, 2 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

+ Business.OchintinDaicho: [address] :: Person -> Text
+ Business.OchintinDaicho: [birthday] :: Person -> Text
+ Business.OchintinDaicho: [history] :: Person -> Text
+ Business.OchintinDaicho: [job] :: Person -> Text
+ Business.OchintinDaicho: [left] :: Person -> Text
+ Business.OchintinDaicho: [reason] :: Person -> Text
- Business.OchintinDaicho: PaymentCore :: Amount -> (CreditCategory -> DateTransactions) -> (DebitCategory -> Amount -> DateTransactions) -> (DebitCategory -> Amount -> DateTransactions) -> (DebitCategory -> DateTransactions) -> PaymentCore
+ Business.OchintinDaicho: PaymentCore :: Amount -> CreditCategory -> DateTransactions -> DebitCategory -> Amount -> DateTransactions -> DebitCategory -> Amount -> DateTransactions -> DebitCategory -> DateTransactions -> PaymentCore
- Business.OchintinDaicho: Person :: Text -> Text -> (Year -> Payments) -> Person
+ Business.OchintinDaicho: Person :: Text -> Text -> Text -> Text -> Text -> Text -> Text -> Text -> Year -> Payments -> Person

Files

ochintin-daicho.cabal view
@@ -1,5 +1,5 @@ name:                ochintin-daicho-version:             0.3.1.1+version:             0.3.2.0 synopsis:            A module to manage payroll books for Japanese companies. description:     A module to manage payroll books for Japanese companies. This enable to export data to tax withholding book, etc...
src/Business/OchintinDaicho.hs view
@@ -75,6 +75,12 @@   taroYamada :: Person   taroYamada = Person     { name = "山田 太郎"+    , birthday = "昭和60年1月1日"+    , address = "東京都新宿区"+    , job = "エンジニア"+    , left = ""+    , reason = ""+    , history = ""     , sex = "男"     , payments = \y -> case y of       2017 -> do@@ -424,10 +430,17 @@  - ============== -}  {-| Main data type to represent payroll books for a person.+ - It can be also used as a 労働者名簿  -} data Person = Person-  { name :: Text-  , sex :: Text+  { name :: Text  -- 氏名+  , birthday :: Text  -- 生年月日+  , sex :: Text   -- 性別+  , address :: Text -- 住所+  , job :: Text   -- 業務の種類+  , left :: Text  -- 退職または死亡年月日+  , reason :: Text  -- 退職または死亡の理由+  , history :: Text   -- 履歴   , payments :: Year -> Payments   }