lucabook 0.2.18 → 0.2.23

data/lib/luca_book/list.rb

@@ -31,7 +31,7 @@ module LucaBook
       new data, Date.new(from_year.to_i, from_month.to_i, 1), code
     end
 
-    def list_on_code
+    def list_by_code
       calc_code
       convert_label
       @data = [code_header] + @data.map do |dat|
@@ -47,7 +47,7 @@ module LucaBook
           res['note'] = dat[:note]
         end
       end
-      self
+      readable(@data)
     end
 
     def list_journals
@@ -65,7 +65,7 @@ module LucaBook
           res['note'] = dat[:note]
         end
       end
-      self
+      readable(@data)
     end
 
     def accumulate_code
@@ -74,10 +74,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'
+
+# Journal List on specified term
+#
+module LucaBook
+  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

data/lib/luca_book/state.rb

@@ -17,28 +17,15 @@ module LucaBook
 
     attr_reader :statement
 
-    def initialize(data, count = nil)
+    def initialize(data, count = nil, date: nil)
       @data = data
       @count = count
       @dict = LucaRecord::Dict.load('base.tsv')
+      @start_date = date
       @start_balance = set_balance
     end
 
-    # TODO: not compatible with LucaRecord::Base.open_records
-    def search_tag(code)
-      count = 0
-      Dir.children(LucaSupport::Config::Pjdir).sort.each do |dir|
-        next if ! FileTest.directory?(LucaSupport::Config::Pjdir+dir)
-
-        open_records(datadir, dir, 3) do |row, i|
-          next if i == 2
-          count += 1 if row.include?(code)
-        end
-      end
-      puts "#{code}: #{count}"
-    end
-
-    def self.term(from_year, from_month, to_year = from_year, to_month = from_month)
+    def self.range(from_year, from_month, to_year = from_year, to_month = from_month)
       date = Date.new(from_year.to_i, from_month.to_i, -1)
       last_date = Date.new(to_year.to_i, to_month.to_i, -1)
       raise 'invalid term specified' if date > last_date
@@ -52,35 +39,34 @@ module LucaBook
           date = Date.new(date.next_month.year, date.next_month.month, -1)
         end
       end
-      new reports, counts
+      new(reports, counts, date: Date.new(from_year.to_i, from_month.to_i, -1))
     end
 
-    def by_code(code, year=nil, month=nil)
-      raise 'not supported year range yet' if ! year.nil? && month.nil?
-
-      balance = @book.load_start.dig(code) || 0
-      full_term = self.class.scan_terms
-      if ! month.nil?
-        pre_term = full_term.select { |y, m| y <= year.to_i && m < month.to_i }
-        balance += pre_term.map { |y, m| self.class.net(y, m)}.inject(0){|sum, h| sum + h[code] }
-        [{ code: code, balance: balance, note: "#{code} #{@dict.dig(code, :label)}" }] + records_with_balance(year, month, code, balance)
-      else
-        start = { code: code, balance: balance, note: "#{code} #{@dict.dig(code, :label)}" }
-        full_term.map { |y, m| y }.uniq.map { |y|
-          records_with_balance(y, nil, code, balance)
-        }.flatten.prepend(start)
-      end
-    end
+    def self.by_code(code, from_year, from_month, to_year = from_year, to_month = from_month)
+      date = Date.new(from_year.to_i, from_month.to_i, -1)
+      last_date = Date.new(to_year.to_i, to_month.to_i, -1)
+      raise 'invalid term specified' if date > last_date
 
-    def records_with_balance(year, month, code, balance)
-      @book.search(year, month, nil, code).each do |h|
-        balance += Util.calc_diff(Util.amount_by_code(h[:debit], code), code) - Util.calc_diff(Util.amount_by_code(h[:credit], code), code)
-        h[:balance] = balance
+      reports = [].tap do |r|
+        while date <= last_date do
+          diff = {}.tap do |h|
+            g = gross(date.year, date.month, code: code)
+            sum = g.dig(:debit).nil? ? BigDecimal('0') : Util.calc_diff(g[:debit], code)
+            sum -= g.dig(:credit).nil? ? BigDecimal('0') : Util.calc_diff(g[:credit], code)
+            h['code'] = code
+            h['label'] = LucaRecord::Dict.load('base.tsv').dig(code, :label)
+            h['net'] = sum
+            h['debit_amount'] = g[:debit]
+            h['debit_count'] = g[:debit_count]
+            h['credit_amount'] = g[:credit]
+            h['credit_count'] = g[:credit_count]
+            h['_d'] = date.to_s
+          end
+          r << diff
+          date = Date.new(date.next_month.year, date.next_month.month, -1)
+        end
       end
-    end
-
-    def to_yaml
-      YAML.dump(code2label).tap { |data| puts data }
+      LucaSupport::Code.readable(reports)
     end
 
     def code2label
@@ -113,30 +99,29 @@ module LucaBook
       end
       keys.map! { |k| k[0, level] }.uniq.select! { |k| k.length <= level } if level
       @count.prepend({}.tap { |header| keys.each { |k| header[k] = @dict.dig(k, :label) }})
-      puts YAML.dump(@count)
       @count
     end
 
     def bs(level = 3, legal: false)
+      @start_balance.keys.each { |k| @data.first[k] ||= 0 }
       @data.map! { |data| data.select { |k, _v| k.length <= level } }
       @data.map! { |data| code_sum(data).merge(data) } if legal
       base = accumulate_balance(@data)
-      length = [base[:debit].length, base[:credit].length].max
+      rows = [base[:debit].length, base[:credit].length].max
       @statement = [].tap do |a|
-        length.times do |i|
+        rows.times do |i|
           {}.tap do |res|
             res['debit_label'] = base[:debit][i] ? @dict.dig(base[:debit][i].keys[0], :label) : ''
-            res['debit_balance'] = base[:debit][i] ? @start_balance.dig(base[:debit][i].keys[0]) + base[:debit][i].values[0] : ''
+            res['debit_balance'] = base[:debit][i] ? (@start_balance.dig(base[:debit][i].keys[0]) || 0) + base[:debit][i].values[0] : ''
             res['debit_diff'] = base[:debit][i] ? base[:debit][i].values[0] : ''
             res['credit_label'] = base[:credit][i] ? @dict.dig(base[:credit][i].keys[0], :label) : ''
-            res['credit_balance'] = base[:credit][i] ? @start_balance.dig(base[:credit][i].keys[0]) + base[:credit][i].values[0] : ''
+            res['credit_balance'] = base[:credit][i] ? (@start_balance.dig(base[:credit][i].keys[0]) || 0) + base[:credit][i].values[0] : ''
             res['credit_diff'] = base[:credit][i] ? base[:credit][i].values[0] : ''
             a << res
           end
         end
       end
-      puts YAML.dump(@statement)
-      self
+      readable(@statement)
     end
 
     def accumulate_balance(monthly_diffs)
@@ -144,9 +129,9 @@ module LucaBook
         month.each do |k, v|
           h[k] = h[k].nil? ? v : h[k] + v
         end
-      end.sort.to_h
+      end
       { debit: [], credit: [] }.tap do |res|
-        data.each do |k, v|
+        data.sort.to_h.each do |k, v|
           case k
           when /^[0-4].*/
             res[:debit] << { k => v }
@@ -157,11 +142,45 @@ module LucaBook
       end
     end
 
-    def pl
-      @statement = @data.map { |data| data.select { |k, _v| /^[A-H_].+/.match(k) } }
-      @statement << @statement.each_with_object({}) { |item, h| item.each { |k, v| h[k].nil? ? h[k] = v : h[k] += v } }
-                      .tap { |h| h['_d'] = 'Total' }
-      self
+    def pl(level = 2)
+      term_keys = @data.inject([]) { |a, data| a + data.keys }
+                    .compact.select { |k| /^[A-H_].+/.match(k) }
+      fy = @start_balance.select { |k, _v| /^[A-H].+/.match(k) }
+      keys = (term_keys + fy.keys).uniq.sort
+      keys.select! { |k| k.length <= level }
+      @statement = @data.map do |data|
+        {}.tap do |h|
+          keys.each { |k| h[k] = data[k] || BigDecimal('0') }
+        end
+      end
+      term = @statement.each_with_object({}) do |item, h|
+        item.each do |k, v|
+          h[k] = h[k].nil? ? v : h[k] + v if /^[^_]/.match(k)
+        end
+      end
+      fy = {}.tap do |h|
+        keys.each do |k|
+          h[k] = BigDecimal(fy[k] || '0') + BigDecimal(term[k] || '0')
+        end
+      end
+      @statement << term.tap { |h| h['_d'] = 'Period Total' }
+      @statement << fy.tap { |h| h['_d'] = 'FY Total' }
+      readable(code2label)
+    end
+
+    def self.accumulate_term(start_year, start_month, end_year, end_month)
+      date = Date.new(start_year, start_month, 1)
+      last_date = Date.new(end_year, end_month, -1)
+      return nil if date > last_date
+
+      {}.tap do |res|
+        diff, _count = net(date.year, date.month, last_date.year, last_date.month)
+        diff.each do |k, v|
+          next if /^[_]/.match(k)
+
+          res[k] = res[k].nil? ? v : res[k] + v
+        end
+      end
     end
 
     def self.accumulate_month(year, month)
@@ -187,18 +206,27 @@ module LucaBook
         res['H0'] = sum_matched(report, /^[H][0-9][0-9A-Z]{1,}/)
         res['HA'] = res['GA'] - res['H0']
 
-        res['9142'] = (report['9142'] || 0) + res['HA']
-        res['10'] = sum_matched(report, /^[123][0-9A-Z]{2,}/)
-        res['40'] = sum_matched(report, /^[4][0-9A-Z]{2,}/)
+        report['9142'] = (report['9142'] || BigDecimal('0')) + res['HA']
+        res['9142'] = report['9142']
+        res['10'] = sum_matched(report, /^[12][0-9A-Z]{2,}/)
+        jp_4v = sum_matched(report, /^[4][V]{2,}/) # deferred assets for JP GAAP
+        res['30'] = sum_matched(report, /^[34][0-9A-Z]{2,}/) - jp_4v
+        res['4V'] = jp_4v if CONFIG['country'] == 'jp'
         res['50'] = sum_matched(report, /^[56][0-9A-Z]{2,}/)
         res['70'] = sum_matched(report, /^[78][0-9A-Z]{2,}/)
+        res['91'] = sum_matched(report, /^91[0-9A-Z]{1,}/)
         res['8ZZ'] = res['50'] + res['70']
         res['9ZZ'] = sum_matched(report, /^[9][0-9A-Z]{2,}/)
 
-        res['1'] = res['10'] + res['40']
-        res['5'] = res['8ZZ'] + res['9ZZ'] + res['HA']
+        res['1'] = res['10'] + res['30']
+        res['5'] = res['8ZZ'] + res['9ZZ']
         res['_d'] = report['_d']
 
+        report.each do |k, v|
+          res[k] ||= sum_matched(report, /^#{k}[0-9A-Z]{1,}/) if k.length == 2
+          res[k] = v if k.length == 3
+        end
+
         report.each do |k, v|
           if k.length >= 4
             if res[k[0, 3]]
@@ -219,10 +247,25 @@ module LucaBook
     end
 
     def set_balance
+      pre_last = @start_date.prev_month
+      start_year = if @start_date.month > CONFIG['fy_start'].to_i
+                     pre_last.year
+                   else
+                     pre_last.year - 1
+                   end
+      pre = self.class.accumulate_term(start_year, CONFIG['fy_start'], pre_last.year, pre_last.month)
+
       base = Dict.latest_balance.each_with_object({}) do |(k, v), h|
-        h[k] = v[:balance].to_i if v[:balance]
+        h[k] = BigDecimal(v[:balance].to_s) if v[:balance]
+        h[k] ||= BigDecimal('0') if k.length == 2
       end
-      code_sum(base).merge(self.class.total_subaccount(base))
+      if pre
+        idx = (pre.keys + base.keys).uniq
+        base = {}.tap do |h|
+          idx.each { |k| h[k] = (base[k] || BigDecimal('0')) + (pre[k] || BigDecimal('0')) }
+        end
+      end
+      self.class.total_subaccount(base)
     end
 
     def self.sum_matched(report, reg)
@@ -230,39 +273,49 @@ module LucaBook
     end
 
     # for assert purpose
-    def self.gross(year, month = nil, code = nil, date_range = nil, rows = 4)
+    #
+    def self.gross(start_year, start_month, end_year = nil, end_month = nil,  code:  nil, date_range: nil, rows: 4)
       if ! date_range.nil?
         raise if date_range.class != Range
         # TODO: date based range search
       end
 
+      end_year ||= start_year
+      end_month ||= start_month
       sum = { debit: {}, credit: {}, debit_count: {}, credit_count: {} }
       idx_memo = []
-      asof(year, month) do |f, _path|
+      term(start_year, start_month, end_year, end_month, code) do |f, _path|
         CSV.new(f, headers: false, col_sep: "\t", encoding: 'UTF-8')
           .each_with_index do |row, i|
           break if i >= rows
+
           case i
           when 0
             idx_memo = row.map(&:to_s)
+            next if code && !idx_memo.include?(code)
+
             idx_memo.each do |r|
-              sum[:debit][r] ||= 0
+              sum[:debit][r] ||= BigDecimal('0')
               sum[:debit_count][r] ||= 0
             end
           when 1
+            next if code && !idx_memo.include?(code)
+
             row.each_with_index do |r, j|
-              sum[:debit][idx_memo[j]] += r.to_i # TODO: bigdecimal support
+              sum[:debit][idx_memo[j]] += BigDecimal(r.to_s)
               sum[:debit_count][idx_memo[j]] += 1
             end
           when 2
             idx_memo = row.map(&:to_s)
+            break if code && !idx_memo.include?(code)
+
             idx_memo.each do |r|
-              sum[:credit][r] ||= 0
+              sum[:credit][r] ||= BigDecimal('0')
               sum[:credit_count][r] ||= 0
             end
           when 3
             row.each_with_index do |r, j|
-              sum[:credit][idx_memo[j]] += r.to_i # TODO: bigdecimal support
+              sum[:credit][idx_memo[j]] += BigDecimal(r.to_s)
               sum[:credit_count][idx_memo[j]] += 1
             end
           else
@@ -270,49 +323,39 @@ module LucaBook
           end
         end
       end
+      if code
+        sum[:debit] = sum[:debit][code] || BigDecimal('0')
+        sum[:credit] = sum[:credit][code] || BigDecimal('0')
+        sum[:debit_count] = sum[:debit_count][code] || 0
+        sum[:credit_count] = sum[:credit_count][code] || 0
+      end
       sum
     end
 
     # netting vouchers in specified term
-    def self.net(year, month = nil, code = nil, date_range = nil)
-      g = gross(year, month, code, date_range)
+    #
+    def self.net(start_year, start_month, end_year = nil, end_month = nil, code: nil, date_range: nil)
+      g = gross(start_year, start_month, end_year, end_month, code: code, date_range: date_range)
       idx = (g[:debit].keys + g[:credit].keys).uniq.sort
       count = {}
       diff = {}.tap do |sum|
         idx.each do |code|
-          sum[code] = g.dig(:debit, code).nil? ? 0 : Util.calc_diff(g[:debit][code], code)
-          sum[code] -= g.dig(:credit, code).nil? ? 0 : Util.calc_diff(g[:credit][code], code)
+          sum[code] = g.dig(:debit, code).nil? ? BigDecimal('0') : Util.calc_diff(g[:debit][code], code)
+          sum[code] -= g.dig(:credit, code).nil? ? BigDecimal('0') : Util.calc_diff(g[:credit][code], code)
           count[code] = (g.dig(:debit_count, code) || 0) + (g.dig(:credit_count, code) || 0)
         end
       end
       [diff, count]
     end
 
-    # TODO: replace load_tsv -> generic load_tsv_dict
-    def load_start
-      file = Pathname(LucaSupport::Config::Pjdir) / 'data' / 'balance' / 'start.tsv'
-      {}.tap do |dic|
-        load_tsv(file) do |row|
-          dic[row[0]] = row[2].to_i if ! row[2].nil?
-        end
-      end
-    end
-
-    def load_tsv(path)
-      return enum_for(:load_tsv, path) unless block_given?
-
-      data = CSV.read(path, headers: true, col_sep: "\t", encoding: 'UTF-8')
-      data.each { |row| yield row }
-    end
-
     private
 
     def legal_items
-      return [] unless LucaSupport::Config::COUNTRY
+      return [] unless CONFIG['country']
 
-      case LucaSupport::Config::COUNTRY
+      case CONFIG['country']
       when 'jp'
-        ['91', '911', '912', '913', '9131', '9132', '914', '9141', '9142', '915', '916', '92', '93']
+        ['31', '32', '33', '91', '911', '912', '913', '9131', '9132', '914', '9141', '9142', '915', '916', '92', '93']
       end
     end
   end