X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FIC.pm;h=ff8484b7e489aa405e05df62b6f951fb4fd6dca5;hb=165d1a99e7402a0cbd600dfd4a56cec8feff9ae5;hp=3b7eb0848e171f9546a4db3cf9da75f300efbb12;hpb=08b7390952bc97832d83d5597f8774b5e4d940e4;p=kivitendo-erp.git diff --git a/SL/IC.pm b/SL/IC.pm index 3b7eb0848..ff8484b7e 100644 --- a/SL/IC.pm +++ b/SL/IC.pm @@ -461,17 +461,17 @@ sub save { my $i = $form->{assembly_rows}; # if last row is not empty add them if ($form->{"partnumber_$i"} ne "") { - $query = qq|SELECT id FROM parts WHERE partnumber = ?|; - my ($partid) = selectrow_query($form, $dbh, $query,$form->{"partnumber_$i"} ); - if ( $partid ) { - $form->{"qty_$i"} = 1 unless ($form->{"qty_$i"}); - $form->{"id_$i"} = $partid; - $form->{"bom_$i"} = 0; - $form->{assembly_rows}++; - } - else { - $::form->error($::locale->text("uncorrect partnumber ").$form->{"partnumber_$i"}); - } + $query = qq|SELECT id FROM parts WHERE partnumber = ?|; + my ($partid) = selectrow_query($form, $dbh, $query,$form->{"partnumber_$i"} ); + if ( $partid ) { + $form->{"qty_$i"} = 1 unless ($form->{"qty_$i"}); + $form->{"id_$i"} = $partid; + $form->{"bom_$i"} = 0; + $form->{assembly_rows}++; + } + else { + $::form->error($::locale->text("uncorrect partnumber ").$form->{"partnumber_$i"}); + } } for my $i (1 .. $form->{assembly_rows}) {