Revision c3c267fe
Von Moritz Bunkus vor mehr als 16 Jahren hinzugefügt
SL/IC.pm | ||
---|---|---|
1780 | 1780 |
|
1781 | 1781 |
my $info = selectall_hashref_query($form, $dbh, $query, map { conv_i($_) } @ids); |
1782 | 1782 |
|
1783 |
if ($params{vendor_id}) { |
|
1784 |
$query = qq|SELECT * FROM parts_vendor WHERE (parts_id = ?) AND (vendor_id = ?)|; |
|
1785 |
my $sth = prepare_query($form, $dbh, $query); |
|
1786 |
|
|
1787 |
foreach my $part (@{ $info }) { |
|
1788 |
do_statement($form, $sth, $query, $part->{id}, conv_i($params{vendor_id})); |
|
1789 |
$part->{vendor_info} = $sth->fetchrow_hashref(); |
|
1790 |
} |
|
1791 |
|
|
1792 |
$sth->finish(); |
|
1793 |
} |
|
1794 |
|
|
1795 | 1783 |
if ('' eq ref $params{id}) { |
1796 | 1784 |
$info = $info->[0] || { }; |
1797 | 1785 |
|
Auch abrufbar als: Unified diff
parts_vendor gibt es in der unstable nicht.