Aug

Удаление символов на диаграмме PowerDesigner по заданному стереотипу

osya

Сегодня у меня возникла задача: в PowerDesigner на PDM диаграмме удалить символы таблиц с заданным стереотипом. Для решения этой задачи я написал следующий VB Script:

Set myModel = ActiveModel
Set diag = ActiveDiagram
For each T in diag.Symbols
   if T.ObjectType = "TableSymbol" and T.object.stereotype = "Документ" then
      output T.name
      T.delete
   end if
Next