Skip to Content
0

How to redraw the Table symbol on ALL diagrams of active model ?

Jul 18 at 12:31 PM

37

avatar image

PowerDesigner 16.6

How to redraw the Table symbol on ALL diagrams of active model ?
The current diagram is redraw only now (please, see my script below)

Function %Validate%(obj, ByRef message)

dim sym
dim col

for each sym in activeDiagram.symbols
'msgbox sym.ClassName
if sym.ClassName = "Table Symbol" then
if sym.Code=obj.Code then
if obj.GetExtendedAttribute("PartitionScheme") <> "" then
sym.Shadow= true
sym.ShadowStyle=1
sym.ShadowColor=255


elseif obj.GetExtendedAttribute("FilledManuallyTable") then
sym.Shadow= true
sym.ShadowStyle=1
sym.ShadowColor=200*150*100

else
sym.Shadow= false
end if

if obj.GetExtendedAttribute("SignificantTable") then
sym.LineWidth=3
else
sym.LineWidth=0
end if
end if
end if
Next

activeDiagram.RedrawAllViews
%Validate% = True

End Function

10 |10000 characters needed characters left characters exceeded
* Please Login or Register to Answer, Follow or Comment.

1 Answer

George McGeachie Jul 19 at 09:30 AM
0

You'll need to apply the Redraw method to all diagrams in several collections:

ActiveModel.ProcessMapDiagrams / TimelineDiagrams / OrganizationChartDiagrams etc

If you have packages, don't forget to do those as well :)

Share
10 |10000 characters needed characters left characters exceeded