Revision 53e2a286
Von Jan Büren vor fast 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)