Revision 35d63a9f
Von Moritz Bunkus vor etwa 11 Jahren hinzugefügt
SL/DB/Manager/Part.pm | ||
---|---|---|
43 | 43 |
|
44 | 44 |
for my $type (@types) { |
45 | 45 |
if ($type =~ m/^part/) { |
46 |
push @filter, (and => [ or => [ $prefix . assembly => 0, $prefix . assembly => undef ], |
|
47 |
"!${prefix}inventory_accno_id" => 0, |
|
48 |
"!${prefix}inventory_accno_id" => undef, |
|
46 |
push @filter, (and => [ or => [ $prefix . assembly => 0, $prefix . assembly => undef ],
|
|
47 |
"!${prefix}inventory_accno_id" => 0,
|
|
48 |
"!${prefix}inventory_accno_id" => undef,
|
|
49 | 49 |
]); |
50 | 50 |
} elsif ($type =~ m/^service/) { |
51 | 51 |
push @filter, (and => [ or => [ $prefix . assembly => 0, $prefix . assembly => undef ], |
52 |
or => [ $prefix . inventory_accno_id => 0, $prefix . inventory_accno_id => undef ], |
|
52 |
or => [ $prefix . inventory_accno_id => 0, $prefix . inventory_accno_id => undef ],
|
|
53 | 53 |
]); |
54 | 54 |
} elsif ($type =~ m/^assembl/) { |
55 | 55 |
push @filter, ($prefix . assembly => 1); |
56 | 56 |
} |
57 | 57 |
} |
58 | 58 |
|
59 |
return @filter > 2 ? (or => \@filter) : |
|
60 |
@filter ? @filter : (); |
|
59 |
return @filter > 2 ? (or => \@filter) : @filter; |
|
61 | 60 |
} |
62 | 61 |
|
63 | 62 |
sub get_ordered_qty { |
Auch abrufbar als: Unified diff
Kosmetik: Alignment, Einrückung