lucabook 0.2.21 → 0.2.26

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 3f7366698bee6b770fbae39f8fe650e1f460b04dec25c8036c84013f970adaa3
-  data.tar.gz: 8ecbf412b31f001f0cfa2de27ceb879463d17f28e3db552770866b44c0b73114
+  metadata.gz: 933e3d04315c04b7f6e998b16499b458ceeeafe8bfae9ce4ef4422018eb17040
+  data.tar.gz: 2e243b4e85cdc50bd45e39ed311cf78a8aa12e1956be0d0273c2a634147be16c
 SHA512:
-  metadata.gz: e30fabd50119ad470c90512bcf066b3992b5df2d67139f437a5f4336d73c843fb65dab2a70b5914c190155de68f82ec722840e0f056079061634f77bb5da4964
-  data.tar.gz: 3e8775200e05f8bfe0923b53690fa5245441ea4d71768246a7309ee503294d847a466e82da85568d3071f47eccd4f9783a79199b4d4eb630c961de84488a31ed
+  metadata.gz: b2292a4972ce1fcf883a828d17479f1580e3145e0db2d26ff6044a73495d2e151d60f0bd98fd5b2f945c3b74cdff879f9f7779073487c05c70a078306b069bbe
+  data.tar.gz: 27bf6b4bcea1b2eb9d5dac761d5465ce478af02a4074f0a20038b7f8a21c528b66faf399d4364702ebf22f06cc0a0112d13a4ee2e10acb22eb16b52859aaf4b6

data/exe/luca-book

@@ -10,7 +10,8 @@ class LucaCmd
       if params['config']
         LucaBook::Import.new(args[0], params['config']).import_csv
       elsif params['json']
-        LucaBook::Import.import_json(STDIN.read)
+        str = args[0].nil? ? STDIN.read : File.read(args[0])
+        LucaBook::Import.import_json(str)
       else
         puts 'Usage: luca-book import -c import_config'
         exit 1
@@ -20,7 +21,11 @@ class LucaCmd
     def self.list(args, params)
       args = gen_range(params[:n] || 1) if args.empty?
       if params['code']
-        render(LucaBook::List.term(*args, code: params['code']).list_on_code, params)
+        if params['headers']
+          render(LucaBook::ListByHeader.term(*args, code: params['code'], header: params['headers']).list_by_code, params)
+        else
+          render(LucaBook::List.term(*args, code: params['code']).list_by_code, params)
+        end
       else
         render(LucaBook::List.term(*args).list_journals, params)
       end
@@ -31,23 +36,45 @@ class LucaCmd
       if params['code']
         render(LucaBook::State.by_code(params['code'], *args), params)
       else
-        render(LucaBook::State.term(*args).stats(params[:level]), params)
+        render(LucaBook::State.range(*args).stats(params[:level]), params)
+      end
+    end
+
+    def self.add_header(args, params)
+      args = gen_range(params[:n] || 1) if args.empty?
+      if params['code']
+        LucaBook::List.add_header(*args, code: params['code'], header_key: params[:key], header_val: params[:value])
+      else
+        puts 'no code specified.'
       end
     end
   end
 
   class Report < LucaCmd
+    def self.xbrl(args, params)
+      level = params[:level] || 3
+      legal = params[:legal] || false
+      args = gen_range(params[:n] || 1) if args.empty?
+      LucaBook::State.range(*args).render_xbrl(params[:output])
+    end
+
     def self.balancesheet(args, params)
       level = params[:level] || 3
       legal = params[:legal] || false
       args = gen_range(params[:n] || 1) if args.empty?
-      render(LucaBook::State.term(*args).bs(level, legal: legal), params)
+      render(LucaBook::State.range(*args).bs(level, legal: legal), params)
     end
 
     def self.profitloss(args, params)
       level = params[:level] || 2
       args = gen_range(params[:n]) if args.empty?
-      render(LucaBook::State.term(*args).pl(level), params)
+      render(LucaBook::State.range(*args).pl(level), params)
+    end
+
+    def self.report_mail(args, params)
+      level = params[:level] || 3
+      args = gen_range(params[:n] || 12) if args.empty?
+      render(LucaBook::State.range(*args).report_mail(level), params)
     end
   end
 
@@ -68,6 +95,12 @@ class LucaCmd
       puts YAML.dump(dat)
     end
   end
+
+  class Dict < LucaCmd
+    def self.update_balance(args, params)
+      LucaBook::Dict.generate_balance(*args)
+    end
+  end
 end
 
 def new_pj(args = nil, params = {})
@@ -93,7 +126,8 @@ when /journals?/, 'j'
   when 'list'
     OptionParser.new do |opt|
       opt.banner = 'Usage: luca-book journals list [options] [YYYY M]'
-      opt.on('-c', '--code VAL', 'search with code') { |v| params['code'] = v }
+      opt.on('-c', '--code VAL', 'filter with code or label') { |v| params['code'] = v }
+      opt.on('--customer', 'categorize by x-customer header') { |_v| params['headers'] = 'x-customer' }
       opt.on('-n VAL', 'report count') { |v| params[:n] = v.to_i }
       opt.on('--nu', 'show table in nushell') { |_v| params[:output] = 'nu' }
       opt.on('-o', '--output VAL', 'output serialized data') { |v| params[:output] = v }
@@ -101,10 +135,20 @@ when /journals?/, 'j'
       args = opt.parse!(ARGV)
       LucaCmd::Journal.list(args, params)
     end
+  when 'set'
+    OptionParser.new do |opt|
+      opt.banner = 'Usage: luca-book journals set [options] [YYYY M]'
+      opt.on('-c', '--code VAL', 'search with code') { |v| params['code'] = v }
+      opt.on('--header VAL', 'header key') { |v| params[:key] = v }
+      opt.on('--val VAL', 'header value') { |v| params[:value] = v }
+      opt.on_tail('set header to journals on specified code.')
+      args = opt.parse!(ARGV)
+      LucaCmd::Journal.add_header(args, params)
+    end
   when 'stats'
     OptionParser.new do |opt|
       opt.banner = 'Usage: luca-book journals stats [options] [YYYY M]'
-      opt.on('-c', '--code VAL', 'search with code') { |v| params['code'] = v }
+      opt.on('-c', '--code VAL', 'filter with code or label') { |v| params['code'] = v }
       opt.on('-n VAL', 'report count') { |v| params[:n] = v.to_i }
       opt.on('--nu', 'show table in nushell') { |_v| params[:output] = 'nu' }
       opt.on('-o', '--output VAL', 'output serialized data') { |v| params[:output] = v }
@@ -130,6 +174,13 @@ when 'new'
 when /reports?/, 'r'
   subcmd = ARGV.shift
   case subcmd
+  when 'xbrl'
+    OptionParser.new do |opt|
+      opt.banner = 'Usage: luca-book reports bs [options] [YYYY M]'
+      opt.on('-o', '--output VAL', 'output filename') { |v| params[:output] = v }
+      args = opt.parse!(ARGV)
+      LucaCmd::Report.xbrl(args, params)
+    end
   when 'bs'
     OptionParser.new do |opt|
       opt.banner = 'Usage: luca-book reports bs [options] [YYYY M]'
@@ -150,6 +201,14 @@ when /reports?/, 'r'
       args = opt.parse!(ARGV)
       LucaCmd::Report.profitloss(args, params)
     end
+  when 'mail'
+    OptionParser.new do |opt|
+      opt.banner = 'Usage: luca-book reports mail [options] [YYYY M YYYY M]'
+      opt.on('-l', '--level VAL', 'account level') { |v| params[:level] = v.to_i }
+      opt.on('-n VAL', 'report count') { |v| params[:n] = v.to_i }
+      args = opt.parse!(ARGV)
+      LucaCmd::Report.report_mail(args, params)
+    end
   else
     puts 'Proper subcommand needed.'
     puts
@@ -158,6 +217,16 @@ when /reports?/, 'r'
     puts '  pl: show statement of income'
     exit 1
   end
+when /balance/
+  subcmd = ARGV.shift
+  case subcmd
+  when 'update'
+    OptionParser.new do |opt|
+      opt.banner = 'Usage: luca-book balance update YYYY [M]'
+      args = opt.parse!(ARGV)
+      LucaCmd::Dict.update_balance(args, params)
+    end
+  end
 else
   puts 'Proper subcommand needed.'
   puts

data/lib/luca_book.rb

@@ -5,10 +5,12 @@ require 'luca_record'
 require 'luca_book/version'
 
 module LucaBook
+  autoload :Accumulator, 'luca_book/accumulator'
   autoload :Dict, 'luca_book/dict'
   autoload :Import, 'luca_book/import'
   autoload :Journal, 'luca_book/journal'
   autoload :List, 'luca_book/list'
+  autoload :ListByHeader, 'luca_book/list_by_header'
   autoload :Setup, 'luca_book/setup'
   autoload :State, 'luca_book/state'
   autoload :Util, 'luca_book/util'

data/lib/luca_book/accumulator.rb

@@ -0,0 +1,152 @@
+# frozen_string_literal: true
+
+require 'luca_book/util'
+require 'luca_support/config'
+
+module LucaBook
+  module Accumulator
+    def self.included(klass) # :nodoc:
+      klass.extend ClassMethods
+    end
+
+    module ClassMethods
+      def accumulate_month(year, month)
+        monthly_record, count = net(year, month)
+        [total_subaccount(monthly_record), count]
+      end
+
+      # Accumulate Level 2, 3 account.
+      #
+      def total_subaccount(report)
+        {}.tap do |res|
+          res['A0'] = sum_matched(report, /^[A][0-9A-Z]{2,}/)
+          res['B0'] = sum_matched(report, /^[B][0-9A-Z]{2,}/)
+          res['BA'] = res['A0'] - res['B0']
+          res['C0'] = sum_matched(report, /^[C][0-9A-Z]{2,}/)
+          res['CA'] = res['BA'] - res['C0']
+          res['D0'] = sum_matched(report, /^[D][0-9A-Z]{2,}/)
+          res['E0'] = sum_matched(report, /^[E][0-9A-Z]{2,}/)
+          res['EA'] = res['CA'] + res['D0'] - res['E0']
+          res['F0'] = sum_matched(report, /^[F][0-9A-Z]{2,}/)
+          res['G0'] = sum_matched(report, /^[G][0-9][0-9A-Z]{1,}/)
+          res['GA'] = res['EA'] + res['F0'] - res['G0']
+          res['H0'] = sum_matched(report, /^[H][0-9][0-9A-Z]{1,}/)
+          res['HA'] = res['GA'] - res['H0']
+
+          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 LucaSupport::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['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]]
+                res[k[0, 3]] += v
+              else
+                res[k[0, 3]] = v
+              end
+              res[k] = v
+            end
+          end
+          res.sort.to_h
+        end
+      end
+
+      def sum_matched(report, reg)
+        report.select { |k, v| reg.match(k)}.values.sum
+      end
+
+      # for assert purpose
+      #
+      def 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 = []
+        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] ||= 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]] += 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] ||= BigDecimal('0')
+                sum[:credit_count][r] ||= 0
+              end
+            when 3
+              row.each_with_index do |r, j|
+                sum[:credit][idx_memo[j]] += BigDecimal(r.to_s)
+                sum[:credit_count][idx_memo[j]] += 1
+              end
+            else
+              puts row # for debug
+            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 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? ? BigDecimal('0') : LucaBook::Util.calc_diff(g[:debit][code], code)
+            sum[code] -= g.dig(:credit, code).nil? ? BigDecimal('0') : LucaBook::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
+    end
+  end
+end

data/lib/luca_book/console.rb

@@ -49,7 +49,7 @@ class LucaBookConsole
           print "  " if h[:code].length > 3
         end
         puts cnsl_label(h[:label], h[:code])
-        h[:value].each_slice(6) do |v|
+        h[:amount].each_slice(6) do |v|
           puts "#{cnsl_fmt("", 14)} #{v.map{|v| cnsl_fmt(v, 14)}.join}"
         end
       end
@@ -72,13 +72,13 @@ class LucaBookConsole
     end
     convert_collection(report).each do |h|
       if /^[A-Z]/.match(h[:code])
-        total = [h[:value].inject(:+)] + Array.new(h[:value].length)
+        total = [h[:amount].inject(:+)] + Array.new(h[:amount].length)
         if /[^0]$/.match(h[:code])
           print "  "
           print "  " if h[:code].length > 3
         end
         puts cnsl_label(h[:label], h[:code])
-        h[:value].each_slice(6).with_index(0) do |v, i|
+        h[:amount].each_slice(6).with_index(0) do |v, i|
           puts "#{cnsl_fmt(total[i], 14)} #{v.map{|v| cnsl_fmt(v, 14)}.join}"
         end
       end
@@ -98,7 +98,7 @@ class LucaBookConsole
         end
       end
     }.sort.map do |k,v|
-      {code: k, label: @report.dict.dig(k, :label), value: v}
+      {code: k, label: @report.dict.dig(k, :label), amount: v}
     end
   end
 

data/lib/luca_book/dict.rb

@@ -1,20 +1,184 @@
 # frozen_string_literal: true
 
+require 'luca_support/code'
 require 'luca_support/config'
 require 'luca_record/dict'
+require 'luca_record/io'
+require 'luca_book'
 require 'date'
 require 'pathname'
 
 module LucaBook
   class Dict < LucaRecord::Dict
-    def self.latest_balance
-      dict_dir = Pathname(LucaSupport::Config::Pjdir) / 'data' / 'balance'
-      # TODO: search latest balance dictionary
-      load_tsv_dict(dict_dir / 'start.tsv')
+    include Accumulator
+    include LucaRecord::IO
+
+    @dirname = 'journals'
+    @record_type = 'raw'
+    # Column number settings for CSV/TSV convert
+    #
+    # :label
+    #   for double entry data
+    # :counter_label
+    #   must be specified with label
+    # :debit_label
+    #   for double entry data
+    # * debit_amount
+    # :credit_label
+    #   for double entry data
+    # * credit_amount
+    # :note
+    #   can be the same column as another label
+    #
+    # :encoding
+    #   file encoding
+    #
+    def csv_config
+      {}.tap do |config|
+        if @config.dig('label')
+          config[:label] = @config['label'].to_i
+          if @config.dig('counter_label')
+            config[:counter_label] = @config['counter_label']
+            config[:type] = 'single'
+          end
+        elsif @config.dig('debit_label')
+          config[:debit_label] = @config['debit_label'].to_i
+          if @config.dig('credit_label')
+            config[:credit_label] = @config['credit_label'].to_i
+            config[:type] = 'double'
+          end
+        end
+        config[:type] ||= 'invalid'
+        config[:debit_amount] = @config['debit_amount'].to_i if @config.dig('debit_amount')
+        config[:credit_amount] = @config['credit_amount'].to_i if @config.dig('credit_amount')
+        config[:note] = @config['note'] if @config.dig('note')
+        config[:encoding] = @config['encoding'] if @config.dig('encoding')
+
+        config[:year] = @config['year'] if @config.dig('year')
+        config[:month] = @config['month'] if @config.dig('month')
+        config[:day] = @config['day'] if @config.dig('day')
+        config[:default_debit] = @config['default_debit'] if @config.dig('default_debit')
+        config[:default_credit] = @config['default_credit'] if @config.dig('default_credit')
+      end
+    end
+
+    def search(word, default_word = nil, amount = nil)
+      res = super(word, default_word, main_key: 'account_label')
+      if res.is_a?(Array) && res[0].is_a?(Array)
+        filter_amount(res, amount)
+      else
+        res
+      end
+    end
+
+    # Choose setting on Big or small condition.
+    #
+    def filter_amount(settings, amount = nil)
+      return settings[0] if amount.nil?
+
+      settings.each do |item|
+        return item unless item[1].keys.include?(:on_amount)
+
+        condition = item.dig(1, :on_amount)
+        case condition[0]
+        when '>'
+          return item if amount > BigDecimal(condition[1..])
+        when '<'
+          return item if amount < BigDecimal(condition[1..])
+        else
+          return item
+        end
+      end
+      nil
+    end
+
+    # Find balance at financial year start by given date.
+    # If not found 'start-yyyy-mm-*.tsv', use 'start.tsv' as default.
+    #
+    def self.latest_balance(date)
+      load_tsv_dict(latest_balance_path(date))
+    end
+
+    def self.latest_balance_path(date)
+      start_year = date.month >= LucaSupport::CONFIG['fy_start'] ? date.year : date.year - 1
+      latest = Date.new(start_year, LucaSupport::CONFIG['fy_start'], 1).prev_month
+      dict_dir = Pathname(LucaSupport::PJDIR) / 'data' / 'balance'
+      fileglob = %Q(start-#{latest.year}-#{format("%02d", latest.month)}-*)
+      path = Dir.glob(fileglob, base: dict_dir)[0] || 'start.tsv'
+      dict_dir / path
     end
 
     def self.issue_date(obj)
       Date.parse(obj.dig('_date', :label))
     end
+
+    def self.generate_balance(year, month = nil)
+      start_date = Date.new((year.to_i - 1), LucaSupport::CONFIG['fy_start'], 1)
+      month ||= LucaSupport::CONFIG['fy_start'] - 1
+      end_date = Date.new(year.to_i, month, -1)
+      labels = load('base.tsv')
+      bs = load_balance(start_date, end_date)
+      fy_digest = checksum(start_date, end_date)
+      current_ref = gitref
+      csv = CSV.generate(String.new, col_sep: "\t", headers: false) do |f|
+        f << ['code', 'label', 'balance']
+        f << ['_date', end_date]
+        f << ['_digest', fy_digest]
+        f << ['_gitref', current_ref] if current_ref
+        bs.each do |code, balance|
+          next if LucaSupport::Code.readable(balance) == 0
+
+          f << [code, labels.dig(code, :label), LucaSupport::Code.readable(balance)]
+        end
+      end
+      dict_dir = Pathname(LucaSupport::PJDIR) / 'data' / 'balance'
+      filepath = dict_dir / "start-#{end_date.to_s}.tsv"
+
+      File.open(filepath, 'w') { |f| f.write csv }
+    end
+
+    def self.load_balance(start_date, end_date)
+      base = latest_balance(start_date).each_with_object({}) do |(k, v), h|
+        h[k] = BigDecimal(v[:balance].to_s) if v[:balance]
+      end
+
+      search_range = term_by_month(start_date, end_date)
+      bs = search_range.each_with_object(base) do |date, h|
+        net(date.year, date.month)[0].each do |code, amount|
+          next if /^[^1-9]/.match(code)
+
+          h[code] ||= BigDecimal('0')
+          h[code] += amount
+        end
+      end
+      bs['9142'] ||= BigDecimal('0')
+      bs['9142'] += LucaBook::State
+                     .range(start_date.year, start_date.month, end_date.year, end_date.month)
+                     .net_income
+      bs.sort
+    end
+
+    def self.checksum(start_date, end_date)
+      digest = update_digest(String.new, File.read(latest_balance_path(start_date)))
+      term_by_month(start_date, end_date)
+        .map { |date| dir_digest(date.year, date.month) }
+        .each { |month_digest| digest = update_digest(digest, month_digest) }
+      digest
+    end
+
+    def self.gitref
+      digest = `git rev-parse HEAD`
+      $?.exitstatus == 0 ? digest.strip : nil
+    end
+
+    def self.term_by_month(start_date, end_date)
+      Enumerator.new do |yielder|
+        each_month = start_date
+        while each_month <= end_date
+          yielder << each_month
+          each_month = each_month.next_month
+        end
+      end
+    end
   end
 end