Changeset 2277

Timestamp:

08/21/19 18:50:19 (5 years ago)

Author:

nanardon

Message:

Provide ListChildObjects?() on top class

Location:

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases

Files:

• Objects.pm (modified) (1 diff)
• Sql/objects.pm (modified) (1 diff)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Objects.pm

@@ -818 +818 @@
 }
 
+=head2 ListChildObjects
+
+List dependant objects.
+
+=cut
+
+sub ListChildObjects {
+    my ( $self ) = @_;
+
+    return;
+}
+
 =head2 DataDump($config)
 

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/objects.pm

@@ -807 +807 @@
     delete($self->base->{__cache}{"_" . $self->type}{$self->id});
 
+    # TODO Update computed attribute for dependant object
+
     foreach my $attr (@updated_attributes) {
         my $oattr = $self->attribute($attr);