This can possibly work if you make %Persistent a secondary superclass. In that case, new properties would go to a separate subscript, and your setup can maybe work (requires testing).
Storage works like this (parent has N properties, Child - X):
Child Extends %Persistent, Parent:
^a(id) = $lb("", prop1, prop2, ..., propX)Child Extends Parent, %Persistent:
^a(id) = $lb("Child", propA, propB, ..., propN)
^a(id, "Child") = $lb(propO, propP, ..., propX)- Log in to post comments
.png)