Revision 024d2c29
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
SL/AP.pm | ||
---|---|---|
781 | 781 |
} |
782 | 782 |
|
783 | 783 |
for my $row (@$rowref) { |
784 |
delete @$row{qw(itime mtime link)}; |
|
784 |
delete @$row{qw(itime mtime link acc_trans_id)};
|
|
785 | 785 |
$query = sprintf 'INSERT INTO acc_trans (%s) VALUES (%s)', join(', ', keys %$row), join(', ', map '?', values %$row); |
786 | 786 |
$row->{trans_id} = $new_id; |
787 | 787 |
$row->{amount} *= -1; |
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