Einheitliche Methode record_number für ar/ap/oe/do Objekte

entspricht jeweils invnumber/ordnumber/donumber

diff --git a/SL/DB/DeliveryOrder.pm b/SL/DB/DeliveryOrder.pm
index 7f12aae2555166f3236ed8fb3830e00bb8fe2657..15ceb5ddb4dcb53c85b2467d6355d10fcb4f60d2 100644 (file)
--- a/SL/DB/DeliveryOrder.pm
+++ b/SL/DB/DeliveryOrder.pm
@@ -51,6 +51,7 @@ sub _before_save_set_donumber {
 sub items { goto &orderitems; }
 sub add_items { goto &add_orderitems; }
 sub payment_terms { goto &payment; }
+sub record_number { goto &donumber; }
 
 sub sales_order {
   my $self   = shift;

diff --git a/SL/DB/Invoice.pm b/SL/DB/Invoice.pm
index 8bfc918e83bc6bb239ffd58cf2b1823c138f7327..5456a376bb53a5947d1df1cab1b42042b70a79a6 100644 (file)
--- a/SL/DB/Invoice.pm
+++ b/SL/DB/Invoice.pm
@@ -77,6 +77,7 @@ sub _before_save_set_invnumber {
 
 sub items { goto &invoiceitems; }
 sub add_items { goto &add_invoiceitems; }
+sub record_number { goto &invnumber; };
 
 sub is_sales {
   # For compatibility with Order, DeliveryOrder

diff --git a/SL/DB/Order.pm b/SL/DB/Order.pm
index f73e32ca04273951909779b1eab621de0be54979..fe0571fae16e2dabc92b63b79c5e719126a663ea 100644 (file)
--- a/SL/DB/Order.pm
+++ b/SL/DB/Order.pm
@@ -67,6 +67,7 @@ sub _before_save_set_ord_quo_number {
 
 sub items { goto &orderitems; }
 sub add_items { goto &add_orderitems; }
+sub record_number { goto &number; }
 
 sub type {
   my $self = shift;