Revision dea9aaea
Von Sven Schöling vor mehr als 15 Jahren hinzugefügt
| SL/IR.pm | ||
|---|---|---|
|
: "current_date";
|
||
|
|
||
|
# get vendor
|
||
|
@values = ();
|
||
|
my @values = ();
|
||
|
my $where = '';
|
||
|
if ($vid) {
|
||
|
$where .= 'AND v.id = ?';
|
||
|
push @values, $vid;
|
||
| ... | ... | |
|
}
|
||
|
my $query =
|
||
|
qq|SELECT
|
||
|
v.id AS vendor_id, v.name AS vendor, v.discount as vendor_discount,
|
||
|
v.id AS vendor_id, v.name AS vendor, v.discount as vendor_discount,
|
||
|
v.creditlimit, v.terms, v.notes AS intnotes,
|
||
|
v.email, v.cc, v.bcc, v.language_id, v.payment_id,
|
||
|
v.street, v.zipcode, v.city, v.country, v.taxzone_id,
|
||
| ... | ... | |
|
$where .= qq| OR (NOT p.obsolete = '1' AND p.ean = ? )|;
|
||
|
push @values, $form->{"partnumber_$i"};
|
||
|
}
|
||
|
|
||
|
|
||
|
if ($form->{"description_$i"}) {
|
||
|
$where .= " ORDER BY p.description";
|
||
|
} else {
|
||
Auch abrufbar als: Unified diff
get_vendor war nicht hinreichend abgesichert gegen mehrfache aufrufe.
bei mehrfachen aufrufen, konnte es passieren dass alte WHERE klauseln noch mitverwendet wurden.
Hoffentlich Fix für Bug 1028.