' Options: 'Date: 2025-06-13 08:19:27 'Version: 6.40 'Tip: To override a DTO option, remove "''" prefix before updating 'BaseUrl: https://ws.jimsnwa.com ' '''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: ObtenerLookupsRQ.* '''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.IO Imports Administrador.Modelo.Tipos Imports Administrador.Modelo.Contexto Namespace Global Namespace Administrador.Modelo.Contexto Public Partial Class EjecucionProcesos Public Overridable Property CodigoEjecucion As Decimal Public Overridable Property CodigoSistema As Decimal Public Overridable Property CodigoEmpresa As Decimal Public Overridable Property AliasFuncion As String Public Overridable Property Usuario As String Public Overridable Property FechaHoraIni As Date Public Overridable Property FechaHoraAct As Date Public Overridable Property FechaHoraFin As Nullable(Of Date) Public Overridable Property TotalRegistros As Nullable(Of Integer) Public Overridable Property CantProcesados As Nullable(Of Integer) Public Overridable Property Request As String Public Overridable Property Response As String Public Overridable Property Mensaje As String Public Overridable Property Estado As String Public Overridable Property UsuarioCancela As String Public Overridable Property MotivoCancela As String End Class End Namespace Namespace Administrador.Modelo.Tipos Public Partial Class EjecutaQueryMultiple Public Sub New() Parametros = New Dictionary(Of String, Object) End Sub Public Overridable Property IDVista As Integer Public Overridable Property DatosDetalles As Boolean Public Overridable Property Parametros As Dictionary(Of String, Object) End Class Public Partial Class EmpresasUsuarioRS Public Overridable Property Usuario As String Public Overridable Property ID As Long Public Overridable Property CodSistema As Decimal Public Overridable Property CodEmpresa As Decimal Public Overridable Property CodigoRefEmpresa As String Public Overridable Property NombreEmpresa As String Public Overridable Property LogoEmpresa As String Public Overridable Property DescEmpresa As String End Class Public Enum Lenguajes ES PT EN End Enum Public Partial Class ObtenerLookupsRQ Implements IReturn(Of List(Of ObtenerLookupsRS)) Public Sub New() Vistas = New List(Of EjecutaQueryMultiple) End Sub Public Overridable Property Vistas As List(Of EjecutaQueryMultiple) Public Overridable Property areLookups As Boolean Public Overridable Property Lenguaje As Lenguajes End Class Public Partial Class ObtenerLookupsRS Public Sub New() DatosConsulta = New List(Of Dictionary(Of String,Object)) End Sub Public Overridable Property Codigo As Integer Public Overridable Property DatosConsulta As List(Of Dictionary(Of String,Object)) Public Overridable Property Version As String End Class End Namespace End Namespace