Revision f36eb9fc
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 2016 | 2016 |
sub create_links {
|
| 2017 | 2017 |
$main::lxdebug->enter_sub(); |
| 2018 | 2018 |
|
| 2019 |
my ($self, $module, $myconfig, $table) = @_; |
|
| 2019 |
my ($self, $module, $myconfig, $table, $provided_dbh) = @_;
|
|
| 2020 | 2020 |
|
| 2021 | 2021 |
my ($fld, $arap); |
| 2022 | 2022 |
if ($table eq "customer") {
|
| ... | ... | |
| 2033 | 2033 |
# get last customers or vendors |
| 2034 | 2034 |
my ($query, $sth, $ref); |
| 2035 | 2035 |
|
| 2036 |
my $dbh = $self->dbconnect($myconfig); |
|
| 2036 |
my $dbh = $provided_dbh ? $provided_dbh : $self->dbconnect($myconfig);
|
|
| 2037 | 2037 |
my %xkeyref = (); |
| 2038 | 2038 |
|
| 2039 | 2039 |
if (!$self->{id}) {
|
| ... | ... | |
| 2227 | 2227 |
|
| 2228 | 2228 |
} |
| 2229 | 2229 |
|
| 2230 |
$dbh->disconnect; |
|
| 2230 |
$dbh->disconnect() unless $provided_dbh;
|
|
| 2231 | 2231 |
|
| 2232 | 2232 |
$main::lxdebug->leave_sub(); |
| 2233 | 2233 |
} |
Auch abrufbar als: Unified diff
Die Funktion "Zahlung buchen" bei Debitorenrechnungen komplett umgeschrieben. Sie verlässt sich nun nicht mehr auf die aktuellen Daten in $form, um die alten Einträge in acc_trans zu löschen, sondern lädt den vorherigen Stand aus der Datenbank, entfernt darauf basierend die Einträge in acc_trans und lässt AR->post_transaction() selber die Zahlungen eintragen.