Toad World® Forums

How to create a relation between two tables via script - reloaded?


#1

Some questions to the result of running the following script:
Relation = Model.AddLinkObject(2004, TenantEntity, Entity);
Relation.Name = RelationName;
Relation.Caption = RelationName;
Relation.Identifying = false;
Relation.MandatoryParent = false;
Attribute = Relation.ForeignKeys.GetObject(0).AttrChild;
Attribute.Name = AttributeName;
Attribute.Caption = AttributeName;
Attribute.Ordinal = 2;
Attribute.NotNull = false;
Pk = Entity.Keys.GetObjectByName(Prefix+’_PK’);
if (Pk == null) {
System.ShowMessageDialog(1000,‘AdaptEntitiesDialog’,‘Could not find PK ‘+Prefix+’_PK’,3,4);
}
else {
// Remove from Pk.KeyItems
}

  1. How to prevent the new attribute being added to the primary key?

  2. Or as workaround: How to remove an item from the KeyItems list?

3.Why is the new FK attribute always at the bottom and Attribute.Ordinal=2 ignored? How to move it up to the second position inthe script?

Thanx a lot.
Andreas


#2

Please help…
Are all people on holidays out there?

Andreas


#3

Hi Andreas,

See the reply at:
http://modeling.inside.quest.com/thread.jspa?messageID=105470&tstart=0#105470

Thanks for your patience.

Regards,

Vladka + TDM Team