Question Re: powerdesigner - customization of database object using macro or vbscript. in Technology Q&A

powerdesigner - customization of database object using macro or vbscript.

Former Member — Thu, 06 Jun 2019 20:04:16 GMT

How can I parameterize a new database object in powerdesigner in order to replicate tables and rename them as work tables.

Re: powerdesigner - customization of database object using macro or vbscript.

GeorgeMcGeachie — Fri, 07 Jun 2019 09:08:48 GMT

In a script, use the CreateReplica function to replicate a table; then you should be able to rename the replica table. If you need to edit more than just the table name, you may need to access the replication rules, and I'm not sure where they are in the object model

Re: powerdesigner - customization of database object using macro or vbscript.

Ondrej_Divis — Mon, 10 Jun 2019 11:28:14 GMT

If you replicate table into the same package as source table (it could be root level of the model as well), its Name and Code properties are automatically de-replicated, which means that you can modify the Name of replicated table instantly.

If you replicate tables between two different packages (with different Namespaces) or between two diffrent models, Name and Code are replicated/synchronized by default. To de-replicate certain properties you have to open the properties of replicated table and go to Version Info tab. You can open the replication properties from there. And choose which attributes, collections and/or sub-replication you need to keep in sync and which you don`t.

Ondrej

Re: powerdesigner - customization of database object using macro or vbscript.

Ondrej_Divis — Tue, 11 Jun 2019 08:38:34 GMT

One more thing. If you need to dereplicate certain attributes (e.g. Name, Code or anything else) by script, you need to use its attribute SourceReplication to get to the replication properties and the modify the string property called Attributes. See my example below, which dereplicates table name. Name of the replicated table in my example is "XXX".

For each t in Activemodel.Tables
  If t.Name = "XXX" then
    output t.SourceReplication.Attributes
    t.SourceReplication.Attributes = Replace(t.SourceReplication.Attributes, "Name" + vbLf, vbLf)
    output t.SourceReplication.Attributes
  End if
Next

Regards,

Ondrej