Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 4e8e33e9

Von G. Richardson vor fast 4 Jahren hinzugefügt

  • ID 4e8e33e9c0a98f10551a4ae18597dc724e621a13
  • Vorgänger a05cda74
  • Nachfolger c4cea463

AR/IR/OE - Steuerbeschreibung an Oberfläche / Druck aus tax_id holen

siehe Kommentare in SL/IS.pm

Wenn ein Steuerautomatikkonto mehrmals bei den Steuern auftaucht kann
man die Steuerbeschreibung nicht mehr eindeutig anhand der Kontonummer
(hier als taxnumber verwendet) bestimmen, von daher wird jetzt immer
auch die tax_id mit ausgelesen.

Hier gibt es noch ganz viel Refactoringpotential...

Unterschiede anzeigen:

SL/IC.pm
806 806
SQL
807 807

  
808 808
  my $query_tax = <<SQL;
809
    SELECT c.accno, t.taxdescription AS description, t.rate,
809
    SELECT c.accno, t.taxdescription AS description, t.id as tax_id, t.rate,
810 810
           c.accno as taxnumber
811 811
    FROM tax t
812 812
    LEFT JOIN chart c ON c.id = t.chart_id
......
838 838
    $form->{"taxaccounts_$index"} = $ref->{"accno"};
839 839
    $form->{"taxaccounts"} .= "$ref->{accno} "if $form->{"taxaccounts"} !~ /$ref->{accno}/;
840 840

  
841
    $form->{"$ref->{accno}_${_}"} = $ref->{$_} for qw(rate description taxnumber);
841
    $form->{"$ref->{accno}_${_}"} = $ref->{$_} for qw(rate description taxnumber tax_id);
842 842
  }
843 843

  
844 844
  $sth_tax->finish;

Auch abrufbar als: Unified diff