projekt kivitendo

  # Anm. jb 18.3. vielleicht auch nur meine unwissenheit in perl-datenstrukturen

  my %TRANSFER = (

    'transfer_type'    => 'assembly',

    'dst_warehouse_id' => $form->{warehouse_id},

    'dst_bin_id'       => $form->{bin_id},

    'chargenumber'     => $form->{chargenumber},

  my $msg = $locale->text('No warehouse has been created yet or the quantity of the bins is not configured yet.') . ' ';

    $msg .= $locale->text('You can create warehouses and bins via the menu "System -> Warehouses".');

  } else {

    $msg .= $locale->text('Please ask your administrator to create warehouses and bins.');