Revision 9227f81d
Von Martin Helmling martin.helmling@octosoft.eu vor fast 8 Jahren hinzugefügt
| SL/WH.pm | ||
|---|---|---|
| 211 | 211 |
my $partsQTY = $hash_ref->{qty} * $params{qty}; # benötigte teile * anzahl erzeugnisse
|
| 212 | 212 |
my $currentPart_ID = $hash_ref->{parts_id};
|
| 213 | 213 |
|
| 214 |
my $currentPart_WH_ID = $use_default_warehouse && $hash_ref->{warehouse_id} ? $hash_ref->{warehouse_id} : $params{dst_warehouse_id};
|
|
| 215 |
my $no_check = 0; |
|
| 216 |
|
|
| 214 | 217 |
# Prüfen ob Erzeugnis-Teile Standardlager haben. |
| 215 | 218 |
if ($use_default_warehouse && ! $hash_ref->{warehouse_id}) {
|
| 216 | 219 |
# Prüfen ob in Mandantenkonfiguration ein Standardlager aktiviert isti. |
| 217 | 220 |
if ($::instance_conf->get_transfer_default_ignore_onhand) {
|
| 218 |
$hash_ref->{warehouse_id} = $::instance_conf->get_warehouse_id_ignore_onhand;
|
|
| 221 |
$currentPart_WH_ID = $::instance_conf->get_warehouse_id_ignore_onhand; |
|
| 222 |
$no_check = 1; |
|
| 219 | 223 |
} else {
|
| 220 | 224 |
$kannNichtFertigen .= "Kein Standardlager: " . |
| 221 | 225 |
" Die Ware " . $self->get_part_description(parts_id => $currentPart_ID) . |
| ... | ... | |
| 224 | 228 |
next; |
| 225 | 229 |
} |
| 226 | 230 |
} |
| 227 |
my $currentPart_WH_ID = $use_default_warehouse ? $hash_ref->{warehouse_id} : $params{dst_warehouse_id};
|
|
| 228 | 231 |
my $warehouse_info = $self->get_basic_warehouse_info('id'=> $currentPart_WH_ID);
|
| 229 | 232 |
my $warehouse_desc = $warehouse_info->{"warehouse_description"};
|
| 230 | 233 |
|
| 231 | 234 |
# Fertigen ohne Prüfung nach Bestand |
| 232 |
if ($currentPart_WH_ID == $::instance_conf->get_warehouse_id_ignore_onhand) {
|
|
| 235 |
if ($no_check) {
|
|
| 233 | 236 |
my $temppart_bin_id = $::instance_conf->get_bin_id_ignore_onhand; |
| 234 | 237 |
my $temppart_chargenumber = ""; |
| 235 | 238 |
my $temppart_bestbefore = localtime(); |
Auch abrufbar als: Unified diff
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