' Options: 'Date: 2025-06-07 18:23:15 '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: GuardarDatosFormaRQ.* '''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 Namespace Global Namespace Administrador.Modelo Public Partial Class NovedadesCarga Public Overridable Property Fila As Integer Public Overridable Property Columna As Integer Public Overridable Property TipoError As String Public Overridable Property Novedad As String End Class End Namespace Namespace Administrador.Modelo.Tipos Public Partial Class ExecuteDBFunctionRS Inherits GeneralRS Public Overridable Property Respuesta As Object Public Overridable Property IDEjecucion As Decimal Public Overridable Property URLArchivo As String Public Overridable Property TipoRespuesta As String Public Overridable Property Background As Boolean Public Overridable Property TiempoRespuestaBD As Long Public Overridable Property TiempoRespuestaTotal As Long ''' '''Id del código de respuesta 1: Correcto, -1: Error ''' Public Overridable Property Codigo As Integer ''' '''Mensaje que se envía al ejecutar el servicio ''' Public Overridable Property Mensaje As String End Class Public Partial Class GuardarDatosDetalle Public Sub New() DatosInsert = New List(Of Dictionary(Of String,Object)) DatosUpdate = New List(Of Dictionary(Of String,Object)) DatosDelete = New List(Of Dictionary(Of String,Object)) End Sub Public Overridable Property IDDetalle As Integer Public Overridable Property DatosInsert As List(Of Dictionary(Of String,Object)) Public Overridable Property DatosUpdate As List(Of Dictionary(Of String,Object)) Public Overridable Property DatosDelete As List(Of Dictionary(Of String,Object)) Public Overridable Property NombreArchivo As String End Class Public Partial Class GuardarDatosFormaDetalleRS Public Sub New() Novedades = New List(Of NovedadesCarga) End Sub Public Overridable Property IDDetalle As Decimal Public Overridable Property Novedades As List(Of NovedadesCarga) End Class Public Partial Class GuardarDatosFormaRQ Implements IReturn(Of GuardarDatosFormaRS) Public Sub New() DatosMaestro = New Dictionary(Of String, Object) DatosDetalle = New List(Of GuardarDatosDetalle) FormasDep = New List(Of GuardarDatosFormaRQ) End Sub Public Overridable Property IDForma As Integer Public Overridable Property Operacion As OperacionDatos Public Overridable Property DatosMaestro As Dictionary(Of String, Object) Public Overridable Property DatosDetalle As List(Of GuardarDatosDetalle) Public Overridable Property FormasDep As List(Of GuardarDatosFormaRQ) Public Overridable Property TokenCargaArchivos As String End Class Public Partial Class GuardarDatosFormaRS Public Sub New() DatosLlaveMaestro = New Dictionary(Of String, Object) NovedadesDetalles = New List(Of GuardarDatosFormaDetalleRS) End Sub Public Overridable Property Success As Boolean Public Overridable Property [Error] As String Public Overridable Property DatosLlaveMaestro As Dictionary(Of String, Object) Public Overridable Property NovedadesDetalles As List(Of GuardarDatosFormaDetalleRS) Public Overridable Property RespuestaProcAlmacenado As ExecuteDBFunctionRS End Class Public Enum OperacionDatos INSERT UPDATE DELETE End Enum End Namespace End Namespace