Revision 0fc62572
Von Moritz Bunkus vor etwa 14 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
|
undef $standard_dbh;
|
||
|
}
|
||
|
|
||
|
$standard_dbh ||= SL::DB::create->dbh;
|
||
|
$standard_dbh ||= $self->dbconnect_noauto($myconfig);
|
||
|
|
||
|
$main::lxdebug->leave_sub(2);
|
||
|
|
||
| SL/OE.pm | ||
|---|---|---|
|
}
|
||
|
}
|
||
|
|
||
|
$self->save_periodic_invoices_config(dbh => $dbh,
|
||
|
oe_id => $form->{id},
|
||
|
config_yaml => $form->{periodic_invoices_config})
|
||
|
if ($form->{type} eq 'sales_order');
|
||
|
|
||
|
$form->{saved_xyznumber} = $form->{$form->{type} =~ /_quotation$/ ?
|
||
|
"quonumber" : "ordnumber"};
|
||
|
|
||
| ... | ... | |
|
|
||
|
my $rc = $dbh->commit;
|
||
|
|
||
|
$self->save_periodic_invoices_config(dbh => $dbh,
|
||
|
oe_id => $form->{id},
|
||
|
config_yaml => $form->{periodic_invoices_config})
|
||
|
if ($form->{type} eq 'sales_order');
|
||
|
|
||
|
$main::lxdebug->leave_sub();
|
||
|
|
||
|
return $rc;
|
||
Auch abrufbar als: Unified diff
$form->get_standard_dbh nicht von Rose geöffnetes Datenbankhandle nutzen lassen
Rose setzt Datenbankhandle auf autocommit. Die Semantik von
get_standard_dbh ist aber, dass autocommit aus ist und die Funktionen
selber ein Commit machen.