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

Timestamp:

10/18/16 16:06:10 (8 years ago)

Author:

nanardon

Message:

Automatically register attributes a db start

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql.pm (modified) (1 diff)

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

@@ -97 +97 @@
         $self->{_db}->do(q{set DATESTYLE to 'DMY'});
         $self->log(LA_DEBUG, 'New connection to DB');
+
+        foreach my $otype ($self->list_supported_objects) {
+            foreach my $attribute ($self->list_canonical_fields($otype, 'r')) {
+                my $attr = $self->attribute($otype, $attribute);
+                $attr->{inline} and next;
+                $attr->{managed} and next;
+
+                if ($self->is_registered_attribute($otype, $attribute)) {
+                } else {
+                    if($self->register_attribute($otype, $attribute, $attr->{comment})) {
+                        $self->log(LA_NOTICE, "Attr. $attribute for object type $otype registred");
+                    } else {
+                        $self->log(LA_ERR, "Can't register attribute $attribute");
+                        $self->{_db}->rollback;
+                        return;
+                    }
+                }
+            }
+        }
+
         $self->{_db}->commit;
         return $self->{_db};