on 05-28-2015 8:00 PM
Hi there,
New to VBScripting, so need some help. I don't know where to find out all functions available for say ActiveModel
How do I modify this script so that it only generates the data dictionary for currently open Diagram. Right now it is doing it for every diagram in the data model.
Dim model
set m = ActiveModel
For each r in m.Reports
filename = "C:\Desktop\temp\PDmacro\" & r.Name & ".rtf"
r.GenerateRTF (filename)
Next
Read about this script here...
Hi Navin,
As your code has demonstrated, Reports component belong to Model object, not Diagram.
You cannot simply modify your code to achieve the goal.
But you can use the following method:
1) Open your current diagram, run the following code:
set symbols=ActiveDiagram.symbols
for each s in symbols
output s.displayName
next
This shows you all symbols in current diagram.
You want to use this information to generate report.
You need mark each symbol using extended attribute. Delete all symbols do not belong to
current diagram.
2) Based on information in 1), delete all objects do not show up in current diagram.
Note that each symbol name is exact the same as object name.
For example, you see symbol Table_1. Its object name is also Table_1
3) Now the model only contains your current diagram and all objects it contains.
Run the code to generate report.
You can use Powerdesigne Transformation to run above step.
a) Create pre transformation for step 1 and 2
b) Create post transformation for step 3
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
88 | |
10 | |
10 | |
9 | |
7 | |
7 | |
6 | |
5 | |
4 | |
4 |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.