' Options: 'Date: 2024-05-16 02:48:04 'Version: 6.111 'Tip: To override a DTO option, remove "''" prefix before updating 'BaseUrl: https://test.servicestack.net ' '''GlobalNamespace: '''MakePartial: True '''MakeVirtual: True '''MakeDataContractsExtensible: False '''AddReturnMarker: True '''AddDescriptionAsComments: True '''AddDataContractAttributes: False '''AddIndexesToDataMembers: False '''AddGeneratedCodeAttributes: False '''AddResponseStatus: False '''AddImplicitVersion: '''InitializeCollections: True '''ExportValueTypes: False 'IncludeTypes: HelloWithEnumMap.* '''ExcludeTypes: '''AddNamespaces: '''AddDefaultXmlNamespace: http://schemas.servicestack.net/types Imports System Imports System.Collections Imports System.Collections.Generic Imports System.Runtime.Serialization Imports ServiceStack Imports ServiceStack.DataAnnotations Imports System.IO Imports Test.ServiceModel Namespace Global Namespace Test.ServiceModel Public Enum EnumFlags Value0 = 0 Value1 = 1 Value2 = 2 Value3 = 4 Value123 = 7 End Enum Public Enum EnumStyle lower UPPER PascalCase camelCase camelUPPER PascalUPPER End Enum Public Enum EnumType Value1 Value2 Value3 End Enum Public Enum EnumWithValues None Value1 Value2 End Enum Public Partial Class HelloWithEnumMap Public Sub New() EnumProp = New Dictionary(Of EnumType, EnumType) EnumWithValues = New Dictionary(Of EnumWithValues, EnumWithValues) NullableEnumProp = New Dictionary(Of Nullable(Of EnumType), Nullable(Of EnumType)) EnumFlags = New Dictionary(Of EnumFlags, EnumFlags) EnumStyle = New Dictionary(Of EnumStyle, EnumStyle) End Sub Public Overridable Property EnumProp As Dictionary(Of EnumType, EnumType) Public Overridable Property EnumWithValues As Dictionary(Of EnumWithValues, EnumWithValues) Public Overridable Property NullableEnumProp As Dictionary(Of Nullable(Of EnumType), Nullable(Of EnumType)) Public Overridable Property EnumFlags As Dictionary(Of EnumFlags, EnumFlags) Public Overridable Property EnumStyle As Dictionary(Of EnumStyle, EnumStyle) End Class End Namespace End Namespace