bookkeeping-jp-0.1.0.0: Helper functions for Japanese bookkeeping.

CopyrightKadzuya Okamoto 2017
LicenseMIT
Stabilityexperimental
Portabilityunknown
Safe HaskellNone
LanguageHaskell2010

Business.Bookkeeping.JP.SelfEmployed

Contents

Description

This module exports l10n functions for self employed Japanese people.

Synopsis

Helper functions for expenses

経費の支払いに使うヘルパ関数群. >>> :{ ppr $ year 2015 $ do month 1 $ do activity 2 "ジャパリパーク取材" $ do _旅費交通費 340 _消耗品費 "入場料" 1000 _消耗品費 "ジャパリバス乗車料" 400 _消耗品費 "ジャパリまん" 200 activity 20 "ジャパリパーク商談" $ _旅費交通費 340 :} tDay: 2015-01-02 tDescription: ジャパリパーク取材 tSubDescription: tDebit: 旅費交通費 (Expenses) tCredit: 事業主借 (Liabilities) tAmount: 340 BLANKLINE tDay: 2015-01-02 tDescription: ジャパリパーク取材 tSubDescription: 入場料 tDebit: 消耗品費 (Expenses) tCredit: 事業主借 (Liabilities) tAmount: 1000 BLANKLINE tDay: 2015-01-02 tDescription: ジャパリパーク取材 tSubDescription: ジャパリバス乗車料 tDebit: 消耗品費 (Expenses) tCredit: 事業主借 (Liabilities) tAmount: 400 BLANKLINE tDay: 2015-01-02 tDescription: ジャパリパーク取材 tSubDescription: ジャパリまん tDebit: 消耗品費 (Expenses) tCredit: 事業主借 (Liabilities) tAmount: 200 BLANKLINE tDay: 2015-01-20 tDescription: ジャパリパーク商談 tSubDescription: tDebit: 旅費交通費 (Expenses) tCredit: 事業主借 (Liabilities) tAmount: 340 BLANKLINE

Lower level functions

_経費 :: CategoryName -> SubDescription -> Amount -> DateTransactions Source #

事業主が経費を支払った場合に使う関数.

Helper functions for sales

売上があった場合に使うヘルパ関数群. >>> :{ let _ジャパリパーク技術顧問料 :: Month -> Date -> YearTransactions _ジャパリパーク技術顧問料 m d = month m $ do _即日売上 d "ジャパリパーク技術顧問料" 600000 _源泉所得税 d "ジャパリパーク技術顧問料" 50000 in ppr $ year 2015 $ do _売上 (2, 20) (2, 28) "ジャパリパーク ラッキービースト改修費" 200000 _ジャパリパーク技術顧問料 3 31 _ジャパリパーク技術顧問料 4 30 _ジャパリパーク技術顧問料 5 31 :} tDay: 2015-02-20 tDescription: ジャパリパーク ラッキービースト改修費 tSubDescription: 売上発生 tDebit: 売掛金 (Assets) tCredit: 売上高 (Revenue) tAmount: 200000 BLANKLINE tDay: 2015-02-28 tDescription: ジャパリパーク ラッキービースト改修費 tSubDescription: 売上入金 tDebit: 事業主貸 (Assets) tCredit: 売掛金 (Revenue) tAmount: 200000 BLANKLINE tDay: 2015-03-31 tDescription: ジャパリパーク技術顧問料 tSubDescription: 売上/入金 tDebit: 事業主貸 (Assets) tCredit: 売上高 (Revenue) tAmount: 600000 BLANKLINE tDay: 2015-03-31 tDescription: ジャパリパーク技術顧問料 tSubDescription: 源泉所得税 tDebit: 事業主貸 (Assets) tCredit: 売上高 (Revenue) tAmount: 50000 BLANKLINE tDay: 2015-04-30 tDescription: ジャパリパーク技術顧問料 tSubDescription: 売上/入金 tDebit: 事業主貸 (Assets) tCredit: 売上高 (Revenue) tAmount: 600000 BLANKLINE tDay: 2015-04-30 tDescription: ジャパリパーク技術顧問料 tSubDescription: 源泉所得税 tDebit: 事業主貸 (Assets) tCredit: 売上高 (Revenue) tAmount: 50000 BLANKLINE tDay: 2015-05-31 tDescription: ジャパリパーク技術顧問料 tSubDescription: 売上/入金 tDebit: 事業主貸 (Assets) tCredit: 売上高 (Revenue) tAmount: 600000 BLANKLINE tDay: 2015-05-31 tDescription: ジャパリパーク技術顧問料 tSubDescription: 源泉所得税 tDebit: 事業主貸 (Assets) tCredit: 売上高 (Revenue) tAmount: 50000 BLANKLINE

_売上発生 :: Date -> Description -> Amount -> MonthTransactions Source #

売上発生を記帳するためのヘルパ関数.

_売上入金 :: Date -> Description -> Amount -> MonthTransactions Source #

売上入金を記帳するためのヘルパ関数.

_売上 Source #

Arguments

:: (Month, Date)

売上発生日

-> (Month, Date)

売上入金日

-> Description 
-> Amount 
-> YearTransactions 

売上を記帳するためのヘルパ関数. 売上発生日と、実際の入金日が異なる場合に用いる. 最終的な入金先は、簡単のため事業主貸としてあつかう.

_即日売上 :: Date -> Description -> Amount -> MonthTransactions Source #

売上を記帳するためのヘルパ関数. 売上発生日に入金がある場合に用いる. 最終的な入金先は、簡単のため事業主貸としてあつかう.

_源泉所得税 :: Date -> Description -> Amount -> MonthTransactions Source #

売上から源泉徴収された際に、その源泉徴収額を記帳するためのヘルパ関数.