lucabook 0.2.20 → 0.2.25

data/lib/luca_book/import_jp.rb

@@ -0,0 +1,83 @@
+# frozen_string_literal: true
+
+require 'date'
+require 'luca_book'
+require 'luca_support'
+
+module LucaBook
+  class Import
+    # TODO: need to be separated into pluggable l10n module.
+    # TODO: gensen rate >1m yen.
+    # TODO: gensen & consumption `round()` rules need to be confirmed.
+    # Profit or Loss account should be specified as code1.
+    #
+    def tax_extension(code1, code2, amount, options)
+      return nil if options.nil? || options[:tax_options].nil?
+      return nil if !options[:tax_options].include?('jp-gensen') && !options[:tax_options].include?('jp-consumption')
+
+      gensen_rate = BigDecimal('0.1021')
+      consumption_rate = BigDecimal('0.1')
+      gensen_code = @code_map.dig(options[:gensen_label]) || @code_map.dig('預り金')
+      gensen_idx = /^[5-8B-G]/.match(code1) ? 1 : 0
+      consumption_idx = /^[A-G]/.match(code1) ? 0 : 1
+      consumption_code = @code_map.dig(options[:consumption_label])
+      consumption_code ||= /^[A]/.match(code1) ? @code_map.dig('仮受消費税等') : @code_map.dig('仮払消費税等')
+      if options[:tax_options].include?('jp-gensen') && options[:tax_options].include?('jp-consumption')
+        paid_rate = BigDecimal('1') + consumption_rate - gensen_rate
+        gensen_amount = (amount / paid_rate * gensen_rate).round
+        consumption_amount = (amount / paid_rate * consumption_rate).round
+        [].tap do |res|
+          res << [].tap do |res1|
+            amount1 = amount
+            amount1 -= consumption_amount if consumption_idx == 0
+            amount1 += gensen_amount if gensen_idx == 1
+            res1 << { 'code' => code1, 'amount' => amount1 }
+            res1 << { 'code' => consumption_code, 'amount' => consumption_amount } if consumption_idx == 0
+            res1 << { 'code' => gensen_code, 'amount' => gensen_amount } if gensen_idx == 0
+          end
+          res << [].tap do |res2|
+            amount2 = amount
+            amount2 -= consumption_amount if consumption_idx == 1
+            amount2 += gensen_amount if gensen_idx == 0
+            res2 << { 'code' => code2, 'amount' => amount2 }
+            res2 << { 'code' => consumption_code, 'amount' => consumption_amount } if consumption_idx == 1
+            res2 << { 'code' => gensen_code, 'amount' => gensen_amount } if gensen_idx == 1
+          end
+        end
+      elsif options[:tax_options].include?('jp-gensen')
+        paid_rate = BigDecimal('1') - gensen_rate
+        gensen_amount = (amount / paid_rate * gensen_rate).round
+        [].tap do |res|
+          res << [].tap do |res1|
+            amount1 = amount
+            amount1 += gensen_amount if gensen_idx == 1
+            res1 << { 'code' => code, 'amount' => amount1 }
+            res1 << { 'code' => gensen_code, 'amount' => gensen_amount } if gensen_idx == 0
+          end
+          res << [].tap do |res2|
+            amount2 = amount
+            amount2 += gensen_amount if gensen_idx == 0
+            mount2 ||= amount
+            res2 << { 'code' => code2, 'amount' => amount2 }
+            res2 << { 'code' => gensen_code, 'amount' => gensen_amount } if gensen_idx == 1
+          end
+        end
+      elsif options[:tax_options].include?('jp-consumption')
+        paid_rate = BigDecimal('1') + consumption_rate - gensen_rate
+        consumption_amount = (amount / paid_rate * consumption_rate).round
+        res << [].tap do |res1|
+          amount1 = amount
+          amount1 -= consumption_amount if consumption_idx == 0
+          res1 << { 'code' => code1, 'amount' => amount1 }
+          res1 << { 'code' => consumption_code, 'amount' => consumption_amount } if consumption_idx == 0
+        end
+        res << [].tap do |res2|
+          amount2 = amount
+          amount2 -= consumption_amount if consumption_idx == 1
+          res2 << { 'code' => code2, 'amount' => amount2 }
+          res2 << { 'code' => consumption_code, 'amount' => consumption_amount } if consumption_idx == 1
+        end
+      end
+    end
+  end
+end

data/lib/luca_book/journal.rb

@@ -1,43 +1,90 @@
-#
-# manipulate files based on transaction date
-#
+# frozen_string_literal: true
 
 require 'csv'
 require 'date'
 require 'luca_record'
 
-module LucaBook
+module LucaBook #:nodoc:
+  # Journal has several annotations on headers:
+  #
+  # x-customer::
+  #     Identifying customer.
+  # x-editor::
+  #     Application name editing the journal.
+  # x-tax::
+  #     For tracking tax related transaction.
+  #
   class Journal < LucaRecord::Base
+    ACCEPTED_HEADERS = ['x-customer', 'x-editor', 'x-tax']
     @dirname = 'journals'
 
     # create journal from hash
     #
-    def self.create(d)
+    def self.create(dat)
+      d = LucaSupport::Code.keys_stringify(dat)
+      validate(d)
+      raise 'NoDateKey' unless d.key?('date')
+
       date = Date.parse(d['date'])
 
-      debit_amount = LucaSupport::Code.decimalize(serialize_on_key(d['debit'], 'value'))
-      credit_amount = LucaSupport::Code.decimalize(serialize_on_key(d['credit'], 'value'))
+      # TODO: need to sync filename & content. Limit code length for filename
+      # codes = (debit_code + credit_code).uniq
+      codes = nil
+
+      create_record(nil, date, codes) { |f| f.write journal2csv(d) }
+    end
+
+    # update journal with hash.
+    # If record not found with id, no record will be created.
+    #
+    def self.save(dat)
+      d = LucaSupport::Code.keys_stringify(dat)
+      raise 'record has no id.' if d['id'].nil?
+
+      validate(d)
+      parts = d['id'].split('/')
+      raise 'invalid ID' if parts.length != 2
+
+      codes = nil
+      open_records(@dirname, parts[0], parts[1], codes, 'w') { |f, _path| f.write journal2csv(d) }
+    end
+
+    # Convert journal object to TSV format.
+    #
+    def self.journal2csv(d)
+      debit_amount = LucaSupport::Code.decimalize(serialize_on_key(d['debit'], 'amount'))
+      credit_amount = LucaSupport::Code.decimalize(serialize_on_key(d['credit'], 'amount'))
       raise 'BalanceUnmatch' if debit_amount.inject(:+) != credit_amount.inject(:+)
 
       debit_code = serialize_on_key(d['debit'], 'code')
       credit_code = serialize_on_key(d['credit'], 'code')
 
-      # TODO: need to sync filename & content. Limit code length for filename
-      # codes = (debit_code + credit_code).uniq
-      codes = nil
-      create_record!(date, codes) do |f|
+      csv = CSV.generate(String.new, col_sep: "\t", headers: false) do |f|
         f << debit_code
         f << LucaSupport::Code.readable(debit_amount)
         f << credit_code
         f << LucaSupport::Code.readable(credit_amount)
-        ['x-customer', 'x-editor'].each do |x_header|
-          f << [x_header, d[x_header]] if d.dig(x_header)
+        ACCEPTED_HEADERS.each do |x_header|
+          f << [x_header, d['headers'][x_header]] if d.dig('headers', x_header)
         end
         f << []
         f << [d.dig('note')]
       end
     end
 
+    # Set accepted header with key/value, update record if exists.
+    #
+    def self.add_header(journal_hash, key, val)
+      return journal_hash if val.nil?
+      return journal_hash unless ACCEPTED_HEADERS.include?(key)
+
+      journal_hash.tap do |o|
+        o[:headers] = {} unless o.dig(:headers)
+        o[:headers][key] = val
+        save o if o[:id]
+      end
+    end
+
     def self.update_codes(obj)
       debit_code = serialize_on_key(obj[:debit], :code)
       credit_code = serialize_on_key(obj[:credit], :code)
@@ -45,11 +92,19 @@ module LucaBook
       change_codes(obj[:id], codes)
     end
 
-    # define new transaction ID & write data at once
-    def self.create_record!(date_obj, codes = nil)
-      create_record(nil, date_obj, codes) do |f|
-        f.write CSV.generate('', col_sep: "\t", headers: false) { |c| yield(c) }
-      end
+    def self.validate(obj)
+      raise 'NoDebitKey' unless obj.key?('debit')
+      raise 'NoCreditKey' unless obj.key?('credit')
+      debit_codes = serialize_on_key(obj['debit'], 'code').compact
+      debit_amount = serialize_on_key(obj['debit'], 'amount').compact
+      raise 'NoDebitCode' if debit_codes.empty?
+      raise 'NoDebitAmount' if debit_amount.empty?
+      raise 'UnmatchDebit' if debit_codes.length != debit_amount.length
+      credit_codes = serialize_on_key(obj['credit'], 'code').compact
+      credit_amount = serialize_on_key(obj['credit'], 'amount').compact
+      raise 'NoCreditCode' if credit_codes.empty?
+      raise 'NoCreditAmount' if credit_amount.empty?
+      raise 'UnmatchCredit' if credit_codes.length != credit_amount.length
     end
 
     # collect values on specified key
@@ -58,7 +113,21 @@ module LucaBook
       array_of_hash.map { |h| h[key] }
     end
 
-    # override de-serializing journal format
+    # override de-serializing journal format. Sample format is:
+    #
+    #   {
+    #     id: '2021A/V001',
+    #     headers: {
+    #       'x-customer' => 'Some Customer Co.'
+    #     },
+    #     debit: [
+    #       { code: 'A12', amount: 1000 }
+    #     ],
+    #     credit: [
+    #       { code: '311', amount: 1000 }
+    #     ],
+    #     note: 'note for each journal'
+    #   }
     #
     def self.load_data(io, path)
       {}.tap do |record|
@@ -76,10 +145,16 @@ module LucaBook
           when 3
             line.each_with_index { |amount, j| record[:credit][j][:amount] = BigDecimal(amount.to_s) }
           else
-            if body == false && line.empty?
-              record[:note] ||= []
-              body = true
-            else
+            case body
+            when false
+              if line.empty?
+                record[:note] ||= []
+                body = true
+              else
+                record[:headers] ||= {}
+                record[:headers][line[0]] = line[1]
+              end
+            when true
               record[:note] << line.join(' ') if body
             end
           end

data/lib/luca_book/list.rb

@@ -7,11 +7,12 @@ require 'luca_record'
 require 'luca_record/dict'
 require 'luca_book'
 
-# Journal List on specified term
-#
-module LucaBook
+module LucaBook #:nodoc:
+  # Journal List on specified term
+  #
   class List < LucaBook::Journal
     @dirname = 'journals'
+    attr_reader :data
 
     def initialize(data, start_date, code = nil)
       @data = data
@@ -31,7 +32,17 @@ module LucaBook
       new data, Date.new(from_year.to_i, from_month.to_i, 1), code
     end
 
-    def list_on_code
+    def self.add_header(from_year, from_month, to_year = from_year, to_month = from_month, code: nil, header_key: nil, header_val: nil)
+      return nil if code.nil?
+      return nil unless Journal::ACCEPTED_HEADERS.include?(header_key)
+
+      term(from_year, from_month, to_year, to_month, code: code)
+        .data.each do |journal|
+        Journal.add_header(journal, header_key, header_val)
+      end
+    end
+
+    def list_by_code
       calc_code
       convert_label
       @data = [code_header] + @data.map do |dat|
@@ -47,7 +58,7 @@ module LucaBook
           res['note'] = dat[:note]
         end
       end
-      self
+      readable(@data)
     end
 
     def list_journals
@@ -59,13 +70,13 @@ module LucaBook
           res['no'] = txid
           res['id'] = dat[:id]
           res['debit_code'] = dat[:debit].length == 1 ? dat[:debit][0][:code] : dat[:debit].map { |d| d[:code] }
-          res['debit_amount'] =  dat[:debit].inject(0) { |sum, d| sum + d[:amount] }
+          res['debit_amount'] = dat[:debit].inject(0) { |sum, d| sum + d[:amount] }
           res['credit_code'] = dat[:credit].length == 1 ? dat[:credit][0][:code] : dat[:credit].map { |d| d[:code] }
           res['credit_amount'] = dat[:credit].inject(0) { |sum, d| sum + d[:amount] }
           res['note'] = dat[:note]
         end
       end
-      self
+      readable(@data)
     end
 
     def accumulate_code
@@ -74,10 +85,6 @@ module LucaBook
       end
     end
 
-    def to_yaml
-      YAML.dump(LucaSupport::Code.readable(@data)).tap { |data| puts data }
-    end
-
     private
 
     def set_balance

data/lib/luca_book/list_by_header.rb

@@ -0,0 +1,120 @@
+# frozen_string_literal: true
+
+require 'pathname'
+require 'date'
+require 'luca_support'
+require 'luca_record'
+require 'luca_record/dict'
+require 'luca_book'
+
+module LucaBook #:nodoc:
+  # Journal List on specified term
+  #
+  class ListByHeader < LucaBook::Journal
+    @dirname = 'journals'
+
+    def initialize(data, start_date, code = nil, header_name = nil)
+      @data = data
+      @code = code
+      @header = header_name
+      @start = start_date
+      @dict = LucaRecord::Dict.load('base.tsv')
+    end
+
+    def self.term(from_year, from_month, to_year = from_year, to_month = from_month, code: nil, header: nil, basedir: @dirname)
+      data = Journal.term(from_year, from_month, to_year, to_month, code).select do |dat|
+        if code.nil?
+          true
+        else
+          [:debit, :credit].map { |key| serialize_on_key(dat[key], :code) }.flatten.include?(code)
+        end
+      end
+      new data, Date.new(from_year.to_i, from_month.to_i, 1), code, header
+    end
+
+    def list_by_code
+      calc_code
+      convert_label
+      @data = @data.each_with_object([]) do |(k, v), a|
+        journals = v.map do |dat|
+          date, txid = decode_id(dat[:id])
+          {}.tap do |res|
+            res['header'] = k
+            res['date'] = date
+            res['no'] = txid
+            res['id'] = dat[:id]
+            res['diff'] = dat[:diff]
+            res['balance'] = dat[:balance]
+            res['counter_code'] = dat[:counter_code].length == 1 ? dat[:counter_code].first : dat[:counter_code]
+            res['note'] = dat[:note]
+          end
+        end
+        a << { 'code' => v.last[:code], 'header' => k, 'balance' => v.last[:balance], 'count' => v.count, 'jounals' => journals }
+      end
+      readable(@data)
+    end
+
+    def accumulate_code
+      @data.each_with_object({}) do |dat, sum|
+        idx = dat.dig(:headers, @header) || 'others'
+        sum[idx] ||= BigDecimal('0')
+        sum[idx] += Util.diff_by_code(dat[:debit], @code) - Util.diff_by_code(dat[:credit], @code)
+      end
+    end
+
+    private
+
+    def set_balance
+      return BigDecimal('0') if @code.nil? || /^[A-H]/.match(@code)
+
+      balance_dict = Dict.latest_balance
+      start_balance = BigDecimal(balance_dict.dig(@code.to_s, :balance) || '0')
+      start = Dict.issue_date(balance_dict)&.next_month
+      last = @start.prev_month
+      if last.year >= start.year && last.month >= start.month
+        #TODO: start_balance to be implemented by header
+        self.class.term(start.year, start.month, last.year, last.month, code: @code).accumulate_code
+      else
+        #start_balance
+      end
+    end
+
+    def calc_code
+      raise 'no account code specified' if @code.nil?
+
+      @balance = set_balance
+      balance = @balance
+      res = {}
+      @data.each do |dat|
+        idx = dat.dig(:headers, @header) || 'others'
+        balance[idx] ||= BigDecimal('0')
+        res[idx] ||= []
+        {}.tap do |h|
+          h[:id] = dat[:id]
+          h[:diff] = Util.diff_by_code(dat[:debit], @code) - Util.diff_by_code(dat[:credit], @code)
+          balance[idx] += h[:diff]
+          h[:balance] = balance[idx]
+          h[:code] = @code
+          counter = h[:diff] * Util.pn_debit(@code) > 0 ? :credit : :debit
+          h[:counter_code] = dat[counter].map { |d| d[:code] }
+          h[:note] = dat[:note]
+          res[idx] << h
+        end
+      end
+      @data = res
+      self
+    end
+
+    def convert_label
+      @data.each do |_k, v|
+        v.each do |dat|
+          raise 'no account code specified' if @code.nil?
+
+          dat[:code] = "#{dat[:code]} #{@dict.dig(dat[:code], :label)}"
+          dat[:counter_code] = dat[:counter_code].map { |counter| "#{counter} #{@dict.dig(counter, :label)}" }
+        end
+      end
+      self
+    end
+  end
+end

data/lib/luca_book/setup.rb

@@ -6,7 +6,7 @@ require 'fileutils'
 module LucaBook
   class Setup
     # create project skeleton under specified directory
-    def self.create_project(country = nil, dir = LucaSupport::Config::Pjdir)
+    def self.create_project(country = nil, dir = LucaSupport::PJDIR)
       FileUtils.mkdir_p(dir) unless Dir.exist?(dir)
       Dir.chdir(dir) do
         %w[data/journals data/balance dict].each do |subdir|
@@ -18,6 +18,7 @@ module LucaBook
                  'dict-en.tsv'
                end
         FileUtils.cp("#{__dir__}/templates/#{dict}", 'dict/base.tsv') unless File.exist?('dict/base.tsv')
+        FileUtils.cp("#{__dir__}/templates/config.yml", 'config.yml') unless File.exist?('config.yml')
         prepare_starttsv(dict) unless File.exist? 'data/balance/start.tsv'
       end
     end