lucabook 0.2.21 → 0.2.26

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)
+      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

@@ -1,6 +1,8 @@
 # frozen_string_literal: true
 
+require 'cgi/escape'
 require 'csv'
+require 'mail'
 require 'pathname'
 require 'date'
 require 'luca_support'
@@ -12,34 +14,23 @@ require 'luca_book'
 #
 module LucaBook
   class State < LucaRecord::Base
+    include Accumulator
+
     @dirname = 'journals'
     @record_type = 'raw'
+    @@dict = LucaRecord::Dict.new('base.tsv')
 
-    attr_reader :statement
+    attr_reader :statement, :pl_data, :bs_data, :start_balance
 
-    def initialize(data, count = nil, date: nil)
-      @data = data
+    def initialize(data, count = nil, start_d: nil, end_d: nil)
+      @monthly = data
       @count = count
-      @dict = LucaRecord::Dict.load('base.tsv')
-      @start_date = date
+      @start_date = start_d
+      @end_date = end_d
       @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
@@ -53,10 +44,14 @@ module LucaBook
           date = Date.new(date.next_month.year, date.next_month.month, -1)
         end
       end
-      new(reports, counts, date: Date.new(from_year.to_i, from_month.to_i, -1))
+      new(reports, counts,
+          start_d: Date.new(from_year.to_i, from_month.to_i, 1),
+          end_d: Date.new(to_year.to_i, to_month.to_i, -1)
+         )
     end
 
     def self.by_code(code, from_year, from_month, to_year = from_year, to_month = from_month)
+      code = search_code(code) if code
       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
@@ -64,7 +59,7 @@ module LucaBook
       reports = [].tap do |r|
         while date <= last_date do
           diff = {}.tap do |h|
-            g = gross(date.year, date.month, code)
+            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
@@ -80,27 +75,14 @@ module LucaBook
           date = Date.new(date.next_month.year, date.next_month.month, -1)
         end
       end
-      #YAML.dump(LucaSupport::Code.readable(reports)) #.tap{ |data| puts data }
-      #new(reports, counts, date: Date.new(from_year.to_i, from_month.to_i, -1))
       LucaSupport::Code.readable(reports)
     end
 
-    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
-      end
-    end
-
-    def to_yaml
-      YAML.dump(readable(code2label)).tap { |data| puts data }
-    end
-
     def code2label
-      @statement ||= @data
+      @statement ||= @monthly
       @statement.map do |report|
         {}.tap do |h|
-          report.each { |k, v| h[@dict.dig(k, :label) || k] = v }
+          report.each { |k, v| h[@@dict.dig(k, :label) || k] = v }
         end
       end
     end
@@ -125,25 +107,45 @@ module LucaBook
         data.sort.to_h
       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) }})
+      @count.prepend({}.tap { |header| keys.each { |k| header[k] = @@dict.dig(k, :label) }})
       @count
     end
 
+    # TODO: pl/bs may not be immutable
+    def report_mail(level = 3)
+      @company = CONFIG.dig('company', 'name')
+      {}.tap do |res|
+        pl(level).reverse.each do |month|
+          month.each do |k, v|
+            res[k] ||= []
+            res[k] << v
+          end
+        end
+        @months = res['_d']
+        @pl = res.select{ |k,v| k != '_d' }
+      end
+      @bs = bs
+
+      mail = Mail.new
+      mail.to = CONFIG.dig('mail', 'preview') || CONFIG.dig('mail', 'from')
+      mail.subject = 'Financial Report available'
+      mail.html_part = Mail::Part.new(body: render_erb(search_template('monthly-report.html.erb')), content_type: 'text/html; charset=UTF-8')
+      LucaSupport::Mail.new(mail, PJDIR).deliver
+    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)
+      set_bs(level, legal: legal)
+      base = accumulate_balance(@bs_data)
       rows = [base[:debit].length, base[:credit].length].max
       @statement = [].tap do |a|
         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]) || 0) + base[:debit][i].values[0] : ''
-            res['debit_diff'] = base[:debit][i] ? base[:debit][i].values[0] : ''
+            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]) || 0) + base[:debit][i].values[0] : ''
+            res['debit_balance'] = 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]) || 0) + base[:credit][i].values[0] : ''
-            res['credit_diff'] = base[:credit][i] ? 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_balance'] = base[:credit][i] ? base[:credit][i].values[0] : ''
             a << res
           end
         end
@@ -151,12 +153,7 @@ module LucaBook
       readable(@statement)
     end
 
-    def accumulate_balance(monthly_diffs)
-      data = monthly_diffs.each_with_object({}) do |month, h|
-        month.each do |k, v|
-          h[k] = h[k].nil? ? v : h[k] + v
-        end
-      end
+    def accumulate_balance(data)
       { debit: [], credit: [] }.tap do |res|
         data.sort.to_h.each do |k, v|
           case k
@@ -170,103 +167,37 @@ module LucaBook
     end
 
     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|
+      set_pl(level)
+      @statement = @monthly.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)
+          @pl_data.keys.each { |k| h[k] = data[k] || BigDecimal('0') }
         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' }
+      @statement << @pl_data
       readable(code2label)
     end
 
+    # 
+    def net_income
+      set_pl(2)
+      @pl_data['HA']
+    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|
-        while date <= last_date do
-          diff, _count = net(date.year, date.month)
-          diff.each do |k, v|
-            next if /^[_]/.match(k)
+        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
-          date = date.next_month
+          res[k] = res[k].nil? ? v : res[k] + v
         end
       end
     end
 
-    def self.accumulate_month(year, month)
-      monthly_record, count = net(year, month)
-      [total_subaccount(monthly_record), count]
-    end
-
-    # Accumulate Level 2, 3 account.
-    #
-    def self.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, /^[123][0-9A-Z]{2,}/)
-        res['40'] = sum_matched(report, /^[4][0-9A-Z]{2,}/)
-        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['_d'] = report['_d']
-
-        report.each do |k, v|
-          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
-          end
-        end
-        res.sort.to_h
-      end
-    end
-
     def code_sum(report)
       legal_items.each.with_object({}) do |k, h|
         h[k] = self.class.sum_matched(report, /^#{k}.*/)
@@ -275,14 +206,16 @@ module LucaBook
 
     def set_balance
       pre_last = @start_date.prev_month
-      pre = if @start_date.month > LucaSupport::CONFIG['fy_start'].to_i
-              self.class.accumulate_term(pre_last.year, LucaSupport::CONFIG['fy_start'], pre_last.year, pre_last.month)
-            elsif @start_date.month < LucaSupport::CONFIG['fy_start'].to_i
-              self.class.accumulate_term(pre_last.year - 1, LucaSupport::CONFIG['fy_start'], pre_last.year, pre_last.month)
-            end
-
-      base = Dict.latest_balance.each_with_object({}) do |(k, v), h|
+      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(@start_date).each_with_object({}) do |(k, v), h|
         h[k] = BigDecimal(v[:balance].to_s) if v[:balance]
+        h[k] ||= BigDecimal('0') if k.length == 2
       end
       if pre
         idx = (pre.keys + base.keys).uniq
@@ -293,101 +226,93 @@ module LucaBook
       self.class.total_subaccount(base)
     end
 
-    def self.sum_matched(report, reg)
-      report.select { |k, v| reg.match(k)}.values.sum
+    def render_xbrl(filename = nil)
+      set_bs(3, legal: true)
+      set_pl(3)
+      country_suffix = CONFIG['country'] || 'en'
+      @company = CGI.escapeHTML(CONFIG.dig('company', 'name'))
+      @balance_sheet_selected = 'true'
+      @pl_selected = 'true'
+      @capital_change_selected = 'true'
+      @issue_date = Date.today
+
+      prior_bs = @start_balance.filter { |k, _v| /^[9]/.match(k) }
+      @xbrl_entries = @bs_data.map{ |k, v| xbrl_line(k, v, prior_bs[k]) }.compact.join("\n")
+      @xbrl_entries += @pl_data.map{ |k, v| xbrl_line(k, v) }.compact.join("\n")
+      @filename = filename || @issue_date.to_s
+
+      File.open("#{@filename}.xbrl", 'w') { |f| f.write render_erb(search_template("base-#{country_suffix}.xbrl.erb")) }
+      File.open("#{@filename}.xsd", 'w') { |f| f.write render_erb(search_template("base-#{country_suffix}.xsd.erb")) }
     end
 
-    # for assert purpose
-    #
-    def self.gross(year, 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
+    def xbrl_line(code, amount, prior_amount = nil)
+      return nil if /^_/.match(code)
 
-      sum = { debit: {}, credit: {}, debit_count: {}, credit_count: {} }
-      idx_memo = []
-      search(year, month, nil, 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
+      context = /^[0-9]/.match(code) ? 'CurrentYearNonConsolidatedInstant' : 'CurrentYearNonConsolidatedDuration'
+      tag = @@dict.dig(code, :xbrl_id)
+      #raise "xbrl_id not found: #{code}" if tag.nil?
+      return nil if tag.nil?
+      return nil if readable(amount).zero? && prior_amount.nil?
+
+      prior = prior_amount.nil? ? '' : "<#{tag} decimals=\"0\" unitRef=\"JPY\" contextRef=\"Prior1YearNonConsolidatedInstant\">#{readable(prior_amount)}</#{tag}>\n"
+      current = "<#{tag} decimals=\"0\" unitRef=\"JPY\" contextRef=\"#{context}\">#{readable(amount)}</#{tag}>"
+
+      prior + current
+    end
+
+    def self.search_code(code)
+      return code if @@dict.dig(code)
+
+      @@dict.search(code).tap do |new_code|
+        if new_code.nil?
+          puts "Search word is not matched with labels"
+          exit 1
         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)
-      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') : 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)
+    private
+
+    def set_bs(level = 3, legal: false)
+      @start_balance.each do |k, v|
+        next if /^_/.match(k)
+        @monthly.first[k] = (v || 0) + (@monthly.first[k] || 0)
+      end
+      list = @monthly.map { |data| data.select { |k, _v| k.length <= level } }
+      list.map! { |data| code_sum(data).merge(data) } if legal
+      @bs_data = list.each_with_object({}) do |month, h|
+        month.each do |k, v|
+          next if /^_/.match(k)
+
+          h[k] = (h[k] || BigDecimal('0')) + v
         end
       end
-      [diff, count]
     end
 
-    # TODO: obsolete in favor of Dict.latest_balance()
-    def load_start
-      file = Pathname(LucaSupport::Config::Pjdir) / 'data' / 'balance' / 'start.tsv'
-      {}.tap do |dict|
-        LucaRecord::Dict.load_tsv_dict(file).each { |k, v| h[k] = v[:balance] if !v[:balance].nil? }
+    def set_pl(level = 2)
+      keys = @monthly.inject([]) { |a, data| a + data.keys }
+               .compact.select { |k| /^[A-H_].+/.match(k) }
+               .uniq.sort
+      keys.select! { |k| k.length <= level }
+      @pl_data = @monthly.each_with_object({}) do |item, h|
+        keys.each do |k|
+          h[k] = (h[k] || BigDecimal('0')) + (item[k] || BigDecimal('0')) if /^[^_]/.match(k)
+        end
+        h['_d'] = 'Period Total'
       end
     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
+
+    def lib_path
+      __dir__
+    end
   end
 end