- my @oe_ids = grep { $_ } map { $_ * 1 } split m/\s+/, $form->{oe_ids};
- delete $form->{oe_ids};
- if (scalar @oe_ids) {
- my @links = map { { 'from_table' => 'oe', 'from_id' => $_, 'to_table' => 'delivery_orders', 'to_id' => $form->{id} } } @oe_ids;
- RecordLinks->create_links('dbh' => $dbh, 'links' => \@links);
- }
+ RecordLinks->create_links('dbh' => $dbh,
+ 'mode' => 'ids',
+ 'from_table' => 'oe',
+ 'from_ids' => $form->{convert_from_oe_ids},
+ 'to_table' => 'delivery_orders',
+ 'to_id' => $form->{id},
+ );
+ delete $form->{convert_from_oe_ids};