Imports System
Imports System.Collections
Imports System.Collections.Generic
Imports System.Runtime.Serialization
Imports ServiceStack
Imports ServiceStack.DataAnnotations
Imports IDB.API.DTO.Globalization
Namespace Global
    Namespace IDB.API.DTO.Globalization
        Public Partial Class GetTranslations
            Public Sub New()
                TranslateKeys = New List(Of String)
            End Sub
            Public Overridable Property TranslateKeys As List(Of String)
        End Class
        <DataContract>
        Public Partial Class GetTranslationsResponse
            Public Sub New()
                Translations = New List(Of Translation)
            End Sub
            <DataMember>
            Public Overridable Property Translations As List(Of Translation)
            <DataMember>
            Public Overridable Property PreferredLanguage As String
            <DataMember>
            Public Overridable Property PreferredLanguageShort As String
        End Class
        Public Partial Class GetUserTranslations
            Inherits GetTranslations
        End Class
        <DataContract>
        Public Partial Class Translation
            Implements ITranslation
            <DataMember>
            Public Overridable Property Key As String
            <DataMember>
            Public Overridable Property NL As String
            <DataMember>
            Public Overridable Property EN As String
            <DataMember>
            Public Overridable Property DE As String
            <DataMember>
            Public Overridable Property FR As String
            <DataMember>
            Public Overridable Property C1 As String
            <DataMember>
            Public Overridable Property C2 As String
            <DataMember>
            Public Overridable Property C3 As String
            <DataMember>
            Public Overridable Property C4 As String
            <DataMember>
            Public Overridable Property C5 As String
            <DataMember>
            Public Overridable Property C6 As String
        End Class
    End Namespace
End Namespace
VB.NET GetUserTranslations 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/GetUserTranslations HTTP/1.1 
Host: doapigw.baasbv.nl 
Accept: text/jsv
Content-Type: text/jsv
Content-Length: length
{
	TranslateKeys: 
	[
		String
	]
}
HTTP/1.1 200 OK
Content-Type: text/jsv
Content-Length: length
{
	Translations: 
	[
		{
			Key: String,
			NL: String,
			EN: String,
			DE: String,
			FR: String,
			C1: String,
			C2: String,
			C3: String,
			C4: String,
			C5: String,
			C6: String
		}
	],
	PreferredLanguage: String,
	PreferredLanguageShort: String
}