namespace ScannerVision.WebService.Json.Dto
open System
open System.Collections
open System.Collections.Generic
open System.Runtime.Serialization
open ServiceStack
open ServiceStack.DataAnnotations
[<AllowNullLiteral>]
type JsonDto() =
class end
[<AllowNullLiteral>]
type JsonRequestDto() =
inherit JsonDto()
member val ClientCode:String = null with get,set
member val ClientRegistrationCode:String = null with get,set
member val Token:String = null with get,set
[<AllowNullLiteral>]
type JsonVpdLicensedRequest() =
inherit JsonRequestDto()
member val ClientHostName:String = null with get,set
[<AllowNullLiteral>]
type JsonVpdLicensedResponse() =
inherit JsonDto()
member val IsLicensed:Boolean = new Boolean() with get,set
F# JsonVpdLicensedRequest DTOs
To override the Content-type in your clients, use the HTTP Accept Header, append the .other suffix or ?format=other
The following are sample HTTP requests and responses. The placeholders shown need to be replaced with actual values.
POST /jsonl/reply/JsonVpdLicensedRequest HTTP/1.1
Host: buildmax.org
Accept: text/jsonl
Content-Type: text/jsonl
Content-Length: length
{"ClientHostName":"String","ClientCode":"String","ClientRegistrationCode":"String","Token":"String"}
HTTP/1.1 200 OK
Content-Type: text/jsonl
Content-Length: length
{"IsLicensed":false}