User->new->dbcreate($::form);
flash_later('info', t8("The dataset #1 has been created.", $::form->{db}));
- $self->redirect_to(action => 'database_administration');
+ $self->redirect_to(action => 'show');
}
sub action_delete_dataset_login {
User->new->dbdelete($::form);
flash_later('info', t8("The dataset #1 has been deleted.", $::form->{db}));
- $self->redirect_to(action => 'database_administration');
+ $self->redirect_to(action => 'show');
}
#
});
if ($::form->{write_default_bin}) {
+ $self->part->load; # onhand is calculated in between. don't mess that up
$self->part->bin($self->bin);
$self->part->warehouse($self->warehouse);
$self->part->save;
$self->{stock_empty} = ! grep { $_->{sum} * 1 } @$stock;
}
-sub show_no_warehouse_error {
+sub show_no_warehouses_error {
my ($self) = @_;
my $msg = t8('No warehouse has been created yet or the quantity of the bins is not configured yet.') . ' ';