Revision af281b3c
Von Moritz Bunkus vor mehr als 13 Jahren hinzugefügt
SL/CT.pm | ||
---|---|---|
236 | 236 |
$form->{klass} = 0 unless ($form->{klass}); |
237 | 237 |
|
238 | 238 |
# connect to database |
239 |
my $dbh = $form->dbconnect_noauto($myconfig);
|
|
239 |
my $dbh = $form->get_standard_dbh;
|
|
240 | 240 |
|
241 | 241 |
map( { |
242 | 242 |
$form->{"cp_${_}"} = $form->{"selected_cp_${_}"} |
... | ... | |
445 | 445 |
'always_valid' => 1); |
446 | 446 |
|
447 | 447 |
my $rc = $dbh->commit(); |
448 |
$dbh->disconnect(); |
|
449 | 448 |
|
450 | 449 |
$main::lxdebug->leave_sub(); |
451 | 450 |
return $rc; |
SL/IC.pm | ||
---|---|---|
288 | 288 |
my ($self, $myconfig, $form) = @_; |
289 | 289 |
my @values; |
290 | 290 |
# connect to database, turn off AutoCommit |
291 |
my $dbh = $form->dbconnect_noauto($myconfig);
|
|
291 |
my $dbh = $form->get_standard_dbh;
|
|
292 | 292 |
|
293 | 293 |
# save the part |
294 | 294 |
# make up a unique handle and store in partnumber field |
... | ... | |
593 | 593 |
|
594 | 594 |
# commit |
595 | 595 |
my $rc = $dbh->commit; |
596 |
$dbh->disconnect; |
|
597 | 596 |
|
598 | 597 |
$main::lxdebug->leave_sub(); |
599 | 598 |
|
Auch abrufbar als: Unified diff
Bei Locking dasselbe DB-Handle verwenden
Seit der neuen Klasse für den Zugriff auf 'defaults' ist durch das
"SELECT ..." die 'defaults' in der DB-Verbindung gelockt, die über
get_standard_dbh zurückgegeben wird. Versucht nun SL/TransNumber, mit
"LOCK defaults" die Tabelle ebenfalls zu locken, so klappt das nur,
wenn das aus derselben Verbindung heraus passiert. Also darf da keine
zweite mit $form->dbconnect_noauto geöffnet werden.
Fix für Bug 1687.