namespace Test.ServiceModel
open System
open System.Collections
open System.Collections.Generic
open System.Runtime.Serialization
open ServiceStack
open ServiceStack.DataAnnotations
type EnumType =
| Value1 = 0
| Value2 = 1
| Value3 = 2
type EnumWithValues =
| None = 0
| Value1 = 1
| Value2 = 2
[<Flags>]
type EnumFlags =
| Value0 = 0
| Value1 = 1
| Value2 = 2
| Value3 = 4
| Value123 = 7
type EnumStyle =
| lower = 0
| UPPER = 1
| PascalCase = 2
| camelCase = 3
| camelUPPER = 4
| PascalUPPER = 5
[<AllowNullLiteral>]
type HelloWithEnumList() =
member val EnumProp:ResizeArray<EnumType> = new ResizeArray<EnumType>() with get,set
member val EnumWithValues:ResizeArray<EnumWithValues> = new ResizeArray<EnumWithValues>() with get,set
member val NullableEnumProp:ResizeArray<Nullable<EnumType>> = new ResizeArray<Nullable<EnumType>>() with get,set
member val EnumFlags:ResizeArray<EnumFlags> = new ResizeArray<EnumFlags>() with get,set
member val EnumStyle:ResizeArray<EnumStyle> = new ResizeArray<EnumStyle>() with get,set
To override the Content-type in your clients, use the HTTP Accept Header, append the .xml suffix or ?format=xml
The following are sample HTTP requests and responses. The placeholders shown need to be replaced with actual values.
POST /xml/oneway/HelloWithEnumList HTTP/1.1
Host: test.servicestack.net
Accept: application/xml
Content-Type: application/xml
Content-Length: length
<HelloWithEnumList xmlns:i="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://schemas.datacontract.org/2004/07/Test.ServiceModel">
<EnumFlags>
<EnumFlags>Value0</EnumFlags>
</EnumFlags>
<EnumProp>
<EnumType>Value1</EnumType>
</EnumProp>
<EnumStyle>
<EnumStyle>lower</EnumStyle>
</EnumStyle>
<EnumWithValues>
<EnumWithValues>None</EnumWithValues>
</EnumWithValues>
<NullableEnumProp xmlns:d2p1="http://schemas.datacontract.org/2004/07/System">
<d2p1:EnumType>Value1</d2p1:EnumType>
</NullableEnumProp>
</HelloWithEnumList>