1if (pointGroup.IsRawDescriptionOverridden)
 2{
 3    write("PointGroup raw description is overridden.\n");
 4    PointGroupRawDescriptionOverrideInfo rawDescriptionOverrideInfo = pointGroup.RawDescriptionOverride;
 5    switch (rawDescriptionOverrideInfo.ActiveOverrideType)
 6    {
 7        case PointGroupOverrideType.FixedValue:
 8            write(String.Format(" - Raw description override type: fixed \n   value: {0}\n",
 9                rawDescriptionOverrideInfo.FixedRawDescription));
10            break;
11        case PointGroupOverrideType.UserDefinedProperty:
12            write(String.Format(" - Raw description override type: UDP \n   UDP name: {0}\n",
13                rawDescriptionOverrideInfo.UDP.ClassificationName));
14            break;
15        case PointGroupOverrideType.XDRef:
16            ObjectId xdrefId = rawDescriptionOverrideInfo.XDRefId;
17            // External DB Reference object not exposed yet.
18            write(" - Raw description override type: XDRef ");
19            break;
20        default:
21            break;
22    }
23}

 1If pointGroup__1.IsRawDescriptionOverridden Then
 2  write("PointGroup raw description is overridden." & vbLf)
 3  Dim rawDescriptionOverrideInfo As PointGroupRawDescriptionOverrideInfo = pointGroup__1.RawDescriptionOverride
 4  Select Case rawDescriptionOverrideInfo.ActiveOverrideType
 5    Case PointGroupOverrideType.FixedValue
 6      write([String].Format(" - Raw description override type: fixed " & vbLf & "   value: {0}" & vbLf, rawDescriptionOverrideInfo.FixedRawDescription))
 7      Exit Select
 8    Case PointGroupOverrideType.UserDefinedProperty
 9      write([String].Format(" - Raw description override type: UDP " & vbLf & "   UDP name: {0}" & vbLf, rawDescriptionOverrideInfo.UDP.ClassificationName))
10      Exit Select
11    Case PointGroupOverrideType.XDRef
12      Dim xdrefId As ObjectId = rawDescriptionOverrideInfo.XDRefId
13      ' External DB Reference object not exposed yet.
14      write(" - Raw description override type: XDRef ")
15      Exit Select
16    Case Else
17      Exit Select
18  End Select
19End If