Example: Applying a branch type to a version

' Connect to the top-level Rational ClearCase object and get a VOB
Dim CC As New ClearCase.Application
Dim VOB as CCVOB
Set VOB = CC.VOB("\caroltest")

' Get an existing branch type in the VOB
Dim BranchType as CCBranchType
Set BranchType = VOB.BranchType("v3.2_main")

' Apply the branch type to a version
Dim Ver as CCVersion
Set Ver = CC.Version("\caroltest\testelem.c")
BranchType.Apply Ver

Feedback