Merge pull request #7349 from ehuelsmann/fix/master/barcodes-on-orders

Add barcode scanner support (back) to orders
ledgersmb · Apr 17, 2023 · 11d2c5c · 11d2c5c
2 parents 94907f2 + 2b072a5
commit 11d2c5c
Showing 1 changed file with 9 additions and 1 deletion.
diff --git a/old/bin/oe.pl b/old/bin/oe.pl
@@ -557,7 +557,7 @@ sub form_header {
     }
 
     $i     = $form->{rowcount} + 1;
-    $focus = "partnumber_$i";
+    $focus = $form->{barcode} ? "barcode" : "partnumber_$i";
 
     $form->header;
 
@@ -826,7 +826,11 @@ sub form_footer {
     $form->{invtotal} =
       $form->format_amount( \%myconfig, $form->{invtotal}, $form->{_setting_decimal_places}, 0 );
 
+    my $display_barcode = $form->get_setting('have_barcodes') ? "initial" : "none";
     print qq|
+  <tr style="display:$display_barcode">
+   <td colspan="5"><b><label for="barcode">Barcode</label></b>: <input data-dojo-type="dijit/form/TextBox" id=barcode name=barcode></td>
+  </tr>
   <tr>
     <td>
       <table width=100%>
@@ -1067,6 +1071,10 @@ sub update {
                       && ( $form->{"description_$i"} eq "" )
                       && ( $form->{"partsgroup_$i"}  eq "" ) );
     }
+    if ($form->{barcode}) {
+        $non_empty_rows++;
+        IIAA->process_form_barcode(\%myconfig, $form, $non_empty_rows, $form->{barcode});
+    }
 
     my $current_empties = $form->{rowcount} - $non_empty_rows;
     my $new_empties =