Revision f27688a0
Von Bernd Bleßmann vor etwa 1 Jahr hinzugefügt
SL/AM.pm | ||
---|---|---|
97 | 97 |
} |
98 | 98 |
|
99 | 99 |
my $active_taxkey = $chart_obj->get_active_taxkey; |
100 |
$form->{$_} = $active_taxkey->$_ foreach qw(taxkey_id pos_ustva tax_id startdate); |
|
101 |
$form->{tax} = $active_taxkey->tax_id . '--' . $active_taxkey->taxkey_id; |
|
100 |
if ($active_taxkey) { |
|
101 |
$form->{$_} = $active_taxkey->$_ foreach qw(taxkey_id pos_ustva tax_id startdate); |
|
102 |
$form->{tax} = $active_taxkey->tax_id . '--' . $active_taxkey->taxkey_id; |
|
103 |
} |
|
102 | 104 |
|
103 | 105 |
# check if there are any transactions for this chart |
104 | 106 |
$form->{orphaned} = $chart_obj->has_transaction ? 0 : 1; |
Auch abrufbar als: Unified diff
Konten auch ohne Eintrag in taxkeys bearbeiten können.
Das sollte zwar nicht vorkommen, aber es gibt auch in neu angelegten
SKR03/04-Datenbanken Konten, die keinen Eintrag in taxkeys haben. Diese
lassen sich dann nicht editieren/korrigieren.
Beim Speichern der Konten wird schon (und wurde vorher auch) überprüft,
ob ein gültiger Steuerschlüssel vorliegt.
Evtl. sollte auch noch ein Upgrade-Skript für diese Konten gebaut werden.