Chapter 4 Extension de vos modèles à l'aide de profils

Méthodes (Profile)

Les méthodes permet d'effectuer des actions sur les objets. Elles sont rédigées en VBScript, et sont appelées par d'autres composants du profil, tels que les commandes de menu (voir Menus (Profile)) ou les boutons de formulaires (voir Formulaires (Profile)).

La méthode exemple suivante, créée dans la métaclasse Class, convertit les classes en interfaces. Elle copie les propriétés et opérations de base des classes, supprime la classe (pour éviter tout problème d'espace de noms), et crée la nouvelle interface.

Notez que le script ne gère pas d'autres propriétés de classe, ni l'affichage d'interface, mais une méthode peut être utilisée pour lancer une boîte de dialogue personnalisée afin de demander à l'utilisateur final d'interagir avant d'effectuer une action (voir Exemple : Création d'une boîte de dialogue affichée depuis une commande de menu).

Sub %Mthd%(obj)
   ' Convert class to interface

   ' Copy class basic properties
   Dim Folder, Intf, ClassName, ClassCode
   Set Folder = obj.Parent
   Set Intf = Folder.Interfaces.CreateNew
   ClassName = obj.Name
   ClassCode = obj.Code
   Intf.Comment = obj.Comment
   
   ' Copy class operations
   Dim Op
   For Each Op In obj.Operations
      ' ...
      Output Op.Name
   Next

   ' Destroy class
   obj.Delete

   ' Rename interface to saved name
   Intf.Name = ClassName
   Intf.Code = ClassCode
End Sub

Pour plus d'informations sur l'utilisation de VBScript dans PowerAMC, reportez-vous au manuel Pilotage de PowerAMC à l'aide de scripts.

Pour créer une méthode :

Pointez sur une métaclasse, un stéréotype ou un critère, cliquez le bouton droit de la souris, puis sélectionnez Nouveau→Méthode.

Saisissez un nom et un commentaire pour la méthode.

Cliquez sur l'onglet Script de la méthode, puis saisissez le script. Le cas échéant, vous pouvez réutiliser les fonctions stockées dans l'onglet Script global. Par défaut, cet onglet contient le squelette de script suivant :
```
Sub %Method%(obj)
    ' Implement your method on <obj> here
End Sub
```
%Method% est une concaténation du nom du fichier de ressource, du nom de la métaclasse courante, du nom du stéréotype ou critère, ainsi que du nom de la méthode elle-même dans l'onglet Général. Si l'un de ces noms contient un espace, ce dernier est remplacé par un tiret bas.

Cliquez sur Appliquer.