Revision d4fc422e
Von Bernd Bleßmann vor etwa 1 Jahr hinzugefügt
| SL/IC.pm | ||
|---|---|---|
| 890 | 890 |
} |
| 891 | 891 |
|
| 892 | 892 |
my $placeholders = join ', ', ('?') x scalar(@part_ids);
|
| 893 |
my $query = qq|SELECT mm.parts_id, mm.model, mm.part_description AS mm_part_description, mm.lastcost, v.name AS make |
|
| 893 |
my $query = qq|SELECT mm.parts_id, mm.model, |
|
| 894 |
mm.part_description AS mm_part_description, |
|
| 895 |
mm.part_longdescription AS mm_part_longdescription, |
|
| 896 |
mm.lastcost, v.name AS make |
|
| 894 | 897 |
FROM makemodel mm |
| 895 | 898 |
LEFT JOIN vendor v ON (mm.make = v.id) |
| 896 | 899 |
WHERE mm.parts_id IN ($placeholders)|; |
| ... | ... | |
| 936 | 939 |
my %data = selectall_as_map($form, $dbh, $query, 'id', \@columns, @part_ids); |
| 937 | 940 |
|
| 938 | 941 |
my %template_arrays; |
| 939 |
map { $template_arrays{$_} = [] } (qw(make model mm_part_description customer_make customer_model cm_part_description cm_part_longdescription), @columns);
|
|
| 942 |
map { $template_arrays{$_} = [] } (qw(make model mm_part_description mm_part_longdescription customer_make customer_model cm_part_description cm_part_longdescription), @columns);
|
|
| 940 | 943 |
|
| 941 | 944 |
foreach my $i (1 .. $rowcount) {
|
| 942 | 945 |
my $id = $form->{"${prefix}${i}"};
|
| ... | ... | |
| 949 | 952 |
|
| 950 | 953 |
push @{ $template_arrays{make} }, [];
|
| 951 | 954 |
push @{ $template_arrays{model} }, [];
|
| 952 |
push @{ $template_arrays{mm_part_description} }, [];
|
|
| 955 |
push @{ $template_arrays{mm_part_description} }, [];
|
|
| 956 |
push @{ $template_arrays{mm_part_longdescription} }, [];
|
|
| 953 | 957 |
|
| 954 | 958 |
if ($makemodel{$id}) {
|
| 955 | 959 |
foreach my $ref (@{ $makemodel{$id} }) {
|
| 956 |
map { push @{ $template_arrays{$_}->[-1] }, $ref->{$_} } qw(make model mm_part_description);
|
|
| 960 |
map { push @{ $template_arrays{$_}->[-1] }, $ref->{$_} } qw(make model mm_part_description mm_part_longdescription);
|
|
| 957 | 961 |
} |
| 958 | 962 |
} |
| 959 | 963 |
|
Auch abrufbar als: Unified diff
Lieferantenartikelnummern um Langtext erweitern: zum Drucken