Changeset 2415

Timestamp:

06/24/20 22:12:46 (4 years ago)

Author:

nanardon

Message:

Save dynamique attribute per level so next level will be compute from updated values

File:

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

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

@@ -837 +837 @@
     my ($self) = @_;
 
-    my %data;
-
     $self->base->log(LA_DEBUG, "Running PostSetAttribute for %s/%s", $self->type, $self->id);
 
@@ -849 +847 @@
     }
 
+    my $res = 0;
     foreach my $level (sort { $a <=> $b } keys %AttrToCompute) {
+        my %data = ();
         foreach my $attr (@{ $AttrToCompute{ $level } }) {
             my $source = "_$attr";
             $data{$attr} = $self->_get_c_field($source);
         }
-    }
-
-    my $res = $self->set_fields(%data);
+        $res += $self->set_fields(%data);
+    }
 
     if ($res) {