' Options: 'Date: 2025-06-07 19:40:01 'Version: 8.12 'Tip: To override a DTO option, remove "''" prefix before updating 'BaseUrl: https://soluser-recaudo.sgsas.co ' '''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: EjecutaLookupRQ.* '''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 Administrador.Modelo.Tipos Imports Administrador.Modelo.DevExtreme Namespace Global Namespace Administrador.Modelo.DevExtreme Public Partial Class gridGroupOptions Public Overridable Property selector As String Public Overridable Property desc As Boolean Public Overridable Property isExpanded As Boolean End Class Public Partial Class gridSortOptions Public Overridable Property selector As String Public Overridable Property desc As Boolean End Class End Namespace Namespace Administrador.Modelo.Tipos Public Partial Class EjecutaLookupRQ Implements IReturn(Of EjecutaLookupRS) Public Sub New() Parametros = New Dictionary(Of String, Object) Filter = New List(Of Object) SummaryGroupItems = New gridSummaryOptions(){} SummaryTotalItems = New gridSummaryOptions(){} End Sub Public Overridable Property IDLookup As Integer Public Overridable Property Parametros As Dictionary(Of String, Object) Public Overridable Property Lenguaje As Lenguajes Public Overridable Property RecordSkip As Integer Public Overridable Property RecordTake As Integer Public Overridable Property Filter As List(Of Object) Public Overridable Property Sort As gridSortOptions Public Overridable Property Group As gridGroupOptions Public Overridable Property SummaryGroupItems As gridSummaryOptions() Public Overridable Property SummaryTotalItems As gridSummaryOptions() End Class Public Partial Class EjecutaLookupRS Public Sub New() DatosConsulta = New List(Of Dictionary(Of String,Object)) SummaryList = New List(Of Object) End Sub Public Overridable Property DatosConsulta As List(Of Dictionary(Of String,Object)) Public Overridable Property Version As String Public Overridable Property TotalRegistros As Integer Public Overridable Property TotalGrupos As Integer Public Overridable Property SummaryList As List(Of Object) End Class Public Enum Lenguajes ES PT EN End Enum End Namespace End Namespace