Powerd911 – Numéro #1 au Canada

Prendre connaissance de la liste des attributs étendus et des contenus qui y sont associés (.XEM)

Ces quelques lignes de code en Visual Basic Script permettent :

  • de prendre connaissance de la liste des attributs étendu qui ont été créés au niveau d’une extension. Dans la présente situation le script liste les attributs qui ont été ajoutés au niveau des colonnes des tables pour un modèle physique ;
  • d’énumérer la liste des attributs étendus incluant leur contenu associés aux colonnes des tables d’un modèle physique.

Compatible avec PowerDesigner/PowerAMC 16.5

 '*****************************************************************************
'* Nom du fichier : LISTE_ATTRIB_ETENDU.vbs
'* Définition : Liste les attributs étendus définit au niveau des colonnes des tables.
'* Modèle: Modèle de données physique (MPD)
'* Objets: Table, Colonne, Attributs étendus
'* Auteur: Benoît Le Nabec,
'* URL : http://www.Powerd911.guru
'* Créé: 2015-01-01
'* Version: 1.0
'*****************************************************************************

' Liste les attributs étendu qui ont été définit au niveau des colonnes des tables.

For Each ModelExtension In ActiveModel.ExtendedModelDefinitions
For Each ExtAttr in ModelExtension.GetMetaExtensionsForClass(PdPDM.Cls_Column, Cls_ExtendedAttributeTargetItem)
output "Nom de l'attribut : " + ExtAttr.Name
output "Identification de l'objet : " + ExtAttr.ObjectID
output "Nom du modèle : " + ExtAttr.Model
Next
Next

' *********************

' Liste les propriétés des colonnes - incluant les attributs étendus

For Each Table In ActiveModel.Tables

For Each Column In Table.Columns

'Vérification des attributs étendus
For Each ModelExtension In ActiveModel.ExtendedModelDefinitions

For Each ExtAttr in ModelExtension.GetMetaExtensionsForClass(PdPDM.Cls_Column, Cls_ExtendedAttributeTargetItem)

xEAN = ExtAttr.Name
xEAValue = Column.GetExtendedAttributeText(xEAN)
tn=Table.Name
cn=Column.Name

output "Nom de la table : " + tn
output "Nom de la colonne : " + cn
output "Nom de l'attribut étendu : " + xEAN
output "Valeur assigné : " + xEAValue

Next
Next
Next
Next

Laisser un commentaire

Contacter nous
300 characters left