Using VBScript, create Table References in a PDM and add them to the default diagram

[#1]

I have an application where I have reverse engineered a database I have a vbscript that correctly matches Table Columns and generates a Reference object between the two Tables. What I haven't quite figured out is how to render them within the default diagram, has anyone done anything similar to this within SAP PowerDesigner scripting.

Thanks in advance, Mike

[freym05 · Accepted solution]

Thank you Ondrej, works perfectly, appreciate the response. As a follow-up that someone may find useful there was also a need to add these to the diagram (there's only 1) which is as follows which was added after the above code fragment:

For Each pdmDiag In Model.PhysicalDiagrams
pdmDiag.AttachLinkObject tableRef, pdmParentTable, pdmChildTable
Next

[Ondrej_Divis]

Hi Michael,

it is quite simple. Here is the code which displays already existing references on current diagram. For displaying tables, it is very similar, you just need to use the function AttachObject instead AttachLinkObject.

For each ref in Activemodel.References
  Set sym = ActiveDiagram.AttachLinkObject(ref)
Next

HTH,

Ondrej