EA_OnRetrieveModelTemplate require que un Add-In pase una plantilla del modelo a Enterprise Architect.
Sintaxis
La función EA_OnRetrieveModelTemplate(Repositorio como EA.Repository,sLocation como string) como string
La sintaxis de la función EA_OnRetrieveModelTemplate contiene los siguientes elementos:
Parámetro
|
Tipo
|
Dirección
|
Descripción
|
Repositorio
|
EA.Repository
|
IN
|
Un objeto EA.Repository representando el modelo de Enterprise Architect actualmente abierto. Registra sus miembros para recuperar los datos del modelo y la información del estado de la interfaz.
|
sLocation
|
String
|
IN
|
El nombre de la plantilla requerida. Esta debería coincidir con el atributo Ubicación en la sección <ModelTemplates> de un archivo de la Tecnología MDG. Para obtener más información, vea Incorporar las plantillas del modelo en el tema Tecnología
|
Valor de retorno
Retorna un string que contiene una exportación XMI del modelo que esta siendo usado como una plantilla.
Detalles
Este evento ocurre cuando un usuario ejecuta el comando Agregar el modelo usando el asistente para agregar un modelo que ha sido definido por una Tecnología MDG. Vea Incorporar las plantillas del modelo en el tema Tecnología para obtener detalles acerca de como definir tales plantillas del modelo.
Ejemplo
Public Function EA_OnRetrieveModelTemplate(ByRef Rep As EA.Repository, ByRef sLocation As String) As String
Dim sTemplate As String
Select Case sLocation
Case "Templates\Template1.xml"
sTemplate = My.Resources.Template1
Case "Templates\Template2.xml"
sTemplate = My.Resources.Template2
Case "Templates\Template3.xml"
sTemplate = My.Resources.Template3
Case Else
MsgBox("Path for " & sLocation & " not found")
sTemplate = ""
End Select
EA_OnRetrieveModelTemplate = sTemplate
End Function
|