luca-jp 0.1.2 → 0.1.7

data/lib/luca/jp/common.rb

@@ -31,6 +31,8 @@ module Luca
 
       def 中小企業の軽減税率対象所得(所得 = nil)
         所得 ||= 所得金額
+        return 0 if 所得 <= 0
+
         if 所得 >= 8_000_000
           8_000_000
         elsif 所得 < 0
@@ -41,11 +43,13 @@ module Luca
       end
 
       def 中小企業の軽減税額(所得 = nil)
-        中小企業の軽減税率対象所得(所得) * 15 / 100
+          中小企業の軽減税率対象所得(所得) * 15 / 100
       end
 
       def 中小企業の軽減税率対象を超える所得(所得 = nil)
         所得 ||= 所得金額
+        return 0 if 所得 <= 0
+
         if 所得 <= 8_000_000
           0
         else
@@ -61,21 +65,54 @@ module Luca
         (地方法人税課税標準 * 10.3 / 100).to_i
       end
 
+      # 繰越損失適用後の所得金額
+      #
+      def 所得金額
+        @繰越損失管理 = Sonshitsu.load(@end_date).update(当期所得金額).save if @繰越損失管理.nil?
+        @繰越損失管理.profit
+      end
+
       # 税引前当期利益をもとに計算
       # 消費税を租税公課に計上している場合、控除済みの金額
-      # 未払/未収事業税は精算時に認識
+      # 未払事業税は精算時に認識
       #
-      def 所得金額
+      def 当期所得金額
         _, 納付事業税 = 未納事業税期中増減
-        LucaSupport::Code.readable(@pl_data.dig('GA') - 納付事業税 + 還付事業税)
+        LucaSupport::Code.readable(@pl_data.dig('GA') - 納付事業税)
+      end
+
+      # -----------------------------------------------------
+      # :section: 繰越損失の計算
+      # -----------------------------------------------------
+
+      def 期首繰越損失
+        @繰越損失管理.records
+          .filter { |record| record['start_date'] > @end_date.prev_year(10) && record['end_date'] < @start_date }
+          .inject(0) { |sum, record| sum + (record['amount'] || 0) }
+      end
+
+      def 当期控除計
+        @繰越損失管理.deduction
+      end
+
+      def 翌期繰越損失
+        @繰越損失管理.records
+          .filter { |record| record['start_date'] > @end_date.prev_year(10) && record['end_date'] < @start_date }
+          .inject(0) { |sum, record| sum + (record['amount'] || 0) }
+      end
+
+      def 当期繰越損失
+        @繰越損失管理.records
+          .filter { |record| record['start_date'] == @start_date }.dig(0, 'increase') || 0
       end
 
+
       # -----------------------------------------------------
       # :section: 地方税額の計算
       # -----------------------------------------------------
 
       def 均等割
-        if LucaSupport::CONFIG.dig('jp', 'eltax', 'office_23ku')
+        if config.dig('jp', 'eltax', 'office_23ku')
           [70_000, 0]
         else
           [20_000, 50_000]
@@ -88,7 +125,7 @@ module Luca
                    else
                      @法人税割課税標準
                    end
-        if LucaSupport::CONFIG.dig('jp', 'eltax', 'office_23ku')
+        if config.dig('jp', 'eltax', 'office_23ku')
           [(課税標準 * 7 / 100).floor, 0]
         else
           [(課税標準 * 1 / 100).floor, (課税標準 * 6 / 100).floor]
@@ -97,6 +134,8 @@ module Luca
 
       def 所得400万以下(所得 = nil)
         所得 ||= 所得金額
+        return 0 if 所得 < 0
+
         if 所得 >= 4_000_000
           4_000_000
         else
@@ -110,6 +149,8 @@ module Luca
 
       def 所得800万以下(所得 = nil)
         所得 ||= 所得金額
+        return 0 if 所得 < 0
+
         if 所得 <= 4_000_000
           0
         elsif 所得 >= 8_000_000
@@ -125,6 +166,8 @@ module Luca
 
       def 所得800万超(所得 = nil)
         所得 ||= 所得金額
+        return 0 if 所得 < 0
+
         if 所得 <= 8_000_000
           0
         else
@@ -161,12 +204,25 @@ module Luca
       end
 
       def 還付事業税
-        LucaBook::State.gross(@start_date.year, @start_date.month, @end_date.year, @end_date.month, code: '1504')[:credit]
+        refund_tax('1504')
       end
 
       def 未納事業税期中増減
         r = LucaBook::State.gross(@start_date.year, @start_date.month, @end_date.year, @end_date.month, code: '5152')
-        [LucaSupport::Code.readable(r[:credit] || 0), LucaSupport::Code.readable(r[:debit] || 0)]
+        [LucaSupport::Code.readable(r[:credit]['5152'] || 0), LucaSupport::Code.readable(r[:debit]['5152'] || 0)]
+      end
+
+
+      # -----------------------------------------------------
+      # :section: 消費税の計算
+      # -----------------------------------------------------
+
+      def 消費税中間納付額
+        prepaid_tax('185B')
+      end
+
+      def 地方消費税中間納付額
+        prepaid_tax('185C')
       end
     end
   end

data/lib/luca/jp/it_part.rb

@@ -6,6 +6,8 @@ require 'luca_support/config'
 module Luca
   module Jp
     module ItPart
+      # タグの出現順序は順不同ではない。eTaxの定義に準拠
+      #
       def it_part
         entries = ['<IT VR="1.4" id="IT">']
         entries.concat(['zeimusho']
@@ -23,12 +25,13 @@ module Luca
         entries.concat([jigyo_nendo_from, jigyo_nendo_to, kazei_kikan_from, kazei_kikan_to])
         entries << render_it_tag('keiri_sekininsha')
         entries << '<SHINKOKU_KBN ID="SHINKOKU_KBN"><kubun_CD>1</kubun_CD></SHINKOKU_KBN>'
+        entries.concat(['eltax_id'].map{ |key| render_it_tag(key) })
         entries << '</IT>'
         entries.compact.join("\n")
       end
 
       def render_it_tag(key)
-        content = LucaSupport::CONFIG.dig('jp', 'it_part', key)
+        content = config.dig('jp', 'it_part', key)
         return nil if content.nil?
 
         case key

data/lib/luca/jp/sonshitsu.rb

@@ -0,0 +1,102 @@
+# frozen_string_literal: true
+
+require 'date'
+require 'pathname'
+require 'yaml'
+require 'luca_book'
+require 'luca_support/config'
+
+module Luca
+  module Jp
+    # 青色申告に基く繰越損失の計算
+    #
+    class Sonshitsu
+      # 当期控除額
+      attr_reader :deduction
+      # 控除後所得
+      attr_reader :profit
+      # 各期繰越損失
+      attr_reader :records
+
+      def initialize(records, date)
+        @records = records
+        @report_date = date
+        net_amount
+        @deduction = 0
+        @profit = 0
+      end
+
+      # sonshitsu format is as bellows:
+      #
+      #   - start_date: 2020-01-01
+      #     end_date: 2020-12-31
+      #     increase: 1000000
+      #   - start_date: 2021-01-01
+      #     end_date: 2021-12-31
+      #     decrease: 800000
+      #
+      def self.load(this_year)
+        records = if File.exist?(record_file)
+                    YAML.load_file(record_file)
+                      .filter { |record| record['start_date'] > this_year.prev_year(11) && record['end_date'] < this_year }
+                      .sort { |a, b| a['start_date'] <=> b['start_date'] }
+                 else
+                   []
+                 end
+        new(records, this_year)
+      end
+
+      def save
+        File.open(self.class.record_file, 'w') { |f| f.puts YAML.dump(@records)}
+        self
+      end
+
+      def update(profit_or_loss)
+        return self if profit_or_loss == 0
+
+        if profit_or_loss < 0
+          start_date, end_date = LucaBook::Util.current_fy(@report_date)
+          @records << {
+            'start_date' => start_date,
+            'end_date' => end_date,
+            'increase' => profit_or_loss.abs
+          }
+          @profit = profit_or_loss
+          return self
+        end
+
+        @records.each do |record|
+          next if profit_or_loss <= 0
+          next if record['amount'] <= 0
+
+          decrease_amount = [record['amount'], profit_or_loss].min
+          record['decrease'] ||= []
+          record['decrease'] << { 'date' => @report_date, 'val' => decrease_amount }
+          record['amount'] -= decrease_amount
+          profit_or_loss -= decrease_amount
+          @deduction += decrease_amount
+        end
+        @profit = profit_or_loss
+        self
+      end
+
+      def net_amount
+        @records.each do |record|
+          record['amount'] = record['increase'] - past_decreased(record['decrease'])
+          record['decrease'] = record['decrease']&.reject { |decrease_record| decrease_record['date'] > @report_date.prev_year }
+        end
+      end
+
+      def past_decreased(decrease_records)
+        return 0 if decrease_records.nil?
+
+        decrease_records.filter { |record| record['date'] <= @report_date.prev_year }
+          .map { |record| record['val'] }.sum || 0
+      end
+
+      def self.record_file
+        Pathname(LucaSupport::PJDIR) / 'data' / 'balance' / 'sonshitsu.yml'
+      end
+    end
+  end
+end

data/lib/luca/jp/syouhizei.rb

@@ -12,6 +12,7 @@ module Luca
   module Jp
     class Syouhizei < LucaBook::State
       include LucaSupport::View
+      include Luca::Jp::ItPart
       include Luca::Jp::Util
 
       @dirname = 'journals'
@@ -23,18 +24,18 @@ module Luca
         set_pl(4)
         set_bs(4)
         @issue_date = Date.today
-        @company = CGI.escapeHTML(LucaSupport::CONFIG.dig('company', 'name'))
+        @company = CGI.escapeHTML(config.dig('company', 'name'))
         @software = 'LucaJp'
         税率 = BigDecimal('7.8') # percent
         地方税率 = BigDecimal('2.2')
 
         @sales = @pl_data.dig('A0') * 100 / (100 + 税率 + 地方税率).floor
         @tax_amount = (課税標準額(@sales) * 税率 / 100).floor
-        @みなし仕入税額 = (@tax_amount * みなし仕入率(LucaSupport::CONFIG.dig('jp', 'syouhizei_kubun')) / 100).floor
+        @みなし仕入税額 = (@tax_amount * みなし仕入率(config.dig('jp', 'syouhizei_kubun')) / 100).floor
         @税額 = LucaSupport::Code.readable(((@tax_amount - @みなし仕入税額) / 100).floor * 100)
         @譲渡割額 = (@税額 * 地方税率 / (税率*100)).floor * 100
-        @中間納付額 = prepaid_tax('185B')
-        @地方税中間納付額 = prepaid_tax('185C')
+        @中間納付額 = 消費税中間納付額
+        @地方税中間納付額 = 地方消費税中間納付額
 
         if export
           {
@@ -119,7 +120,7 @@ module Luca
       end
 
       def 事業区分
-        tags = case LucaSupport::CONFIG.dig('jp', 'syouhizei_kubun')
+        tags = case config.dig('jp', 'syouhizei_kubun')
                when 1
                  ['ABL00030', 'ABL00040', 'ABL00050']
                when 2

data/lib/luca/jp/templates/beppyo1.xml.erb

@@ -44,11 +44,13 @@
         <%= render_attr('BGB00200', @法人税中間納付) %>
         <%= render_attr('BGB00210', 納付税額(@確定法人税額, @法人税中間納付)) %>
         <BGB00320>
-        <%= render_attr('BGB00340', 中間還付税額(@確定法人税額, @法人税中間納付)) %>
+            <%= render_attr('BGB00340', 中間還付税額(@確定法人税額, @法人税中間納付)) %>
             <BGB00380>
                 <%= render_attr('BGB00400', 中間還付税額(@確定法人税額, @法人税中間納付)) %>
             </BGB00380>
         </BGB00320>
+        <%= render_attr('BGB00460', 当期控除計) %>
+        <%= render_attr('BGB00470', 翌期繰越損失 + 当期繰越損失) %>
     </BGB00000>
     <BGC00000>
         <BGC00010>

data/lib/luca/jp/templates/beppyo4.xml.erb

@@ -12,21 +12,28 @@
     </ARB00000>
     <ARC00000>
         <ARC00010>
-            <%= render_attr('ARC00020', 法人税損金納付額) %>
-            <%= render_attr('ARC00030', 法人税損金納付額) %>
+            <%= render_attr('ARC00020', 法人税損金納付額 + 法人税仮払納付額) %>
+            <%= render_attr('ARC00030', 法人税損金納付額 + 法人税仮払納付額) %>
         </ARC00010>
         <ARC00040>
-            <%= render_attr('ARC00050', (都道府県民税損金納付 + 市民税損金納付)) %>
-            <%= render_attr('ARC00060', (都道府県民税損金納付 + 市民税損金納付)) %>
+            <%= render_attr('ARC00050', (都道府県民税損金納付 + 市民税損金納付 + 都道府県民税仮払納付 + 市民税仮払納付)) %>
+            <%= render_attr('ARC00060', (都道府県民税損金納付 + 市民税損金納付 + 都道府県民税仮払納付 + 市民税仮払納付)) %>
         </ARC00040>
         <ARC00100>
-            <%= render_attr('ARC00110', (@法人税等 - 法人税損金納付額 - 都道府県民税損金納付 - 市民税損金納付)) %>
-            <%= render_attr('ARC00120', (@法人税等 - 法人税損金納付額 - 都道府県民税損金納付 - 市民税損金納付)) %>
+            <%= render_attr('ARC00110', (@法人税等 - 法人税損金納付額 - 都道府県民税損金納付 - 市民税損金納付 - 事業税損金納付)) %>
+            <%= render_attr('ARC00120', (@法人税等 - 法人税損金納付額 - 都道府県民税損金納付 - 市民税損金納付 - 事業税損金納付)) %>
         </ARC00100>
         <%= 別表四還付事業税 %>
+        <% if (@当期還付法人税 + @当期還付都道府県住民税 + @当期還付市民税) > 0 %>
+            <ARC00220>
+                <%= render_attr('ARC00230', '前期仮払税金否認') %>
+                <%= render_attr('ARC00240', (@当期還付法人税 + @当期還付都道府県住民税 + @当期還付市民税)) %>
+                <%= render_attr('ARC00250', (@当期還付法人税 + @当期還付都道府県住民税 + @当期還付市民税)) %>
+            </ARC00220>
+        <% end %>
         <ARC00325>
-            <%= render_attr('ARC00330', @法人税等 + @還付事業税) %>
-            <%= render_attr('ARC00340', @法人税等 + @還付事業税) %>
+            <%= render_attr('ARC00330', @法人税等 + @当期還付事業税 + 法人税仮払納付額 + 都道府県民税仮払納付 + 市民税仮払納付) %>
+            <%= render_attr('ARC00340', @法人税等 + @当期還付事業税 + 法人税仮払納付額 + 都道府県民税仮払納付 + 市民税仮払納付) %>
         </ARC00325>
     </ARC00000>
     <ARD00000>
@@ -34,9 +41,20 @@
             <%= render_attr('ARD00050', @納付事業税) %>
             <%= render_attr('ARD00060', @納付事業税) %>
         </ARD00040>
+        <ARD00100>
+            <%= render_attr('ARD00110', @当期還付法人税 + @当期還付都道府県住民税 + @当期還付市民税) %>
+            <%= render_attr('ARD00120', @当期還付法人税 + @当期還付都道府県住民税 + @当期還付市民税) %>
+        </ARD00100>
+        <% if (法人税仮払納付額 + 都道府県民税仮払納付 + 市民税仮払納付) > 0 %>
+            <ARD00215>
+                <%= render_attr('ARD00220', '仮払税金認定損') %>
+                <%= render_attr('ARD00230', (法人税仮払納付額 + 都道府県民税仮払納付 + 市民税仮払納付)) %>
+                <%= render_attr('ARD00240', (法人税仮払納付額 + 都道府県民税仮払納付 + 市民税仮払納付)) %>
+            </ARD00215>
+        <% end %>
         <ARD00280>
-            <%= render_attr('ARD00290', @納付事業税) %>
-            <%= render_attr('ARD00300', @納付事業税) %>
+            <%= render_attr('ARD00290', (@納付事業税 + 法人税仮払納付額 + 都道府県民税仮払納付 + 市民税仮払納付)) %>
+            <%= render_attr('ARD00300', (@納付事業税 + 法人税仮払納付額 + 都道府県民税仮払納付 + 市民税仮払納付)) %>
         </ARD00280>
     </ARD00000>
     <ARE00000>
@@ -55,8 +73,12 @@
         <%= render_attr('ARS00010', @別表四調整所得) %>
         <%= render_attr('ARS00020', @別表四調整所得) %>
     </ARS00000>
+    <ART00000>
+        <%= render_attr('ART00010', @繰越損失管理.deduction) %>
+        <%= render_attr('ART00020', @繰越損失管理.deduction) %>
+    </ART00000>
     <ARV00000>
-        <%= render_attr('ARV00010', @別表四調整所得) %>
-        <%= render_attr('ARV00020', @別表四調整所得) %>
+        <%= render_attr('ARV00010', @別表四調整所得 - @繰越損失管理.deduction) %>
+        <%= render_attr('ARV00020', @別表四調整所得 - @繰越損失管理.deduction) %>
     </ARV00000>
 </HOA420>

data/lib/luca/jp/templates/beppyo51.xml.erb

@@ -7,6 +7,10 @@
         <ICA00040 IDREF="NOZEISHA_NM"/>
     </ICA00000>
     <ICB00000>
+        <%= 別表五一仮払税金 %>
+        <%= 別表五一還付法人税 %>
+        <%= 別表五一還付都道府県住民税 %>
+        <%= 別表五一還付市民税 %>
         <ICB00400>
             <%= render_attr('ICB00410', 期首繰越損益) %>
             <ICB00420>
@@ -21,15 +25,16 @@
                 <%= render_attr('ICB00490', @納税充当金期中減) %>
                 <%= render_attr('ICB00500', @納税充当金期中増) %>
             </ICB00480>
-            <%= render_attr('ICB00510', 期末納税充当金) %>
+            <%= render_attr('ICB00510', @納税充当金期中増) %>
         </ICB00460>
         <ICB00520>
             <ICB00530>
                 <%= render_attr('ICB00540', 期首未納法人税) %>
                 <ICB00550>
-                    <%= render_attr('ICB00560', @法人税期中減) %>
+                    <%= render_attr('ICB00560', @法人税期中減 + @翌期還付法人税) %>
                     <ICB00570>
-                        <%= render_attr('ICB00590', @法人税期中増) %>
+                        <%= render_attr('ICB00580', @法人税中間納付 + @地方法人税中間納付) %>
+                        <%= render_attr('ICB00590', 期末未納法人税) %>
                     </ICB00570>
                 </ICB00550>
                 <%= render_attr('ICB00610', 期末未納法人税) %>
@@ -37,9 +42,10 @@
             <ICB00620>
                 <%= render_attr('ICB00630', 期首未納都道府県民税) %>
                 <ICB00640>
-                    <%= render_attr('ICB00650', @都道府県民税期中減) %>
+                    <%= render_attr('ICB00650', @都道府県民税期中減 + @翌期還付都道府県住民税) %>
                     <ICB00660>
-                        <%= render_attr('ICB00680', @都道府県民税期中増) %>
+                        <%= render_attr('ICB00670', @都道府県民税中間納付) %>
+                        <%= render_attr('ICB00680', 期末未納都道府県民税) %>
                     </ICB00660>
                 </ICB00640>
                 <%= render_attr('ICB00700', 期末未納都道府県民税) %>
@@ -47,9 +53,10 @@
             <ICB00710>
                 <%= render_attr('ICB00720', 期首未納市民税) %>
                 <ICB00730>
-                    <%= render_attr('ICB00740', @市民税期中減) %>
+                    <%= render_attr('ICB00740', @市民税期中減 + @翌期還付市民税) %>
                     <ICB00750>
-                        <%= render_attr('ICB00770', @市民税期中増) %>
+                        <%= render_attr('ICB00760', @市民税中間納付) %>
+                        <%= render_attr('ICB00770', 期末未納市民税) %>
                     </ICB00750>
                 </ICB00730>
                 <%= render_attr('ICB00790', 期末未納市民税) %>