' Options: 'Date: 2025-05-10 01:58:38 '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: SecurityRequest.* '''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 AccountDetail Public Overridable Property Acct As Integer Public Overridable Property AcctType As String Public Overridable Property Name As String End Class 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 ''' '''Login Service ''' Public Partial Class SecurityRequest Inherits BaseRequest Implements IReturn(Of SecurityResponse) ''' '''Employee ID or Customer Email ''' Public Overridable Property Username As String ''' '''Existing Token ''' Public Overridable Property Token As String ''' '''Password of Employee or User ''' Public Overridable Property Password As String ''' ''' ''' Public Overridable Property DeviceId As String ''' ''' ''' Public Overridable Property AppId As String ''' ''' ''' Public Overridable Property Acct As Nullable(Of Integer) ''' ''' ''' Public Overridable Property DeviceName As String End Class Public Partial Class SecurityResponse Inherits BaseResponse Public Sub New() AccountDetails = New List(Of AccountDetail) End Sub Public Overridable Property Token As String Public Overridable Property OAuthToken As String Public Overridable Property Domain As String Public Overridable Property IsAdmin As Boolean Public Overridable Property UserDetails As UserDetail Public Overridable Property AccountDetails As List(Of AccountDetail) End Class Public Partial Class UserDetail Public Overridable Property Firstname As String Public Overridable Property LastName As String Public Overridable Property Email As String Public Overridable Property Type As String Public Overridable Property Location As String Public Overridable Property LocationName As String Public Overridable Property AccountNumber As Nullable(Of Integer) Public Overridable Property TaxAuthority As String Public Overridable Property TaxAuthorityName As String End Class End Namespace End Namespace