Revision 208de6f2
Von Jan Büren vor fast 2 Jahren hinzugefügt
| SL/IS.pm | ||
|---|---|---|
| 2307 | 2307 |
|
| 2308 | 2308 |
foreach my $vc (qw(customer vendor)) {
|
| 2309 | 2309 |
next if !$form->{"delivery_${vc}_id"};
|
| 2310 |
($form->{"delivery_${vc}_string"}) = selectrow_query($form, $dbh, qq|SELECT name FROM customer WHERE id = ?|, $id);
|
|
| 2310 |
($form->{"delivery_${vc}_string"}) = selectrow_query($form, $dbh, qq|SELECT name FROM customer WHERE id = ?|,
|
|
| 2311 |
$form->{"delivery_${vc}_id"});
|
|
| 2311 | 2312 |
} |
| 2312 | 2313 |
|
| 2313 | 2314 |
# get shipto |
Auch abrufbar als: Unified diff
ar.id ist nicht vc.id -> Wahrscheinlich sowieso schon toter Code (2007)