inherited DataModuleUsuarios: TDataModuleUsuarios
  OnCreate = DataModuleCreate
  Height = 215
  Width = 331
  object srvUsuarios: TRORemoteService
    Message = dmConexion.ROMessage
    Channel = dmConexion.ROChannel
    ServiceName = 'srvUsuarios'
    Left = 40
    Top = 80
  end
  object UCSettingsSpanish: TUCSettings
    AppMessages.MsgsForm_BtNew = '&Nuevo Mensaje'
    AppMessages.MsgsForm_BtReplay = '&Responder'
    AppMessages.MsgsForm_BtForward = '&Reenviar'
    AppMessages.MsgsForm_BtDelete = '&Borrar'
    AppMessages.MsgsForm_BtClose = '&Cerrar'
    AppMessages.MsgsForm_WindowCaption = 'Mensajes de Sistema'
    AppMessages.MsgsForm_ColFrom = 'Remitente'
    AppMessages.MsgsForm_ColSubject = 'Asunto'
    AppMessages.MsgsForm_ColDate = 'Fecha'
    AppMessages.MsgsForm_PromptDelete = #191'Est'#225' seguro de eliminar los mensajes seleccionados?'
    AppMessages.MsgsForm_PromptDelete_WindowCaption = 'Eliminar mensajes'
    AppMessages.MsgsForm_NoMessagesSelected = '!Ning'#250'n mensaje seleccionado'#161
    AppMessages.MsgsForm_NoMessagesSelected_WindowCaption = 'Informaci'#243'n'
    AppMessages.MsgRec_BtClose = '&Cerrar'
    AppMessages.MsgRec_WindowCaption = 'Mensaje'
    AppMessages.MsgRec_Title = 'Mensaje Recibido'
    AppMessages.MsgRec_LabelFrom = 'De:'
    AppMessages.MsgRec_LabelDate = 'Fecha'
    AppMessages.MsgRec_LabelSubject = 'Asunto'
    AppMessages.MsgRec_LabelMessage = 'Mensaje'
    AppMessages.MsgSend_BtSend = '&Enviar'
    AppMessages.MsgSend_BtCancel = '&Cancelar'
    AppMessages.MsgSend_WindowCaption = 'Mensaje'
    AppMessages.MsgSend_Title = 'Enviar Nuevo Mensaje'
    AppMessages.MsgSend_GroupTo = 'Para:'
    AppMessages.MsgSend_RadioUser = 'Usuario:'
    AppMessages.MsgSend_RadioAll = 'Todos'
    AppMessages.MsgSend_GroupMessage = 'Mensaje'
    AppMessages.MsgSend_LabelSubject = 'Asunto'
    AppMessages.MsgSend_LabelMessageText = 'Texto del mensaje'
    CommonMessages.AutoLogonError = 
      'Error de Ingreso Autom'#225'tico!'#13#10'Especifique un Usuario y Contrase'#241 +
      'a V'#225'lidos.'
    CommonMessages.ChangePasswordError.InvalidCurrentPassword = #161'Contrase'#241'a Actual Incorrecta!'
    CommonMessages.ChangePasswordError.NewPasswordError = 
      'Los campos Contrase'#241'a Nueva y Confirme Contrase'#241'a deben ser igua' +
      'les'
    CommonMessages.ChangePasswordError.NewEqualCurrent = 'Nueva Contrase'#241'a y Contrase'#241'a Actual deben ser diferentes'
    CommonMessages.ChangePasswordError.PasswordRequired = #161'La Contrase'#241'a es obligatoria!'
    CommonMessages.ChangePasswordError.MinPasswordLength = 'La Contrase'#241'a debe tener un m'#237'nimo de %d caracteres'
    CommonMessages.ChangePasswordError.InvalidNewPassword = #161'Prohibido utilizar contrase'#241'as NO Seguras!'
    CommonMessages.InvalidLogin = 'Usuario y/o Contrase'#241'a Incorrectos!'
    CommonMessages.InitialMessage.Strings = (
      'ATENCION! Conecci'#243'n Inicial:'
      ''
      'Usuario : :user'
      'Contrase'#241'a : :password'
      ''
      'Defina permisos para este usuario')
    CommonMessages.MaxLoginAttemptsError = '%d Intentos de conecci'#243'n inv'#225'lidos !'
    CommonMessages.PasswordChanged = #161'Se ha cambiado la Contrase'#241'a con '#233'xito!'
    CommonMessages.BlankPassword = 'Contrase'#241'a vac'#237'a para el Usuario %s'
    CommonMessages.UsuarioExiste = 'O Usu'#225'rio "%s" j'#225' est'#225' cadastrado no sistema !!'
    CommonMessages.PasswordExpired = 'Aten'#231#227'o, sua senha expirou, favor troca-la'
    CommonMessages.ForcaTrocaSenha = 'Mudan'#231'a de senha obrigat'#243'ria'
    Login.WindowCaption = 'Conecci'#243'n'
    Login.LabelUser = 'Usuario: '
    Login.LabelPassword = 'Contrase'#241'a:'
    Login.BtOk = 'Aceptar'
    Login.BtCancel = '&Cancelar'
    Login.LeftImage.Data = {
[encoded data, 5183 characters]
      0000}
    Login.LabelTentativa = 'Tentativa : '
    Login.LabelTentativas = 'M'#225'ximo de Tentativas : '
    Log.WindowCaption = 'Seguridad'
    Log.LabelDescription = 'Visor de Eventos'
    Log.LabelUser = 'Usuario:'
    Log.LabelDate = 'Fecha:'
    Log.LabelLevel = 'Nivel M'#237'nimo: '
    Log.ColAppID = 'AppID'
    Log.ColLevel = 'Nivel'
    Log.ColMessage = 'Mensaje'
    Log.ColUser = 'Usuario'
    Log.ColDate = 'Fecha'
    Log.BtFilter = '&Aplicar Filtro'
    Log.BtDelete = '&Borrar Bit'#225'cora'
    Log.BtClose = '&Cerrar'
    Log.PromptDelete = 
      #191'Est'#225' seguro de Eliminar todos todos los registros de Bit'#225'cora s' +
      'eleccionados?'
    Log.PromptDelete_WindowCaption = 'Confirmaci'#243'n'
    Log.OptionUserAll = 'Todos'
    Log.OptionLevelLow = 'Bajo'
    Log.OptionLevelNormal = 'Normal'
    Log.OptionLevelHigh = 'Alto'
    Log.OptionLevelCritic = 'Cr'#237'tico'
    Log.DeletePerformed = 
      'Borrado de registros de bit'#225'cora realizado: Usuario = "%s" | Fec' +
      'ha = %s a %s | Nivel <= %s'
    UsersForm.WindowCaption = 'Seguridad'
    UsersForm.LabelDescription = 'Administraci'#243'n de Usuarios'
    UsersForm.ColName = 'Nombre'
    UsersForm.ColLogin = 'Usuario'
    UsersForm.ColEmail = 'Correo'
    UsersForm.BtAdd = '&Nuevo'
    UsersForm.BtChange = '&Editar'
    UsersForm.BtDelete = 'E&liminar'
    UsersForm.PromptDelete = #191'Est'#225' seguro de Eliminar al Usuario "%s"?'
    UsersForm.PromptDelete_WindowCaption = 'Eliminar usuario'
    UsersForm.BtRights = '&Accesos'
    UsersForm.BtPassword = 'C&ontrase'#241'a'
    UsersForm.BtClose = '&Cerrar'
    AddChangeUser.WindowCaption = 'Administraci'#243'n de Usuarios'
    AddChangeUser.LabelAdd = 'Nuevo Usuario'
    AddChangeUser.LabelChange = 'Editar Usuario'
    AddChangeUser.LabelName = 'Nombre:'
    AddChangeUser.LabelLogin = 'Usuario: '
    AddChangeUser.LabelEmail = 'Correo: '
    AddChangeUser.LabelPerfil = 'Perfil: '
    AddChangeUser.CheckPrivileged = 'Usuario Privilegiado'
    AddChangeUser.BtSave = '&Guardar'
    AddChangeUser.BtCancel = 'Cancelar'
    AddChangeUser.CheckExpira = 'Senha do usu'#225'rio n'#227'o expira'
    AddChangeUser.Day = 'Dias'
    AddChangeUser.ExpiredIn = 'Expira em'
    AddChangeProfile.WindowCaption = 'Perfiles de Usuarios'
    AddChangeProfile.LabelAdd = 'Nuevo Perfil'
    AddChangeProfile.LabelChange = 'Editar Perfil'
    AddChangeProfile.LabelName = 'Descripci'#243'n: '
    AddChangeProfile.BtSave = '&Guardar'
    AddChangeProfile.BtCancel = 'Cancelar'
    UsersProfile.WindowCaption = 'Seguridad'
    UsersProfile.LabelDescription = 'Perfil de Usuario'
    UsersProfile.ColProfile = 'Perfil'
    UsersProfile.BtAdd = '&Nuevo'
    UsersProfile.BtChange = '&Editar'
    UsersProfile.BtDelete = 'E&liminar'
    UsersProfile.BtRights = '&Accesos'
    UsersProfile.PromptDelete = 
      'Existe(n) usuario(s) con el Perfil "%s". '#191'Est'#225' seguro de elimina' +
      'r el perfil?'
    UsersProfile.PromptDelete_WindowCaption = 'Eliminar perfil'
    UsersProfile.BtClose = '&Cerrar'
    Rights.WindowCaption = 'Seguridad'
    Rights.LabelUser = 'Permisos de Usuario : '
    Rights.LabelProfile = 'Permisos del Perfil : '
    Rights.PageMenu = 'Elementos del Men'#250
    Rights.PageActions = 'Acciones'
    Rights.PageControls = 'Controles'
    Rights.BtUnlock = '&Permitir'
    Rights.BtLock = '&Bloquear'
    Rights.BtSave = '&Guardar'
    Rights.BtCancel = '&Cancelar'
    ChangePassword.WindowCaption = 'Seguridad'
    ChangePassword.LabelDescription = 'Cambiar Contrase'#241'a'
    ChangePassword.LabelCurrentPassword = 'Contrase'#241'a Actual:'
    ChangePassword.LabelNewPassword = 'Nueva Contrase'#241'a:'
    ChangePassword.LabelConfirm = 'Confirme Contrase'#241'a:'
    ChangePassword.BtSave = '&Guardar'
    ChangePassword.BtCancel = 'Cancelar'
    ResetPassword.WindowCaption = 'Ingrese Contrase'#241'a de Usuario: "%s"'
    ResetPassword.LabelPassword = 'Contrase'#241'a: '
    History.Evento_Insert = 'Nuevo'
    History.Evento_Delete = 'Eliminar'
    History.Evento_Edit = 'Editar'
    History.Evento_NewRecord = 'Nuevo registro'
    History.Hist_All = 'Todos'
    History.Msg_LimpHistorico = 'Excluir el contenido entero del hist'#243'rico ?'
    History.Msg_MensConfirma = 'Confirme'
    History.Msg_LogEmptyHistory = 'El usuario %s borra la historia de mesa en %s '
    History.LabelDescricao = 'Hist'#243'rico de tabelas'
    History.LabelUser = 'Usuario'
    History.LabelForm = 'Formul'#225'rio'
    History.LabelEvento = 'Evento'
    History.LabelTabela = 'Tabela'
    History.LabelDataEvento = 'Data'
    History.LabelHoraEvento = 'Hora'
    History.Msg_NewRecord = '%s Inserte el nuevo registro'
    History.Hist_MsgExceptPropr = 'Por favor informe la propiedad %s'
    History.Hist_BtnFiltro = '&Aplicar Filtro'
    History.Hist_BtnExcluir = '&Borrar Hist'#243'rico'
    History.Hist_BtnFechar = '&Cerrar'
    TypeFieldsDB.Type_VarChar = 'VarChar'
    TypeFieldsDB.Type_Char = 'Char'
    TypeFieldsDB.Type_Int = 'Int'
    TypeFieldsDB.Type_MemoField = 'BLOB SUB_TYPE 1 SEGMENT SIZE 1024'
    Language = ucSpanish
    Left = 40
    Top = 16
  end
  object rda_Usuarios: TDARemoteDataAdapter
    GetSchemaCall.RemoteService = srvUsuarios
    GetDataCall.RemoteService = srvUsuarios
    UpdateDataCall.RemoteService = srvUsuarios
    GetScriptsCall.RemoteService = srvUsuarios
    RemoteService = srvUsuarios
    DataStreamer = Bin2DataStreamer
    Left = 176
    Top = 16
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 40
    Top = 144
  end
  object tbl_USUARIOS: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_USUARIOS_ID'
        Required = True
        DictionaryEntry = 'USUARIOS_ID'
        InPrimaryKey = True
      end
      item
        Name = 'USERNAME'
        DataType = datString
        Size = 30
        DisplayLabel = 'Nombre'
        DictionaryEntry = 'USUARIOS_USERNAME'
      end
      item
        Name = 'LOGIN'
        DataType = datString
        Size = 30
        DisplayLabel = 'Login'
        DictionaryEntry = 'USUARIOS_LOGIN'
      end
      item
        Name = 'PASS'
        DataType = datString
        Size = 250
        DisplayLabel = 'Password'
        DictionaryEntry = 'USUARIOS_PASS'
      end
      item
        Name = 'PASSEXPIRED'
        DataType = datDateTime
        DisplayLabel = 'Expiraci'#243'n de password'
        DictionaryEntry = 'USUARIOS_PASSEXPIRED'
      end
      item
        Name = 'BLOQUEADO'
        DataType = datSmallInt
        DisplayLabel = 'Bloqueado'
        DictionaryEntry = 'USUARIOS_BLOQUEADO'
      end
      item
        Name = 'EMAIL'
        DataType = datString
        Size = 150
        DisplayLabel = 'Correo electr'#243'nico'
        DictionaryEntry = 'USUARIOS_EMAIL'
      end
      item
        Name = 'USERDAYSSUN'
        DataType = datInteger
        DisplayLabel = 'USUARIOS_USERDAYSSUN'
        DictionaryEntry = 'USUARIOS_USERDAYSSUN'
      end
      item
        Name = 'PRIVILEGED'
        DataType = datInteger
        DisplayLabel = 'Privilegiado'
        DictionaryEntry = 'USUARIOS_PRIVILEGED'
      end
      item
        Name = 'TIPO'
        DataType = datString
        Size = 1
        DisplayLabel = 'Tipo'
        DictionaryEntry = 'USUARIOS_TIPO'
      end
      item
        Name = 'ID_PERFIL'
        DataType = datInteger
        DictionaryEntry = 'USUARIOS_ID_PERFIL'
      end
      item
        Name = 'CHECKSUM'
        DataType = datString
        Size = 250
        DisplayLabel = 'Checksum'
        DictionaryEntry = 'USUARIOS_CHECKSUM'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_Usuarios
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'USUARIOS'
    IndexDefs = <>
    Left = 176
    Top = 80
  end
  object ds_USUARIOS: TDADataSource
    DataSet = tbl_USUARIOS.Dataset
    DataTable = tbl_USUARIOS
    Left = 176
    Top = 136
  end
  object tbl_PERFILES: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_USUARIOS_ID'
        Required = True
        DictionaryEntry = 'PERFILES_ID'
        InPrimaryKey = True
      end
      item
        Name = 'USERNAME'
        DataType = datString
        Size = 30
        DisplayLabel = 'Nombre'
        DictionaryEntry = 'PERFILES_USERNAME'
      end
      item
        Name = 'LOGIN'
        DataType = datString
        Size = 30
        DisplayLabel = 'Login'
        DictionaryEntry = 'PERFILES_LOGIN'
      end
      item
        Name = 'TIPO'
        DataType = datString
        Size = 1
        DisplayLabel = 'Tipo'
        DictionaryEntry = 'PERFILES_TIPO'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_Usuarios
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'PERFILES'
    IndexDefs = <>
    Left = 272
    Top = 80
  end
  object ds_PERFILES: TDADataSource
    DataSet = tbl_PERFILES.Dataset
    DataTable = tbl_PERFILES
    Left = 272
    Top = 136
  end
end
