bookkeeping-jp-0.1.1.4: 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

tDay: 2015-01-02
tDescription: ジャパリパーク取材
tSubDescription: 入場料
tDebit: 消耗品費 (Expenses)
tCredit: 事業主借 (Liabilities)
tAmount: 1000

tDay: 2015-01-02
tDescription: ジャパリパーク取材
tSubDescription: ジャパリバス乗車料
tDebit: 消耗品費 (Expenses)
tCredit: 事業主借 (Liabilities)
tAmount: 400

tDay: 2015-01-02
tDescription: ジャパリパーク取材
tSubDescription: ジャパリまん
tDebit: 消耗品費 (Expenses)
tCredit: 事業主借 (Liabilities)
tAmount: 200

tDay: 2015-01-20
tDescription: ジャパリパーク商談
tSubDescription: 
tDebit: 旅費交通費 (Expenses)
tCredit: 事業主借 (Liabilities)
tAmount: 340

_旅費交通費 :: Amount -> DateTransactions Source #

_通信費 :: SubDescription -> Amount -> DateTransactions Source #

_接待交際費 :: SubDescription -> Amount -> DateTransactions Source #

_支払手数料 :: SubDescription -> Amount -> DateTransactions Source #

_消耗品費 :: SubDescription -> Amount -> DateTransactions Source #

_新聞図書費 :: SubDescription -> Amount -> DateTransactions Source #

_会議費 :: SubDescription -> Amount -> DateTransactions Source #

_外注工費 :: SubDescription -> Amount -> DateTransactions Source #

_雑費 :: SubDescription -> Amount -> DateTransactions Source #

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

tDay: 2015-02-28
tDescription: ジャパリパーク ラッキービースト改修費
tSubDescription: 売上入金
tDebit: 事業主貸 (Assets)
tCredit: 売掛金 (Revenue)
tAmount: 200000

tDay: 2015-03-31
tDescription: ジャパリパーク技術顧問料
tSubDescription: 売上/入金
tDebit: 事業主貸 (Assets)
tCredit: 売上高 (Revenue)
tAmount: 600000

tDay: 2015-03-31
tDescription: ジャパリパーク技術顧問料
tSubDescription: 源泉所得税
tDebit: 事業主貸 (Assets)
tCredit: 売上高 (Revenue)
tAmount: 50000

tDay: 2015-04-30
tDescription: ジャパリパーク技術顧問料
tSubDescription: 売上/入金
tDebit: 事業主貸 (Assets)
tCredit: 売上高 (Revenue)
tAmount: 600000

tDay: 2015-04-30
tDescription: ジャパリパーク技術顧問料
tSubDescription: 源泉所得税
tDebit: 事業主貸 (Assets)
tCredit: 売上高 (Revenue)
tAmount: 50000

tDay: 2015-05-31
tDescription: ジャパリパーク技術顧問料
tSubDescription: 売上/入金
tDebit: 事業主貸 (Assets)
tCredit: 売上高 (Revenue)
tAmount: 600000

tDay: 2015-05-31
tDescription: ジャパリパーク技術顧問料
tSubDescription: 源泉所得税
tDebit: 事業主貸 (Assets)
tCredit: 売上高 (Revenue)
tAmount: 50000

_売上発生 :: 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 #

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