diff options
| -rwxr-xr-x | LedgerSMB/OE.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/LedgerSMB/OE.pm b/LedgerSMB/OE.pm index cc13693c..8311ec6a 100755 --- a/LedgerSMB/OE.pm +++ b/LedgerSMB/OE.pm @@ -59,7 +59,7 @@ sub transactions { if ($form->{type} =~ /_quotation$/) { $quotation = '1'; $ordnumber = 'quonumber'; - } + } my $number = $form->like(lc $form->{$ordnumber}); my $name = $form->like(lc $form->{$form->{vc}}); @@ -378,8 +378,9 @@ sub save { my $rowcount = $form->{rowcount}; for my $i (1 .. $rowcount) { + $form->{"ship_$i"} = 0 unless $form->{"ship_$i"}; $form->db_prepare_vars("orderitems_id_$i", "id_$i", - "description_$i", "project_id_$i", "ship_$i"); + "description_$i", "project_id_$i"); for (qw(qty ship)) { $form->{"${_}_$i"} = $form->parse_amount( |