Merge branch 'b-3.6.1' of ../kivitendo-erp_20220811
[kivitendo-erp.git] / sql / Pg-upgrade2 / konjunkturpaket_2020.sql
diff --git a/sql/Pg-upgrade2/konjunkturpaket_2020.sql b/sql/Pg-upgrade2/konjunkturpaket_2020.sql
new file mode 100644 (file)
index 0000000..50a014c
--- /dev/null
@@ -0,0 +1,210 @@
+-- @tag: konjunkturpaket_2020
+-- @description: Anpassung der Steuersätze für 16%/5% für Deutsche DATEV-Kontenrahmen SKR03 und SKR04
+-- @depends: release_3_5_5 konjunkturpaket_2020_SKR03 konjunkturpaket_2020_SKR04
+-- @ignore: 0
+
+-- begin;
+
+DO $$
+
+DECLARE
+  -- variables for main taxkey creation loop, not all are needed
+  _chart_id int;
+  _accno text;
+  _description text;
+  _startdates date[];
+  _tax_ids int[];
+  _taxkeyentry_id int[];
+  _taxkey_ids int[];
+  _rates numeric[];
+  _taxcharts text[];
+
+  current_taxkey record;
+  new_taxkey     record;
+  _rate          numeric;
+  _tax           record; -- store the new tax we need to assign to a chart, e.g. 5%, 16%
+
+  _taxkey    int;
+  _old_rate  numeric;
+  _old_chart text;
+  _new_chart numeric;
+  _new_rate  text;
+
+  _tax_conversion record;
+
+
+BEGIN
+
+IF ( select coa from defaults ) ~ 'DATEV' THEN
+
+--begin;
+--delete from taxkeys where startdate >= '2020-01-01';
+
+--  create temp table temp_taxkey_conversions (taxkey int, old_rate numeric, new_rate numeric, tax_chart_skr03 text, tax_chart_skr04 text);
+--  insert into temp_taxkey_conversions (taxkey, old_rate, new_rate, tax_chart_skr03, tax_chart_skr04) values
+----    (2, 0.07, 0.05, '1773', '3803'),  -- 5% case is handled by skr03 case -> needs different automatic chart: 1773 Umsatzsteuer 5% (SKR03, instead of 1771 Umsatzsteuer 7%) or 3803 Umsatzsteuer 5%
+--    -- (8, 0.07, 0.05, null, null),
+--    -- (3, 0.19, 0.16, null, null),
+--    -- (9, 0.19, 0.16, null, null),
+--   (13, 0.19, 0.16, null, null);
+
+
+  create temp table temp_taxkey_conversions (taxkey int, old_rate numeric, old_chart text, new_rate numeric, new_chart text);
+
+  IF ( select coa from defaults ) = 'Germany-DATEV-SKR03EU' THEN
+    insert into temp_taxkey_conversions (taxkey, old_rate, old_chart, new_rate, new_chart)
+    values (9, 0.19, '1576', 0.16, '1575'),
+           (8, 0.07, '1571', 0.05, '1568'),
+           (3, 0.19, '1776', 0.16, '1575'),
+           (2, 0.07, '1771', 0.05, '1775');
+         --1776 => 19%
+         --1775 => 16%
+         --1775 =>  5%
+         --1771 =>  7%
+         --
+         --VSt:
+         --1576 => 19%
+         --1575 => 16%
+         --1568 =>  5%
+         --1571 =>  7%
+
+  ELSE  -- Germany-DATEV-SKR04EU
+    insert into temp_taxkey_conversions (taxkey, old_rate, old_chart, new_rate, new_chart)
+    values (9, 0.19, '1406', 0.16, '1405'),
+           (8, 0.07, '1401', 0.05, '1403'),
+           (3, 0.19, '3806', 0.16, '3805'),
+           (2, 0.07, '3801', 0.05, '3803');
+  END IF;
+
+  FOR _chart_id, _accno, _description, _startdates, _tax_ids, _taxkeyentry_id, _taxkey_ids, _rates, _taxcharts IN
+
+      select c.id as chart_id,
+             c.accno,
+             c.description,
+             array_agg(t.startdate order by t.startdate desc) as startdates,
+             array_agg(t.tax_id    order by t.startdate desc) as tax_ids,
+             array_agg(t.id        order by t.startdate desc) as taxkeyentry_id,
+             array_agg(t.taxkey_id order by t.startdate desc) as taxkey_ids,
+             array_agg(tax.rate    order by t.startdate desc) as rates,
+             array_agg(tc.accno    order by t.startdate desc) as taxcharts
+        from taxkeys t
+             left join chart c  on (c.id         = t.chart_id)
+             left join tax      on (tax.id       = t.tax_id)
+             left join chart tc on (tax.chart_id = tc.id)
+       where t.taxkey_id in (select taxkey from temp_taxkey_conversions)  -- 2, 3, 8, 9
+             -- and (c.accno = '8400') -- debug
+             -- you can't filter for valid taxrates 19% or 7% here, as that would still leave the 16% rates as the current one
+    group by c.id,
+             c.accno,
+             c.description
+    order by c.accno
+
+    -- example output for human debugging:
+    --  chart_id | accno |     description     |       startdates        |  tax_ids  | taxkeyentry_id | taxkey_ids |       rates       |  taxcharts
+    -- ----------+-------+---------------------+-------------------------+-----------+----------------+------------+-------------------+-------------
+    --       184 | 8400  | Erlöse 16%/19% USt. | {2007-01-01,1970-01-01} | {777,379} | {793,676}      | {3,3}      | {0.19000,0.16000} | {1776,1775}
+
+  -- each chart with one of the applicable taxkeys should receive two new entries, one starting on 01.07.2020, the other on 01.01.2021
+  LOOP
+    -- 1. create new taxkey entry on 2020-07-01, using the active taxkey on 2020-06-30 as a template, but linking to a tax with a different tax rate
+    -- 2. create new taxkey entry on 2021-01-01, using the active taxkey on 2020-06-30 as a template, but with the new date
+
+
+    -- fetch tax information for 2020-06-30, one day before the change, this should also be the first entry in the ordered array aggregates
+    -- this can be used as the template for the reset on 2021-01-01
+
+    -- raise notice 'looking up current taxkey for chart % and taxkey %', (select accno from chart where id = _chart_id), _taxkey_ids[1];
+    select into current_taxkey tk.*, t.rate, t.taxkey
+           from taxkeys tk
+                left join tax t on (t.id = tk.tax_id)
+          where     tk.taxkey_id = _taxkey_ids[1] -- assume taxkey never changed, use the first one
+                and tk.chart_id = _chart_id
+                and tk.startdate <= '2020-06-30'
+       order by tk.startdate desc
+          limit 1;
+    -- RAISE NOTICE 'found current_taxkey = %', current_taxkey;
+    IF current_taxkey is null then continue; end if;
+    -- RAISE NOTICE 'found chart % with current startdate % and taxkey % (current: %), rate = %', _accno, current_taxkey.startdate, _taxkey_ids[1], current_taxkey.taxkey, current_taxkey.rate;
+
+    -- RAISE NOTICE 'current_taxkey = %', current_taxkey;
+    -- RAISE NOTICE 'looking up tkc for chart_id % and taxkey  %', _chart_id, current_taxkey.taxkey;
+
+    select into _taxkey, _old_rate, _old_chart, _new_chart, _new_rate
+                 taxkey,  old_rate,  old_chart,  new_chart,  new_rate
+    from temp_taxkey_conversions tkc
+    where     tkc.taxkey    = current_taxkey.taxkey
+          and tkc.old_rate = current_taxkey.rate;
+          -- and tkc.new_chart = current_taxkey.new_chart;
+
+    -- raise notice '_old_rate = %, _new_rate = %', _old_rate, _new_rate;
+
+    -- don't do anything if current taxrate is 0, which might be the case for taxkey 13, if they were configured in that way
+    IF current_taxkey.rate != 0 THEN  -- debug
+
+      -- _rate := null;
+
+      -- IF current_taxkey.rate = 0.19 THEN _rate := 0.16; END IF;
+      -- IF current_taxkey.rate = 0.07 THEN _rate := 0.05; END IF;
+      IF _old_rate is NULL THEN
+
+        -- option A: ignore rates which don't make sense, useful for upgrade mode
+        -- option B: throw exception, useful for manually testing script
+
+        -- A:
+        -- if the rate on 2020-06-30 is neither 19 or 7, simply ignore it, it is obviously not configured correctly
+        -- This is the case for SKR03 and chart 8315 (taxkey 13)
+        -- It might be better to throw an exception, however then the test cases don't run. Or just fix the chart via an upgrade script!
+        CONTINUE;
+
+        -- B:
+        -- RAISE EXCEPTION 'illegal current taxrate % on 2020-06-30 (startdate = %) for chart % with taxkey %, should be either 0.19 or 0.07',
+        --                 current_taxkey.rate, current_taxkey.startdate,
+        --                 (select accno from chart where id = current_taxkey.chart_id),
+        --                 current_taxkey.taxkey_id;
+      END IF;
+      -- RAISE NOTICE 'current_taxkey.rate = %, desired rate = %, looking for taxkey_id %', current_taxkey.rate, _rate, _taxkey_ids[1];
+
+      -- if a chart was created way after 2007 and only ever configured for
+      -- 19%, never 16%, which is the case for SKR04 and taxkey 13, there will only be 3
+      -- taxkeys per chart after adding the two new ones
+
+      -- RAISE NOTICE 'searching for tax with taxkey % and rate %', _taxkey_ids[1], _rate;
+      select into _tax
+                  *
+             from tax
+            where tax.rate = _old_rate
+                  and tax.taxkey = _taxkey_ids[1]
+         order by itime desc
+            limit 1; -- look up tax with same taxkey but corresponding rate. As there will now be two entries for e.g. taxkey 9 with rate of 0.16, the old pre-2007 entry and the new 2020-entry. They can only be differentiated by their (automatic tax) chart_id, or during this upgrade script, via itime, use the later one
+                     -- this also assumes taxkeys never change
+      -- RAISE NOTICE 'tax = %', _tax;
+
+      -- insert into taxkeys (chart_id,                 tax_id,   taxkey_id,                pos_ustva,    startdate)
+      --              values ( (select id from chart where accno = 'kkkkgtkttttkk current_taxkey.chart_id, _tax.id, _tax.taxkey, current_taxkey.pos_ustva, '2020-07-01');
+    END IF;
+
+    -- raise notice 'inserting taxkey';
+    insert into taxkeys (chart_id,                                tax_id,                taxkey_id,                pos_ustva, startdate   )
+                 values (_chart_id,
+                         (select id from tax where taxkey = current_taxkey.taxkey and rate = _new_rate::numeric),
+                         current_taxkey.taxkey, -- 2, 3, 8, 9
+                         current_taxkey.pos_ustva, '2020-07-01');
+
+    -- finally insert a copy of the taxkey on 2020-06-30 with the new startdate 2021-01-01, thereby resetting the tax rates again
+    insert into taxkeys (chart_id, tax_id, taxkey_id, pos_ustva, startdate)
+                 values (_chart_id,
+                         current_taxkey.tax_id,
+                         current_taxkey.taxkey,
+                         current_taxkey.pos_ustva, '2021-01-01');
+
+    -- RAISE NOTICE 'inserted 2 taxkeys for chart % with taxkey %', (select accno from chart where id = current_taxkey.chart_id), current_taxkey.taxkey_id;
+  END LOOP;  --
+
+  drop table temp_taxkey_conversions;
+
+END IF;
+
+END $$;
+
+-- select * from taxkeys where startdate >= '2020-01-01';
+-- rollback;