Changeset 2266 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts

Timestamp:

06/19/19 12:05:43 (5 years ago)

Author:

nanardon

Message:

Fix data propagation on object creation

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/objects.pm (modified) (2 diffs)

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

@@ -399 +399 @@
             return;
         };
+    }
+
+    my @parents = $obj->ParentObject;
+
+    foreach my $pobj (@parents) {
+        $pobj->PostSetAttribute;
     }
 
@@ -799 +805 @@
         }
     }
-    my $res =  $self->set_fields(%data);
-
-    if (my $obj = $self->ParentObject) {
-        $res += $obj->PostSetAttribute;
+    my $res = $self->set_fields(%data);
+
+    if ($res) {
+        if (my $obj = $self->ParentObject) {
+            $res += $obj->PostSetAttribute;
+        }
     }