Revision ae906113
Von Moritz Bunkus vor mehr als 10 Jahren hinzugefügt
SL/DB/DeliveryOrder.pm | ||
---|---|---|
44 | 44 |
# methods |
45 | 45 |
|
46 | 46 |
sub items { goto &orderitems; } |
47 |
sub add_items { goto &add_orderitems; } |
|
47 | 48 |
|
48 | 49 |
sub items_sorted { |
49 | 50 |
my ($self) = @_; |
SL/DB/Invoice.pm | ||
---|---|---|
63 | 63 |
# methods |
64 | 64 |
|
65 | 65 |
sub items { goto &invoiceitems; } |
66 |
sub add_items { goto &add_invoiceitems; } |
|
66 | 67 |
|
67 | 68 |
sub items_sorted { |
68 | 69 |
my ($self) = @_; |
SL/DB/Order.pm | ||
---|---|---|
60 | 60 |
# methods |
61 | 61 |
|
62 | 62 |
sub items { goto &orderitems; } |
63 |
sub add_items { goto &add_orderitems; } |
|
63 | 64 |
|
64 | 65 |
sub items_sorted { |
65 | 66 |
my ($self) = @_; |
SL/DB/PurchaseInvoice.pm | ||
---|---|---|
34 | 34 |
__PACKAGE__->meta->initialize; |
35 | 35 |
|
36 | 36 |
sub items { goto &invoiceitems; } |
37 |
sub add_items { goto &add_invoiceitems; } |
|
37 | 38 |
|
38 | 39 |
sub items_sorted { |
39 | 40 |
my ($self) = @_; |
Auch abrufbar als: Unified diff
SL::DB::(Delivery)Order,(Purchase)Invoice: Aliase »add_items«
Die Relationships für die Positionen heißen in allen Klassen
unterschiedlich. Daher gibt es schon seit Längerem den Alias »items« in
allen Klassen.
Das Hinzufügen von Positionen hingegen erforderte bisher, dass man den
Namen der Relationship kennt, z.B. für Invoice:
$obj->add_invoiceitems. Um das zu Vereinfachen: neuer Alias »add_items«
in allen vier Klassen.