sql/Pg-upgrade2/finanzamt_update_fa_bufa_nr_hamburg.pl

   1 # @tag: finanzamt_update_fa_bufa_nr_hamburg
   2 # @description: Aktualisiert die fa_bufa_nr für Hamburg
   3 # @depends: release_2_7_0
   4 package SL::DBUpgrade2::finanzamt_update_fa_bufa_nr_hamburg;
   5
   6 use strict;
   7 use utf8;
   8
   9 use parent qw(SL::DBUpgrade2::Base);
  10
  11 sub run {
  12   my ($self) = @_;
  13
  14   my @data = (
  15     ['02', '41'],
  16     ['57', '42'],
  17     ['71', '43'],
  18     ['15', '43'],
  19     ['03', '44'],
  20     ['54', '45'],
  21     ['22', '46'],
  22     ['06', '47'],
  23     ['74', '48'],
  24     ['26', '49'],
  25     ['09', '50'],
  26     ['08', '51'],
  27   );
  28
  29   foreach my $entry (@data) {
  30     $self->db_query('
  31     UPDATE finanzamt
  32     SET
  33       fa_bufa_nr = \'22'. $entry->[1] .'\'
  34     WHERE
  35           fa_land_nr = \'2\'
  36       AND fa_bufa_nr = \'22'. $entry->[0] .'\'');
  37   }
  38
  39   return 1;
  40 }
  41
  42 1;