迁移模型时,必须启用该技术的两个版本;迁移完成后,禁用该技术的旧版本。
将ArchiMate 2型号迁移到ArchiMate 3.1
在Enterprise Architect中,ArchiMate 3.1内置了一个迁移脚本,用于将为ArchiMate 2构建的模型升级到ArchiMate 3.1。执行该脚本时:
1.选择“专门化>工具>脚本”功能区选项。
2.展开 ArchiMate® 3.1 文件夹。
3.右键点击“迁移ArchiMate 2到ArchiMate 3”脚本。
4.点击上下文菜单中的“运行脚本”选项。
5.在系统输出窗口中监控脚本的执行情况。
脚本执行完成后,禁用 ArchiMate 2 技术。
注释(迁移ArchiMate 2到ArchiMate 3.1)
如果你想从ArchiMate型号迁移到ArchiMate 3.1型号,必须分两个阶段完成:从ArchiMate迁移到ArchiMate 2,以及从ArchiMate 2迁移到ArchiMate 3.1
迁移ArchiMate模型到ArchiMate 2
您必须创建一个脚本来调用 Migrate() 函数,将包或元素迁移到 ArchiMate 2:这是一个 VB 脚本示例:
Dim proj as EA.Project
set proj = Repository.GetProjectInterface
proj.Migrate sGUID, "ArchiMate", "ArchiMate 2"
'refresh the model
If lngPackageID<>0 Then
Repository.RefreshModelView (lngPackageID)
End If
End Sub
Sub MigrateSelectedItem
Dim selType
Dim selElement as EA.Element
Dim selPackage as EA.Package
selType = GetTreeSelectedItemType
If selType = 4 Then 'means Element
set selElement = GetTreeSelectedObject
MigrateElement selElement.ElementGUID, selElement.PackageID
MsgBox "Element Migration Completed",0,"ArchiMate 2 Migration"
ElseIf selType = 5 Then 'means Package
set selPackage = GetTreeSelectedObject
MigrateElement selPackage.PackageGUID, selPackage.PackageID
MsgBox "Package Migration Completed",0,"ArchiMate 2 Migration"
Else
MsgBox "Select a Package or Element in the Browser window to initiate migration",0,"ArchiMate 2 Migration"
Sub Main
MigrateSelectedItem
Main
注释(迁移ArchiMate到ArchiMate 2)