Revision 08b73909
Von Martin Helmling vor fast 11 Jahren hinzugefügt
| SL/IC.pm | ||
|---|---|---|
| 457 | 457 |
|
| 458 | 458 |
# add assembly records |
| 459 | 459 |
if ($form->{item} eq 'assembly') {
|
| 460 |
# check additional assembly row |
|
| 461 |
my $i = $form->{assembly_rows};
|
|
| 462 |
# if last row is not empty add them |
|
| 463 |
if ($form->{"partnumber_$i"} ne "") {
|
|
| 464 |
$query = qq|SELECT id FROM parts WHERE partnumber = ?|; |
|
| 465 |
my ($partid) = selectrow_query($form, $dbh, $query,$form->{"partnumber_$i"} );
|
|
| 466 |
if ( $partid ) {
|
|
| 467 |
$form->{"qty_$i"} = 1 unless ($form->{"qty_$i"});
|
|
| 468 |
$form->{"id_$i"} = $partid;
|
|
| 469 |
$form->{"bom_$i"} = 0;
|
|
| 470 |
$form->{assembly_rows}++;
|
|
| 471 |
} |
|
| 472 |
else {
|
|
| 473 |
$::form->error($::locale->text("uncorrect partnumber ").$form->{"partnumber_$i"});
|
|
| 474 |
} |
|
| 475 |
} |
|
| 460 | 476 |
|
| 461 | 477 |
for my $i (1 .. $form->{assembly_rows}) {
|
| 462 | 478 |
$form->{"qty_$i"} = $form->parse_amount($myconfig, $form->{"qty_$i"});
|
| ... | ... | |
| 469 | 485 |
do_query($form, $dbh, $query, @values); |
| 470 | 486 |
} |
| 471 | 487 |
} |
| 472 |
|
|
| 473 | 488 |
my @a = localtime; |
| 474 | 489 |
$a[5] += 1900; |
| 475 | 490 |
$a[4]++; |
| locale/de/all | ||
|---|---|---|
| 2763 | 2763 |
'transferred out' => 'ausgelagert', |
| 2764 | 2764 |
'trial_balance' => 'susa', |
| 2765 | 2765 |
'unconfigured' => 'unkonfiguriert', |
| 2766 |
'uncorrect partnumber ' => 'Unbekannte Teilenummer ', |
|
| 2766 | 2767 |
'up' => 'hoch', |
| 2767 | 2768 |
'use program settings' => 'benutze Programmeinstellungen', |
| 2768 | 2769 |
'use user config' => 'Verwende Benutzereinstellung', |
Auch abrufbar als: Unified diff
Direktes Speichern beim Hinzufügen eines Artikels
per eindeutiger Artikelnummer wird zugelassen.
Ein Hinzufügen über Beschreibung oder Warengruppe wird ignoriert.
Behebt #2040
Commit 2bc376b9be6507cc0fdf
Behebt #2047
Behebt #2400