MyApp

<back to all web services

QueryBookings

Find Bookings

Imports System
Imports System.IO
Imports System.Collections
Imports System.Collections.Generic
Imports System.Runtime.Serialization
Imports ServiceStack
Imports ServiceStack.DataAnnotations
Imports MyApp.ServiceModel

Namespace Global

    Namespace MyApp.ServiceModel

        '''<Summary>
        '''Booking Details
        '''</Summary>
        Public Partial Class Booking
            Inherits AuditBase
            Public Overridable Property Id As Integer
            Public Overridable Property Name As String
            Public Overridable Property RoomType As RoomType
            Public Overridable Property RoomNumber As Integer
            Public Overridable Property BookingStartDate As Date
            Public Overridable Property BookingEndDate As Date?
            Public Overridable Property Cost As Decimal
            <References(GetType(Coupon))>
            Public Overridable Property CouponId As String

            Public Overridable Property Discount As Coupon
            Public Overridable Property Notes As String
            Public Overridable Property Cancelled As Boolean?
        End Class

        '''<Summary>
        '''Discount Coupons
        '''</Summary>
        Public Partial Class Coupon
            Public Overridable Property Id As String
            Public Overridable Property Description As String
            Public Overridable Property Discount As Integer
            Public Overridable Property ExpiryDate As Date
        End Class

        '''<Summary>
        '''Find Bookings
        '''</Summary>
        Public Partial Class QueryBookings
            Inherits QueryDb(Of Booking)
            Public Overridable Property Id As Integer?
        End Class

        Public Enum RoomType
            [Single]
            [Double]
            Queen
            Twin
            Suite
        End Enum

        Public Partial Class Todo
            Public Overridable Property Id As Long
            Public Overridable Property Text As String
            Public Overridable Property IsFinished As Boolean
        End Class
    End Namespace

    Namespace ServiceStack

        <DataContract>
        Public Partial Class AuditBase
            <DataMember(Order:=1)>
            Public Overridable Property CreatedDate As Date

            <DataMember(Order:=2)>
            <Required>
            Public Overridable Property CreatedBy As String

            <DataMember(Order:=3)>
            Public Overridable Property ModifiedDate As Date

            <DataMember(Order:=4)>
            <Required>
            Public Overridable Property ModifiedBy As String

            <DataMember(Order:=5)>
            Public Overridable Property DeletedDate As Date?

            <DataMember(Order:=6)>
            Public Overridable Property DeletedBy As String
        End Class

        <DataContract>
        Public Partial Class QueryBase
            <DataMember(Order:=1)>
            Public Overridable Property Skip As Integer?

            <DataMember(Order:=2)>
            Public Overridable Property Take As Integer?

            <DataMember(Order:=3)>
            Public Overridable Property OrderBy As String

            <DataMember(Order:=4)>
            Public Overridable Property OrderByDesc As String

            <DataMember(Order:=5)>
            Public Overridable Property Include As String

            <DataMember(Order:=6)>
            Public Overridable Property Fields As String

            <DataMember(Order:=7)>
            Public Overridable Property Meta As Dictionary(Of String, String)
        End Class

        Public Partial Class QueryDb(Of T)
            Inherits QueryBase
        End Class

        <DataContract>
        Public Partial Class QueryResponse(Of T)
            <DataMember(Order:=1)>
            Public Overridable Property Offset As Integer

            <DataMember(Order:=2)>
            Public Overridable Property Total As Integer

            <DataMember(Order:=3)>
            Public Overridable Property Results As List(Of Todo)

            <DataMember(Order:=4)>
            Public Overridable Property Meta As Dictionary(Of String, String)

            <DataMember(Order:=5)>
            Public Overridable Property ResponseStatus As ResponseStatus
        End Class
    End Namespace
End Namespace

VB.NET QueryBookings DTOs

GET /bookings HTTP/1.1 
Host: blazor-gallery.servicestack.net 
Accept: text/jsv

HTTP/1.1 200 OK
Content-Type: text/jsv
Content-Length: length

{
	offset: 0,
	total: 0,
	results: 
	[
		{
			id: 0,
			name: String,
			roomType: Single,
			roomNumber: 0,
			bookingStartDate: 0001-01-01,
			bookingEndDate: 0001-01-01,
			cost: 0,
			couponId: String,
			discount: 
			{
				id: String,
				description: String,
				discount: 0,
				expiryDate: 0001-01-01
			},
			notes: String,
			cancelled: False,
			createdDate: 0001-01-01,
			createdBy: String,
			modifiedDate: 0001-01-01,
			modifiedBy: String,
			deletedDate: 0001-01-01,
			deletedBy: String
		}
	],
	meta: 
	{
		String: String
	},
	responseStatus: 
	{
		errorCode: String,
		message: String,
		stackTrace: String,
		errors: 
		[
			{
				errorCode: String,
				fieldName: String,
				message: String,
				meta: 
				{
					String: String
				}
			}
		],
		meta: 
		{
			String: String
		}
	}
}