Revision 024d2c29
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
| SL/AR.pm | ||
|---|---|---|
| 690 | 690 |
} |
| 691 | 691 |
|
| 692 | 692 |
for my $row (@$rowref) {
|
| 693 |
delete @$row{qw(itime mtime link)};
|
|
| 693 |
delete @$row{qw(itime mtime link acc_trans_id)};
|
|
| 694 | 694 |
$query = sprintf 'INSERT INTO acc_trans (%s) VALUES (%s)', join(', ', keys %$row), join(', ', map '?', values %$row);
|
| 695 | 695 |
$row->{trans_id} = $new_id;
|
| 696 | 696 |
$row->{amount} *= -1;
|
Auch abrufbar als: Unified diff
Storno von Debitoren-/Kreditorenrechnungen: acc_trans_id nicht doppelt einfügen