Bug
| Bug ID Number | NIM004183 |
|---|---|
| Submitted | September 13, 2006 |
| Last Modified | June 5, 2024 |
| Applies to | No Product Found |
| Version found | 9.1 |
| Version Fixed | 9.2 |
| Status | Fixed |
Code:
Sub ToggleVersioning()
Dim pApp As IGxApplication
Dim pGxDataset As IGxDataset
Dim pDataset As IDataset
Dim pVersionedObject As IVersionedObject
Set pApp = Application
'Get the selected feature class in ArcCatalog
If TypeOf pApp.SelectedObject Is IGxDataset Then
Set pGxDataset = pApp.SelectedObject
Set pDataset = pGxDataset.Dataset
Set pVersionedObject = pDataset
If pVersionedObject.IsRegisteredAsVersioned Then
pVersionedObject.RegisterAsVersioned False
MsgBox "The selected feature class is now unregistered as versioned."
Else
pVersionedObject.RegisterAsVersioned True
MsgBox "The selected feature class is now registered as versioned."
End If
End If
End Sub
Note: The system junction feature class must be registered as versioned in order to make edits to any feature class in this feature dataset.
Bug ID: NIM004183
Software:
Get help from ArcGIS experts
Download the Esri Support App