' Options: 'Date: 2025-06-07 19:03:29 '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: ConsultaFormaRQ.* '''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 Imports Administrador.Modelo.Contexto Namespace Global Namespace Administrador.Modelo.Contexto Public Partial Class Forma Public Overridable Property Codigo As Decimal Public Overridable Property Nombre As String Public Overridable Property Descripcion As String Public Overridable Property CodigoTabla As Integer Public Overridable Property CodigoConsulta As Integer Public Overridable Property CodigoAyuda As Integer Public Overridable Property Tipo As String Public Overridable Property Alto As Integer Public Overridable Property Ancho As Integer Public Overridable Property Redimensionar As String Public Overridable Property BlobLayout As Integer Public Overridable Property SoloLectura As String Public Overridable Property LookupsConCodigo As String Public Overridable Property BlobLayoutJson As Integer Public Overridable Property InfoAdicional As String Public Overridable Property WHEREAdicional As String Public Overridable Property ProcedimientoGuardar As String Public Overridable Property WSGuardar As String Public Overridable Property WSValidacion As String Public Overridable Property ProcedimientoValidaciones As String Public Overridable Property LinkAyuda As String End Class End Namespace 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 ConsultaFormaRQ Implements IReturn(Of ConsultaFormaRS) 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 Codigo As Integer Public Overridable Property UsarTablaBase As Boolean Public Overridable Property Parametros As Dictionary(Of String, Object) Public Overridable Property WhereAdicional As String 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 ConsultaFormaRS Public Sub New() DatosConsulta = New List(Of Dictionary(Of String,Object)) SummaryList = New List(Of Object) End Sub Public Overridable Property Forma As Forma Public Overridable Property Definicion As DefinicionTabla Public Overridable Property DatosConsulta As List(Of Dictionary(Of String,Object)) Public Overridable Property TotalRegistros As Integer Public Overridable Property TotalGrupos As Integer Public Overridable Property SummaryList As List(Of Object) Public Overridable Property [Error] As String End Class Public Partial Class DefinicionTabla Public Sub New() Columnas = New List(Of Columna) Lookups = New List(Of DetalleJoinTabla) Frames = New List(Of Frame) DetalleLlave = New List(Of DetalleIndices) End Sub Public Overridable Property Tabla As Tabla Public Overridable Property Columnas As List(Of Columna) Public Overridable Property Lookups As List(Of DetalleJoinTabla) Public Overridable Property Frames As List(Of Frame) Public Overridable Property DetalleLlave As List(Of DetalleIndices) Public Overridable Property Form As dxForm Public Overridable Property DataGrid As dxDataGrid End Class Public Enum Lenguajes ES PT EN End Enum End Namespace End Namespace