summaryrefslogtreecommitdiff
path: root/LedgerSMB/OE.pm
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB/OE.pm')
-rwxr-xr-xLedgerSMB/OE.pm5
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(