' Options:
'Date: 2025-06-13 08:36:48
'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: ArbolPermisosPpalRQ.*
'''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

Namespace Global

    Namespace Administrador.Modelo.Tipos

        <Route("/Usuarios/Permisos/MenuPrincipal")>
        Public Partial Class ArbolPermisosPpalRQ
            Implements IReturn(Of ArbolPermisosPpalRS)
            Public Overridable Property Usuario As String
            Public Overridable Property CodSistema As Integer
            Public Overridable Property CodEmpresa As Integer
            Public Overridable Property Lenguaje As Lenguajes
        End Class

        Public Partial Class ArbolPermisosPpalRS
            Public Sub New()
                Modulos = New List(Of PermisosModulos)
            End Sub

            Public Overridable Property CodSistema As Integer
            Public Overridable Property CodEmpresa As Integer
            Public Overridable Property Modulos As List(Of PermisosModulos)
            Public Overridable Property Lenguaje As Lenguajes
        End Class

        Public Enum Lenguajes
            ES
            PT
            EN
        End Enum

        Public Partial Class PermisosItems
            Public Sub New()
                Items = New List(Of PermisosItems)
            End Sub

            Public Overridable Property CodigoMenu As Decimal
            Public Overridable Property CodigoPadre As Decimal
            Public Overridable Property Nombre As String
            Public Overridable Property Descripcion As String
            Public Overridable Property TienePermiso As Boolean
            Public Overridable Property TipoEjecucion As String
            Public Overridable Property IDEjecucion As String
            Public Overridable Property InfoAdicional As String
            Public Overridable Property Orden As Integer
            Public Overridable Property Items As List(Of PermisosItems)
            Public Overridable Property Icono As String
        End Class

        Public Partial Class PermisosModulos
            Public Sub New()
                MenuPrincipal = New List(Of PermisosItems)
            End Sub

            Public Overridable Property CodModulo As Decimal
            Public Overridable Property Nombre As String
            Public Overridable Property SuperUsuario As Boolean
            Public Overridable Property Orden As Integer
            Public Overridable Property MenuPrincipal As List(Of PermisosItems)
        End Class
    End Namespace
End Namespace