projekt kivitendo

use parent qw(SL::Controller::Base);

use SL::DB::Part;

use SL::PriceSource;

use SL::Locale::String qw(t8);

use Data::Dumper;

  my $parts_to_add = delete($::form->{ids}) || [];

  foreach my $id (@{ $parts_to_add }) {

    my $part = SL::DB::Manager::Part->find_by(id => $id) or die "Can't find part with id: $id\n";

      parts_id    => $part->id,

      qty         => $part->min_order_qty, # was ist wenn min_order_qty < (rop-onhand) ist? sollte dann nicht (rop-onhand) genommen werden?

      description => $part->description,  # Warum wird description zusätzlich gespeichert, parts_id sollte doch reichen? Falls die sich in den Stammdaten in der Zwischenzeit verändert? zumal du in action_transfer_to_purchase_order explizit $part->description verwendest

  my ( $self ) = @_;

  $::request->{layout}->add_javascripts('kivi.DispositionManager.js');

  $self->_setup_show_basket_action_bar;

  $self->render('disposition_manager/show_purchase_basket', BASKET_ITEMS => $basket_items, title => "Purchase basket" );

}

  $vendor   = SL::DB::Manager::Vendor->find_by(id => $v_id) or die "Can't find vendor";

  $employee = SL::DB::Manager::Employee->current            or die "Can't find employee";

  # create order first so we have a record for PriceSource

  my $order = SL::DB::Order->new(

      $item->{custom_variables} = \@{ $item->cvars_by_config };

      $item->save;

    }

    return 1;

  }) || die "error: " . $order->db->error;

  $self->redirect_to(controller => "oe.pl", action => 'edit', type => 'purchase_order', vc => 'vendor', id => $order->id);

  FROM parts

 WHERE onhand <= rop

   AND rop != 0

   AND NOT obsolete

SQL