Setting all model classes to use AutoInc as PrimaryKeyMapper
No edit summary
No edit summary
Line 1: Line 1:
Reversed a database and wanted to set all classes to use AutoInc for its primary key?
Did you reverse a database and want to set all classes to use AutoInc for its primary key?


Here's an EAL for you;
Here's an EAL for you:


  Class.allInstances->select(c | c.TaggedValue->select(tv | tv.Tag='Eco.PrimaryKeyMapper')->isEmpty)
  Class.allInstances->select(c | c.TaggedValue->select(tv | tv.Tag='Eco.PrimaryKeyMapper')->isEmpty)
Line 12: Line 12:
   )
   )
  )
  )
[[Category:EAL]]
[[Category:EAL]]

Revision as of 07:07, 15 March 2023

Did you reverse a database and want to set all classes to use AutoInc for its primary key?

Here's an EAL for you:

Class.allInstances->select(c | c.TaggedValue->select(tv | tv.Tag='Eco.PrimaryKeyMapper')->isEmpty)
->collect(c |
let newtag = TaggedValue.Create in
(
    newtag.Tag := 'Eco.PrimaryKeyMapper';
    newtag.Value := 'AutoInc';
    newtag.ModelElement := c
  )
)
This page was edited 95 days ago on 02/10/2024. What links here