]> wagnertech.de Git - mfinanz.git/blobdiff - bin/mozilla/io.pl
Part: long_description in displayable_name umbenannt
[mfinanz.git] / bin / mozilla / io.pl
index 64eb764eca9b6916e713d742da29cb840c1bd74b..c8478984bbc598c8648264e5c244b97a15f09078 100644 (file)
@@ -1933,10 +1933,11 @@ sub _make_record_item {
 
   my $class = {
     sales_order             => 'OrderItem',
 
   my $class = {
     sales_order             => 'OrderItem',
-    purchase_oder           => 'OrderItem',
+    purchase_order          => 'OrderItem',
     sales_quotation         => 'OrderItem',
     request_quotation       => 'OrderItem',
     invoice                 => 'InvoiceItem',
     sales_quotation         => 'OrderItem',
     request_quotation       => 'OrderItem',
     invoice                 => 'InvoiceItem',
+    credit_note             => 'InvoiceItem',
     purchase_invoice        => 'InvoiceItem',
     purchase_delivery_order => 'DeliveryOrderItem',
     sales_delivery_order    => 'DeliveryOrderItem',
     purchase_invoice        => 'InvoiceItem',
     purchase_delivery_order => 'DeliveryOrderItem',
     sales_delivery_order    => 'DeliveryOrderItem',
@@ -2016,7 +2017,7 @@ sub _make_record {
   my @items;
   for my $i (1 .. $::form->{rowcount}) {
     next unless $::form->{"id_$i"};
   my @items;
   for my $i (1 .. $::form->{rowcount}) {
     next unless $::form->{"id_$i"};
-    push @items, _make_record_item($i)
+    push @items, _make_record_item($i);
   }
 
   $obj->items(@items) if @items;
   }
 
   $obj->items(@items) if @items;