Revision 5b5a8e41
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| SL/IC.pm | ||
|---|---|---|
| 1538 | 1538 |
|
| 1539 | 1539 |
$form->{"taxzone_id"} *= 1;
|
| 1540 | 1540 |
|
| 1541 |
$dbh = $form->dbconnect($myconfig);
|
|
| 1541 |
$dbh = $form->get_standard_dbh($myconfig);
|
|
| 1542 | 1542 |
|
| 1543 | 1543 |
my $transdate = ""; |
| 1544 | 1544 |
if ($form->{type} eq "invoice") {
|
| ... | ... | |
| 1576 | 1576 |
qq|WHERE p.id = ?|; |
| 1577 | 1577 |
my $ref = selectfirst_hashref_query($form, $dbh, $query, $parts_id); |
| 1578 | 1578 |
|
| 1579 |
if (!$ref) {
|
|
| 1580 |
$dbh->disconnect(); |
|
| 1581 |
return $main::lxdebug->leave_sub(2); |
|
| 1582 |
} |
|
| 1579 |
return $main::lxdebug->leave_sub(2) if (!$ref); |
|
| 1583 | 1580 |
|
| 1584 | 1581 |
$ref->{"inventory_accno_id"} = undef unless ($ref->{"is_part"});
|
| 1585 | 1582 |
|
Auch abrufbar als: Unified diff
$form->get_standard_dbh() benutzen für verbesserte Geschwindigkeit