Revision aff556ec
Von Jan Büren vor etwa 2 Jahren hinzugefügt
SL/IS.pm | ||
---|---|---|
2295 | 2295 |
|
2296 | 2296 |
foreach my $vc (qw(customer vendor)) { |
2297 | 2297 |
next if !$form->{"delivery_${vc}_id"}; |
2298 |
($form->{"delivery_${vc}_string"}) = selectrow_query($form, $dbh, qq|SELECT name FROM customer WHERE id = ?|, $id); |
|
2298 |
($form->{"delivery_${vc}_string"}) = selectrow_query($form, $dbh, qq|SELECT name FROM customer WHERE id = ?|, |
|
2299 |
$form->{"delivery_${vc}_id"}); |
|
2299 | 2300 |
} |
2300 | 2301 |
|
2301 | 2302 |
# get shipto |
Auch abrufbar als: Unified diff
ar.id ist nicht vc.id -> Wahrscheinlich sowieso schon toter Code (2007)