projekt kivitendo

  return unless $form_attr->{parts_id};

  $self->order->add_items($item);

                   unit     => $assortment_item->unit,

                   description => $assortment_item->part->description,

                 };

      # set discount to 100% if item isn't supposed to be charged, overwriting any customer discount

      $item->discount(1) unless $assortment_item->charge;

  my @items;

  foreach my $attr (@form_attr) {

    push @items, $item;

    if ( $item->part->is_assortment ) {

      foreach my $assortment_item ( @{$item->part->assortment_items} ) {

                     unit     => $assortment_item->unit,

                     description => $assortment_item->part->description,

                   };

        # set discount to 100% if item isn't supposed to be charged, overwriting any customer discount

        $item->discount(1) unless $assortment_item->charge;

  foreach my $item_id (@{ $::form->{item_ids} }) {

    my $idx   = first_index { $_ eq $item_id } @{ $::form->{orderitem_ids} };

    my $item  = $self->order->items_sorted->[$idx];

    $item->description($texts->{description});

    $item->longdescription($texts->{longdescription});

#

# This is used to add one item

sub new_item {

  my $item = SL::DB::OrderItem->new;

  # saved. Adding empty custom_variables to new orderitem here solves this problem.

  $new_attr{custom_variables} = [];

  $item->assign_attributes(%new_attr, %{ $texts });

}

sub get_part_texts {

  my $part        = ref($part_or_id)     ? $part_or_id         : SL::DB::Part->load_cached($part_or_id);

  my $language_id = ref($language_or_id) ? $language_or_id->id : $language_or_id;

  my @items;

  my $pos = 1;

  foreach my $form_attr (@{$form_items}) {

    $item->position($pos);

    push @items, $item;

    $pos++;

# Make item objects from form values. For items already existing read from db.

# Create a new item else. And assign attributes.

sub make_item {

  my $item;

  $item = first { $_->id == $attr->{id} } @{$record->items} if $attr->{id};

  $item->assign_attributes(%$attr);

  if ($is_new) {

    $item->longdescription($texts->{longdescription})              if !defined $attr->{longdescription};

    $item->project_id($record->globalproject_id)                   if !defined $attr->{project_id};

    $item->lastcost($record->is_sales ? $item->part->lastcost : 0) if !defined $attr->{lastcost_as_number};