' Options: 'Date: 2025-05-10 00:48:32 'Version: 8.40 'Tip: To override a DTO option, remove "''" prefix before updating 'BaseUrl: https://active-ewebservice.biz/aeservices30/api ' '''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: WebCategoriesRequest.* '''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 AIM.WebService Namespace Global Namespace AIM.WebService Public Partial Class BaseRequest ''' '''This is your AIM API Key provided by Tri-Tech ''' Public Overridable Property ApiKey As String Public Overridable Property OAuthToken As String End Class Public Partial Class BaseResponse ''' ''' ''' Public Overridable Property Status As BaseResponseResult End Class Public Partial Class BaseSecureRequest Inherits BaseRequest ''' ''' ''' Public Overridable Property Token As String ''' ''' ''' Public Overridable Property DeviceId As String ''' ''' ''' Public Overridable Property AppId As String End Class Public Partial Class ImageInfo Public Overridable Property Url As String Public Overridable Property ImageStream As String Public Overridable Property ImageSize As String Public Overridable Property ErrorMessage As String Public Overridable Property UriPk As Nullable(Of Long) End Class ''' '''WebCategoriesRequires active-e Inventory Service ''' Public Partial Class WebCategoriesRequest Inherits BaseSecureRequest Implements IReturn(Of WebCategoriesResponse) Public Overridable Property IncludePossibleAttributes As Boolean Public Overridable Property IncludeImage As Boolean End Class Public Partial Class WebCategoriesResponse Inherits BaseResponse Public Sub New() WebCategories = New List(Of WebCategory) End Sub Public Overridable Property WebCategories As List(Of WebCategory) End Class Public Partial Class WebCategory Public Sub New() PossibleAttributes = New List(Of String) End Sub Public Overridable Property Id As Long Public Overridable Property ParentId As Nullable(Of Long) Public Overridable Property Name As String Public Overridable Property Description As String Public Overridable Property FullPath As String Public Overridable Property ShortDescription As String Public Overridable Property SETitle As String Public Overridable Property SEKeywords As String Public Overridable Property SEDescription As String Public Overridable Property SEAltText As String Public Overridable Property PossibleAttributes As List(Of String) Public Overridable Property Image As ImageInfo Public Overridable Property Unpublished As Boolean End Class End Namespace End Namespace