Revision 53e2a286
Von Jan Büren vor etwa 2 Jahren hinzugefügt
| SL/IS.pm | ||
|---|---|---|
| 2316 | 2316 |
|
| 2317 | 2317 |
foreach my $vc (qw(customer vendor)) {
|
| 2318 | 2318 |
next if !$form->{"delivery_${vc}_id"};
|
| 2319 |
($form->{"delivery_${vc}_string"}) = selectrow_query($form, $dbh, qq|SELECT name FROM customer WHERE id = ?|, $id);
|
|
| 2319 |
($form->{"delivery_${vc}_string"}) = selectrow_query($form, $dbh, qq|SELECT name FROM customer WHERE id = ?|,
|
|
| 2320 |
$form->{"delivery_${vc}_id"});
|
|
| 2320 | 2321 |
} |
| 2321 | 2322 |
|
| 2322 | 2323 |
# get shipto |
Auch abrufbar als: Unified diff
ar.id ist nicht vc.id -> Wahrscheinlich sowieso schon toter Code (2007)