' Options: 'Date: 2024-12-03 17:55:29 'Version: 8.23 'Tip: To override a DTO option, remove "''" prefix before updating 'BaseUrl: https://api.bokamera.se ' '''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: UpdateCompanyUser.* '''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 System.Globalization Imports ServiceStack.Data Imports BokaMera.API.ServiceModel.Interfaces Imports BokaMera.API.ServiceModel.Dtos Namespace Global Namespace BokaMera.API.ServiceModel.Dtos Public Partial Class AddCompanyUserRolesResponse Public Overridable Property RoleId As Guid End Class Public Partial Class CompanyUserQueryResponse Public Sub New() Roles = New List(Of CompanyUserRolesQueryResponse) End Sub Public Overridable Property Id As Guid Public Overridable Property CompanyId As Guid Public Overridable Property Firstname As String Public Overridable Property Lastname As String Public Overridable Property Email As String Public Overridable Property Phone As String Public Overridable Property WorkerId As String Public Overridable Property ResourceId As Nullable(Of Integer) ''' '''The resource information connected to the administrator. ''' Public Overridable Property Resource As CompanyUserResource ''' '''The roles that are connected to the administrator. ''' Public Overridable Property Roles As List(Of CompanyUserRolesQueryResponse) Public Overridable Property Active As Boolean Public Overridable Property Created As Date Public Overridable Property Updated As Date End Class Public Partial Class CompanyUserResource ''' '''The resource id ''' Public Overridable Property Id As Integer ''' '''The resource name ''' Public Overridable Property Name As String ''' '''The resource status ''' Public Overridable Property Active As Boolean ''' '''The resource description ''' Public Overridable Property Description As String ''' '''The resource email ''' Public Overridable Property Email As String ''' '''The resource phone ''' Public Overridable Property Phone As String ''' '''The resource color ''' Public Overridable Property Color As String ''' '''The resource image ''' Public Overridable Property ImageUrl As Uri ''' '''If the resource want to receive email notifications ''' Public Overridable Property EmailNotification As Boolean ''' '''If the resource want to receive sms notifications ''' Public Overridable Property SMSNotification As Boolean ''' '''If the resource want to receive email reminders ''' Public Overridable Property EmailReminder As Boolean ''' '''If the resource want to receive sms reminders ''' Public Overridable Property SMSReminder As Boolean End Class Public Partial Class CompanyUserRolesQueryResponse Public Overridable Property RoleId As Guid Public Overridable Property Name As String Public Overridable Property Description As String End Class Public Partial Class UpdateCompanyUser Implements IReturn(Of CompanyUserQueryResponse) Implements ICompany Public Sub New() Roles = New List(Of AddCompanyUserRolesResponse) End Sub ''' '''Enter the company and id for the application user, if blank company id and you are an admin, your company id will be used. ''' Public Overridable Property CompanyId As Nullable(Of Guid) ''' '''Enter the user id for the administrator. ''' Public Overridable Property Id As Guid Public Overridable Property Firstname As String Public Overridable Property Lastname As String Public Overridable Property Phone As String Public Overridable Property Email As String Public Overridable Property ResourceId As Nullable(Of Integer) Public Overridable Property Roles As List(Of AddCompanyUserRolesResponse) Public Overridable Property WorkerId As Nullable(Of Integer) End Class End Namespace Namespace BokaMera.API.ServiceModel.Interfaces Public Interface ICompany Property CompanyId As Nullable(Of Guid) End Interface End Namespace End Namespace