X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FIS.pm;h=2632a727d9d7db99d8d26ab714d2ae415f954009;hb=6ca711a5e060318111719f02ce91a4c101e9e812;hp=1836a6bfa6ec059ca6c775715d03bdcb0232099c;hpb=6d1df9ca24bbb8c03e10812ce4cf1b889d947470;p=kivitendo-erp.git diff --git a/SL/IS.pm b/SL/IS.pm index 1836a6bfa..2632a727d 100644 --- a/SL/IS.pm +++ b/SL/IS.pm @@ -686,7 +686,6 @@ sub post_invoice { # get pricegroup_id and save it ($null, my $pricegroup_id) = split(/--/, $form->{"sellprice_pg_$i"}); $pricegroup_id *= 1; - my $subtotal = $form->{"subtotal_$i"} * 1; # save detail record in invoice table $query = @@ -704,7 +703,7 @@ sub post_invoice { $form->{"unit_$i"}, conv_date($form->{"deliverydate_$i"}), conv_i($form->{"project_id_$i"}), $form->{"serialnumber_$i"}, conv_i($pricegroup_id), $form->{"ordnumber_$i"}, conv_date($form->{"transdate_$i"}), - $form->{"cusordnumber_$i"}, $baseqty, $subtotal, + $form->{"cusordnumber_$i"}, $baseqty, $form->{"subtotal_$i"} ? 't' : 'f', $form->{"marge_percent_$i"}, $form->{"marge_absolut_$i"}, $form->{"lastcost_$i"}); do_query($form, $dbh, $query, @values); @@ -944,61 +943,30 @@ sub post_invoice { # save AR record $query = qq|UPDATE ar set - invnumber = ?, - ordnumber = ?, - quonumber = ?, - cusordnumber = ?, - transdate = ?, - orddate = ?, - quodate = ?, - customer_id = ?, - amount = ?, - netamount = ?, - paid = ?, - datepaid = ?, - duedate = ?, - deliverydate = ?, - invoice = '1', - shippingpoint = ?, - shipvia = ?, - terms = ?, - notes = ?, - intnotes = ?, - taxincluded = ?, - curr = ?, - department_id = ?, - payment_id = ?, - type = ?, - language_id = ?, - taxzone_id = ?, - shipto_id = ?, - delivery_customer_id = ?, - delivery_vendor_id = ?, - employee_id = ?, - salesman_id = ?, - storno = ?, - storno_id = ?, - globalproject_id = ?, - cp_id = ?, - transaction_description = ?, - marge_total = ?, - marge_percent = ? + invnumber = ?, ordnumber = ?, quonumber = ?, cusordnumber = ?, + transdate = ?, orddate = ?, quodate = ?, customer_id = ?, + amount = ?, netamount = ?, paid = ?, datepaid = ?, + duedate = ?, deliverydate = ?, invoice = ?, shippingpoint = ?, + shipvia = ?, terms = ?, notes = ?, intnotes = ?, + curr = ?, department_id = ?, payment_id = ?, taxincluded = ?, + type = ?, language_id = ?, taxzone_id = ?, shipto_id = ?, + employee_id = ?, salesman_id = ?, storno_id = ?, storno = ?, + cp_id = ?, marge_total = ?, marge_percent = ?, + globalproject_id = ?, delivery_customer_id = ?, + transaction_description = ?, delivery_vendor_id = ? WHERE id = ?|; - @values = ($form->{"invnumber"}, $form->{"ordnumber"}, $form->{"quonumber"}, $form->{"cusordnumber"}, - conv_date($form->{"invdate"}), conv_date($form->{"orddate"}), conv_date($form->{"quodate"}), - conv_i($form->{"customer_id"}), $amount, $netamount, $form->{"paid"}, - conv_date($form->{"datepaid"}), conv_date($form->{"duedate"}), conv_date($form->{"deliverydate"}), - $form->{"shippingpoint"}, $form->{"shipvia"}, conv_i($form->{"terms"}), - $form->{"notes"}, $form->{"intnotes"}, $form->{"taxincluded"} ? 't' : 'f', - $form->{"currency"}, conv_i($form->{"department_id"}), conv_i($form->{"payment_id"}), - $form->{"type"}, conv_i($form->{"language_id"}), conv_i($form->{"taxzone_id"}), - conv_i($form->{"shipto_id"}), - conv_i($form->{"delivery_customer_id"}), conv_i($form->{"delivery_vendor_id"}), - conv_i($form->{"employee_id"}), conv_i($form->{"salesman_id"}), - $form->{"storno"} ? 't' : 'f', conv_i($form->{storno_id}), conv_i($form->{"globalproject_id"}), - conv_i($form->{"cp_id"}), $form->{transaction_description}, - $form->{marge_total} * 1, $form->{marge_percent} * 1, - conv_i($form->{"id"})); + @values = ( $form->{"invnumber"}, $form->{"ordnumber"}, $form->{"quonumber"}, $form->{"cusordnumber"}, + conv_date($form->{"invdate"}), conv_date($form->{"orddate"}), conv_date($form->{"quodate"}), conv_i($form->{"customer_id"}), + $amount, $netamount, $form->{"paid"}, conv_date($form->{"datepaid"}), + conv_date($form->{"duedate"}), conv_date($form->{"deliverydate"}), '1', $form->{"shippingpoint"}, + $form->{"shipvia"}, conv_i($form->{"terms"}), $form->{"notes"}, $form->{"intnotes"}, + $form->{"currency"}, conv_i($form->{"department_id"}), conv_i($form->{"payment_id"}), $form->{"taxincluded"} ? 't' : 'f', + $form->{"type"}, conv_i($form->{"language_id"}), conv_i($form->{"taxzone_id"}), conv_i($form->{"shipto_id"}), + conv_i($form->{"employee_id"}), conv_i($form->{"salesman_id"}), conv_i($form->{storno_id}), $form->{"storno"} ? 't' : 'f', + conv_i($form->{"cp_id"}), 1 * $form->{marge_total} , 1 * $form->{marge_percent}, + conv_i($form->{"globalproject_id"}), conv_i($form->{"delivery_customer_id"}), + $form->{transaction_description}, conv_i($form->{"delivery_vendor_id"}), + conv_i($form->{"id"})); do_query($form, $dbh, $query, @values); if($form->{"formname"} eq "credit_note") {