Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 9227f81d

Von Martin Helmling martin.helmling@octosoft.eu vor fast 9 Jahren hinzugefügt

  • ID 9227f81db26d209ffab778bf9520798f6cbf7f0e
  • Vorgänger 4f611e17
  • Nachfolger d38c6c0e

Fertigen ohne Prüfung nach Bestand(2)

Das Prüfen ob Lager das "Standard-Lager für Auslagern ohne Prüfung auf Bestand"
ist genügt nicht, es können Bauteile dieses Lager auch als Standardlager haben

Unterschiede anzeigen:

SL/WH.pm
my $partsQTY = $hash_ref->{qty} * $params{qty}; # benötigte teile * anzahl erzeugnisse
my $currentPart_ID = $hash_ref->{parts_id};
my $currentPart_WH_ID = $use_default_warehouse && $hash_ref->{warehouse_id} ? $hash_ref->{warehouse_id} : $params{dst_warehouse_id};
my $no_check = 0;
# Prüfen ob Erzeugnis-Teile Standardlager haben.
if ($use_default_warehouse && ! $hash_ref->{warehouse_id}) {
# Prüfen ob in Mandantenkonfiguration ein Standardlager aktiviert isti.
if ($::instance_conf->get_transfer_default_ignore_onhand) {
$hash_ref->{warehouse_id} = $::instance_conf->get_warehouse_id_ignore_onhand;
$currentPart_WH_ID = $::instance_conf->get_warehouse_id_ignore_onhand;
$no_check = 1;
} else {
$kannNichtFertigen .= "Kein Standardlager: " .
" Die Ware " . $self->get_part_description(parts_id => $currentPart_ID) .
......
next;
}
}
my $currentPart_WH_ID = $use_default_warehouse ? $hash_ref->{warehouse_id} : $params{dst_warehouse_id};
my $warehouse_info = $self->get_basic_warehouse_info('id'=> $currentPart_WH_ID);
my $warehouse_desc = $warehouse_info->{"warehouse_description"};
# Fertigen ohne Prüfung nach Bestand
if ($currentPart_WH_ID == $::instance_conf->get_warehouse_id_ignore_onhand) {
if ($no_check) {
my $temppart_bin_id = $::instance_conf->get_bin_id_ignore_onhand;
my $temppart_chargenumber = "";
my $temppart_bestbefore = localtime();

Auch abrufbar als: Unified diff