package DO;
+use Carp;
use List::Util qw(max);
use YAML;
push @values, conv_date($form->{insertdateto});
}
+ if ($form->{parts_partnumber}) {
+ push @where, <<SQL;
+ EXISTS (
+ SELECT delivery_order_items.delivery_order_id
+ FROM delivery_order_items
+ LEFT JOIN parts ON (delivery_order_items.parts_id = parts.id)
+ WHERE (delivery_order_items.delivery_order_id = dord.id)
+ AND (parts.partnumber ILIKE ?)
+ LIMIT 1
+ )
+SQL
+ push @values, like($form->{parts_partnumber});
+ }
+
+ if ($form->{parts_description}) {
+ push @where, <<SQL;
+ EXISTS (
+ SELECT delivery_order_items.delivery_order_id
+ FROM delivery_order_items
+ WHERE (delivery_order_items.delivery_order_id = dord.id)
+ AND (delivery_order_items.description ILIKE ?)
+ LIMIT 1
+ )
+SQL
+ push @values, like($form->{parts_description});
+ }
+
if (@where) {
$query .= " WHERE " . join(" AND ", map { "($_)" } @where);
}
my $items_reqdate;
$form->get_lists('price_factors' => 'ALL_PRICE_FACTORS');
- my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} };
+ my %price_factors = map { $_->{id} => $_->{factor} *1 } @{ $form->{ALL_PRICE_FACTORS} };
my $price_factor;
my %part_id_map = map { $_ => 1 } grep { $_ } map { $form->{"id_$_"} } (1 .. $form->{rowcount});
push @arrays, map { "project_cvar_$_->{name}" } @{ $project_cvar_configs };
$form->get_lists('price_factors' => 'ALL_PRICE_FACTORS');
- my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} };
+ my %price_factors = map { $_->{id} => $_->{factor} *1 } @{ $form->{ALL_PRICE_FACTORS} };
my $totalweight = 0;
my $sameitem = "";
$h_pg->finish();
$h_bin_wh->finish();
+ $form->{department} = SL::DB::Manager::Department->find_by(id => $form->{department_id})->description if $form->{department_id};
$form->{delivery_term} = SL::DB::Manager::DeliveryTerm->find_by(id => $form->{delivery_term_id} || undef);
$form->{delivery_term}->description_long($form->{delivery_term}->translated_attribute('description_long', $form->{language_id})) if $form->{delivery_term} && $form->{language_id};
- $form->{department} = SL::DB::Manager::Department->find_by(id => $form->{department_id})->description if $form->{department_id};
$form->{username} = $myconfig->{name};