' Options:
'Date: 2024-12-29 03:38:06
'Version: 8.22
'Tip: To override a DTO option, remove "''" prefix before updating
'BaseUrl: https://data.regent-college.edu
'
'''GlobalNamespace: 
'''MakePartial: True
'''MakeVirtual: True
'''MakeDataContractsExtensible: False
'''AddReturnMarker: True
'''AddDescriptionAsComments: True
'''AddDataContractAttributes: False
'''AddIndexesToDataMembers: False
'''AddGeneratedCodeAttributes: False
'''AddResponseStatus: False
'''AddImplicitVersion: 
'''InitializeCollections: True
'''ExportValueTypes: False
'IncludeTypes: ProgramStatusesRequest.*
'''ExcludeTypes: 
'''AddNamespaces: 
'''AddDefaultXmlNamespace: http://schemas.servicestack.net/types

Imports System
Imports System.Collections
Imports System.Collections.Generic
Imports System.Runtime.Serialization
Imports ServiceStack
Imports ServiceStack.DataAnnotations
Imports regis.ClassLibrary.Responses
Imports regis.ClassLibrary.Requests

Namespace Global

    Namespace regis.ClassLibrary.Requests

        <Route("/ProgramStatuses", "POST")>
        Public Partial Class ProgramStatusesRequest
            Implements IReturn(Of ProgramStatusesResponse)
        End Class
    End Namespace

    Namespace regis.ClassLibrary.Responses

        Public Partial Class ProgramStatusesResponse
            Public Sub New()
                programStatuses = New List(Of ProgramStatusResponse)
            End Sub

            Public Overridable Property ResponseStatus As ResponseStatus
            Public Overridable Property programStatuses As List(Of ProgramStatusResponse)
        End Class

        Public Partial Class ProgramStatusResponse
            Public Overridable Property ResponseStatus As ResponseStatus
            Public Overridable Property id As Integer
            Public Overridable Property status_code As String
            Public Overridable Property status_name As String
        End Class
    End Namespace

    Namespace ServiceStack

        <DataContract>
        Public Partial Class ResponseStatus
            Implements IMeta
            Public Sub New()
                Errors = New List(Of ResponseError)
                Meta = New Dictionary(Of String, String)
            End Sub

            <DataMember(Order:=1)>
            Public Overridable Property ErrorCode As String

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

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

            <DataMember(Order:=4)>
            Public Overridable Property Errors As List(Of ResponseError)

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