X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FIS.pm;h=12b5b7c2e45a619b0030b85f7f11123cdfb5e136;hb=5b47ed3efe5f4ef0810096b0f4849047cee54690;hp=615b2eec7ca0243519c653b94b9ef31e9616d84e;hpb=2773beb180e089ba53e715a418bee4acb3ddb857;p=kivitendo-erp.git

diff --git a/SL/IS.pm b/SL/IS.pm
index 615b2eec7..12b5b7c2e 100644
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -36,6 +36,7 @@ package IS;
 
 use Data::Dumper;
 use SL::AM;
+use SL::DBUtils;
 
 sub invoice_details {
   $main::lxdebug->enter_sub();
@@ -982,6 +983,8 @@ Message: $form->{message}\r| if $form->{message};
               quonumber = '$form->{quonumber}',
               cusordnumber = '$form->{cusordnumber}',
               transdate = '$form->{invdate}',
+              orddate = | . conv_dateq($form->{orddate}) . qq|,
+              quodate = | . conv_dateq($form->{quodate}) . qq|,
               customer_id = $form->{customer_id},
               amount = $amount,
               netamount = $netamount,
@@ -1484,6 +1487,7 @@ sub retrieve_invoice {
 
     # retrieve invoice
     $query = qq|SELECT a.invnumber, a.ordnumber, a.quonumber, a.cusordnumber,
+                a.orddate, a.quodate,
                 a.transdate AS invdate, a.deliverydate, a.paid, a.storno, a.gldate,
                 a.shippingpoint, a.shipvia, a.terms, a.notes, a.intnotes, a.taxzone_id,
 		a.duedate, a.taxincluded, a.curr AS currency, a.shipto_id, a.cp_id,