Revision 39da7f8c
Von Moritz Bunkus vor mehr als 15 Jahren hinzugefügt
| SL/AP.pm | ||
|---|---|---|
| 96 | 96 |
qq|ORDER BY c.accno|; |
| 97 | 97 |
$sth = $dbh->prepare($query); |
| 98 | 98 |
$sth->execute($form->{"tax_id_$i"}) || $form->dberror($query . " (" . $form->{"tax_id_$i"} . ")");
|
| 99 |
($form->{AP_amounts}{"tax_$i"}, $form->{"taxkey_$i"}, $form->{"taxrate_$i"}) =
|
|
| 100 |
$sth->fetchrow_array; |
|
| 101 |
$form->{AP_amounts}{"tax_$i"}{taxkey} = $form->{"taxkey_$i"};
|
|
| 102 |
$form->{AP_amounts}{"amount_$i"}{taxkey} = $form->{"taxkey_$i"};
|
|
| 99 |
($form->{AP_amounts}{"tax_$i"}, $form->{"taxkey_$i"}, $form->{"taxrate_$i"}) = $sth->fetchrow_array();
|
|
| 103 | 100 |
|
| 104 | 101 |
$sth->finish; |
| 105 | 102 |
if ($form->{taxincluded} *= 1) {
|
| ... | ... | |
| 212 | 209 |
if ($form->{"amount_$i"} != 0) {
|
| 213 | 210 |
my $project_id; |
| 214 | 211 |
$project_id = conv_i($form->{"project_id_$i"});
|
| 215 |
$taxkey = $form->{AP_amounts}{"amount_$i"}{taxkey};
|
|
| 216 | 212 |
|
| 217 | 213 |
# insert detail records in acc_trans |
| 218 | 214 |
$query = |
| ... | ... | |
| 222 | 218 |
qq| ?, ?, ?, ?)|; |
| 223 | 219 |
@values = ($form->{id}, $form->{AP_amounts}{"amount_$i"},
|
| 224 | 220 |
$form->{"amount_$i"}, conv_date($form->{transdate}),
|
| 225 |
$project_id, $taxkey);
|
|
| 221 |
$project_id, $form->{"taxkey_$i"});
|
|
| 226 | 222 |
do_query($form, $dbh, $query, @values); |
| 227 | 223 |
|
| 228 | 224 |
if ($form->{"tax_$i"} != 0) {
|
| ... | ... | |
| 234 | 230 |
qq| ?, ?, ?, ?)|; |
| 235 | 231 |
@values = ($form->{id}, $form->{AP_amounts}{"tax_$i"},
|
| 236 | 232 |
$form->{"tax_$i"}, conv_date($form->{transdate}),
|
| 237 |
$project_id, $taxkey);
|
|
| 233 |
$project_id, $form->{"taxkey_$i"});
|
|
| 238 | 234 |
do_query($form, $dbh, $query, @values); |
| 239 | 235 |
} |
| 240 | 236 |
|
Auch abrufbar als: Unified diff
Beim Buchen von Kreditoren- und Debitorenbuchungen immer die richtigen Steuerschlüssel in acc_trans eintragen. Vorher konnte es den Fall geben, dass bei mehreren Einträgen für ein Konto in einer Kreditoren- oder Debitorenbuchung mit unterschiedlichen Steuerschlüssel zwar die richtigen Steuersätze berechnet aber die falschen Steuerschlüssel gespeichert wurden.