Bu CATIA API fonksiyonu ne işe yarar?
Fonksiyon: CATTPSInterfaces AnnotationSet (Object)
Cevap:
This example illustrates activation of the 'as result with link' option for the next import (GlobalCopySetTo) run.
 

 Dim myPart As Part
 Set myPart = CATIA.ActiveEditor.ActiveObject
 Dim mySelection As Selection
 Set mySelection = CATIA.ActiveEditor.Selection
 Dim SelectionFilter(0)
 SelectionFilter(0)="AnnotationSet"
 Dim Status As String
 Status = mySelection.SelectElement2(SelectionFilter, "Select an Annotation Set to copy: ", False)
 Dim SelectedEntity As SelectedElement
 Set SelectedEntity = mySelection.Item( 1 )
 Dim SetToReplicate As AnnotationSet
 Set SetToReplicate = SelectedEntity.Value
 SetToReplicate.ApplyResultWithLinkWhenCopySetTo
 SetToReplicate.GlobalCopySetTo(myPart)