namespace Test.ServiceModel
open System
open System.IO
open System.Collections
open System.Collections.Generic
open System.Runtime.Serialization
open ServiceStack
open ServiceStack.DataAnnotations
type LivingStatus =
| Alive = 0
| Dead = 1
[<AllowNullLiteral>]
type RockstarBase() =
member val FirstName:String = null with get,set
member val LastName:String = null with get,set
member val Age:Nullable<Int32> = new Nullable<Int32>() with get,set
member val DateOfBirth:DateTime = new DateTime() with get,set
member val DateDied:Nullable<DateTime> = new Nullable<DateTime>() with get,set
member val LivingStatus:LivingStatus = new LivingStatus() with get,set
[<AllowNullLiteral>]
type RockstarAuto() =
inherit RockstarBase()
member val Id:Int32 = new Int32() with get,set
[<AllowNullLiteral>]
type RockstarWithIdAndResultResponse() =
member val Id:Int32 = new Int32() with get,set
member val Result:RockstarAuto = null with get,set
member val ResponseStatus:ResponseStatus = null with get,set
[<DataContract>]
[<AllowNullLiteral>]
type AuditBase() =
[<DataMember(Order=1)>]
member val CreatedDate:DateTime = new DateTime() with get,set
[<DataMember(Order=2)>]
[<Required>]
member val CreatedBy:String = null with get,set
[<DataMember(Order=3)>]
member val ModifiedDate:DateTime = new DateTime() with get,set
[<DataMember(Order=4)>]
[<Required>]
member val ModifiedBy:String = null with get,set
[<DataMember(Order=5)>]
member val DeletedDate:Nullable<DateTime> = new Nullable<DateTime>() with get,set
[<DataMember(Order=6)>]
member val DeletedBy:String = null with get,set
[<AllowNullLiteral>]
type RockstarAuditTenant() =
inherit AuditBase()
member val TenantId:Int32 = new Int32() with get,set
member val Id:Int32 = new Int32() with get,set
member val FirstName:String = null with get,set
member val LastName:String = null with get,set
member val Age:Nullable<Int32> = new Nullable<Int32>() with get,set
member val DateOfBirth:DateTime = new DateTime() with get,set
member val DateDied:Nullable<DateTime> = new Nullable<DateTime>() with get,set
member val LivingStatus:LivingStatus = new LivingStatus() with get,set
[<AllowNullLiteral>]
type CreateRockstarAuditTenant() =
inherit CreateAuditTenantBase<RockstarAuditTenant, RockstarWithIdAndResultResponse>()
member val SessionId:String = null with get,set
member val FirstName:String = null with get,set
member val LastName:String = null with get,set
member val Age:Nullable<Int32> = new Nullable<Int32>() with get,set
member val DateOfBirth:DateTime = new DateTime() with get,set
member val DateDied:Nullable<DateTime> = new Nullable<DateTime>() with get,set
member val LivingStatus:LivingStatus = new LivingStatus() with get,set
[<AllowNullLiteral>]
type CreateAuditTenantBase<Table, TResponse>() =
inherit CreateAuditBase<Table, TResponse>()
[<AllowNullLiteral>]
type CreateAuditBase<Table, TResponse>() =
class end
F# CreateRockstarAuditTenant DTOs
To override the Content-type in your clients, use the HTTP Accept Header, append the .jsv suffix or ?format=jsv
The following are sample HTTP requests and responses. The placeholders shown need to be replaced with actual values.
POST /jsv/reply/CreateRockstarAuditTenant HTTP/1.1
Host: test.servicestack.net
Accept: text/jsv
Content-Type: text/jsv
Content-Length: length
{
sessionId: String,
firstName: String,
lastName: String,
age: 0,
dateOfBirth: 0001-01-01,
dateDied: 0001-01-01,
livingStatus: Alive
}
HTTP/1.1 200 OK
Content-Type: text/jsv
Content-Length: length
{
id: 0,
result:
{
id: 0,
firstName: String,
lastName: String,
age: 0,
dateOfBirth: 0001-01-01,
dateDied: 0001-01-01,
livingStatus: Alive
},
responseStatus:
{
errorCode: String,
message: String,
stackTrace: String,
errors:
[
{
errorCode: String,
fieldName: String,
message: String,
meta:
{
String: String
}
}
],
meta:
{
String: String
}
}
}