object srvUsuarios: TsrvUsuarios OldCreateOrder = True OnCreate = DataAbstractServiceCreate SessionManager = dmServer.SessionManager ServiceSchema = schUsuarios ServiceDataStreamer = Bin2DataStreamer AllowExecuteSQL = True AllowWhereSQL = True ExportedDataTables = <> BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection Height = 300 Width = 300 object Diagrams: TDADiagrams Left = 150 Top = 88 DiagramData = ''#13#10''#13#10 end object DataDictionary: TDADataDictionary Fields = < item Name = 'USUARIOS_ID' DataType = datAutoInc GeneratorName = 'GEN_USUARIOS_ID' Required = True DisplayLabel = 'ID' end item Name = 'USUARIOS_USERNAME' DataType = datString Size = 30 DisplayLabel = 'Nombre' end item Name = 'USUARIOS_LOGIN' DataType = datString Size = 30 DisplayLabel = 'Login' end item Name = 'USUARIOS_PASS' DataType = datString Size = 250 DisplayLabel = 'Password' end item Name = 'USUARIOS_PASSEXPIRED' DataType = datDateTime DisplayLabel = 'Expiraci'#243'n de password' end item Name = 'USUARIOS_BLOQUEADO' DataType = datSmallInt DisplayLabel = 'Bloqueado' end item Name = 'USUARIOS_EMAIL' DataType = datString Size = 150 DisplayLabel = 'Correo electr'#243'nico' end item Name = 'USUARIOS_USERDAYSSUN' DataType = datInteger end item Name = 'USUARIOS_PRIVILEGED' DataType = datInteger DisplayLabel = 'Privilegiado' end item Name = 'USUARIOS_TIPO' DataType = datString Size = 1 DisplayLabel = 'Tipo' end item Name = 'USUARIOS_ID_PERFIL' DataType = datInteger DisplayLabel = 'ID_PERFIL' end item Name = 'USUARIOS_CHECKSUM' DataType = datString Size = 250 DisplayLabel = 'Checksum' end item Name = 'PERFILES_ID' DataType = datAutoInc GeneratorName = 'GEN_USUARIOS_ID' Required = True DisplayLabel = 'ID' end item Name = 'PERFILES_USERNAME' DataType = datString Size = 30 DisplayLabel = 'Nombre' end item Name = 'PERFILES_LOGIN' DataType = datString Size = 30 DisplayLabel = 'Login' end item Name = 'PERFILES_TIPO' DataType = datString Size = 1 DisplayLabel = 'Tipo' end> Left = 150 Top = 24 end object schUsuarios: TDASchema ConnectionManager = dmServer.ConnectionManager DataDictionary = DataDictionary Diagrams = Diagrams Datasets = < item Params = <> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'V_USUARIOS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'USERNAME' TableField = 'USERNAME' end item DatasetField = 'LOGIN' TableField = 'LOGIN' end item DatasetField = 'PASS' TableField = 'PASS' end item DatasetField = 'PASSEXPIRED' TableField = 'PASSEXPIRED' end item DatasetField = 'BLOQUEADO' TableField = 'BLOQUEADO' end item DatasetField = 'EMAIL' TableField = 'EMAIL' end item DatasetField = 'USERDAYSSUN' TableField = 'USERDAYSSUN' end item DatasetField = 'PRIVILEGED' TableField = 'PRIVILEGED' end item DatasetField = 'TIPO' TableField = 'TIPO' end item DatasetField = 'ID_PERFIL' TableField = 'ID_PERFIL' end item DatasetField = 'CHECKSUM' TableField = 'CHECKSUM' end> end> Name = 'USUARIOS' Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_USUARIOS_ID' DictionaryEntry = 'USUARIOS_ID' InPrimaryKey = True end item Name = 'USERNAME' DataType = datString Size = 30 DictionaryEntry = 'USUARIOS_USERNAME' end item Name = 'LOGIN' DataType = datString Size = 30 DictionaryEntry = 'USUARIOS_LOGIN' end item Name = 'PASS' DataType = datString Size = 250 DictionaryEntry = 'USUARIOS_PASS' end item Name = 'PASSEXPIRED' DataType = datDateTime DictionaryEntry = 'USUARIOS_PASSEXPIRED' end item Name = 'BLOQUEADO' DataType = datSmallInt DictionaryEntry = 'USUARIOS_BLOQUEADO' end item Name = 'EMAIL' DataType = datString Size = 150 DictionaryEntry = 'USUARIOS_EMAIL' end item Name = 'USERDAYSSUN' DataType = datInteger DictionaryEntry = 'USUARIOS_USERDAYSSUN' end item Name = 'PRIVILEGED' DataType = datInteger DictionaryEntry = 'USUARIOS_PRIVILEGED' end item Name = 'TIPO' DataType = datString Size = 1 DictionaryEntry = 'USUARIOS_TIPO' end item Name = 'ID_PERFIL' DataType = datInteger DictionaryEntry = 'USUARIOS_ID_PERFIL' end item Name = 'CHECKSUM' DataType = datString Size = 250 DictionaryEntry = 'USUARIOS_CHECKSUM' end> end item Params = <> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'USUARIOS_EVENTOS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'APLICACION' TableField = 'APLICACION' end item DatasetField = 'ID_USUARIO' TableField = 'ID_USUARIO' end item DatasetField = 'FECHA' TableField = 'FECHA' end item DatasetField = 'HORA' TableField = 'HORA' end item DatasetField = 'FORM' TableField = 'FORM' end item DatasetField = 'TITULO_FORM' TableField = 'TITULO_FORM' end item DatasetField = 'EVENTO' TableField = 'EVENTO' end item DatasetField = 'NOTAS' TableField = 'NOTAS' end item DatasetField = 'TNAME' TableField = 'TNAME' end> end> Name = 'USUARIOS_EVENTOS' Fields = < item Name = 'APLICACION' DataType = datString Size = 250 end item Name = 'ID_USUARIO' DataType = datInteger end item Name = 'FECHA' DataType = datString Size = 10 end item Name = 'HORA' DataType = datString Size = 8 end item Name = 'FORM' DataType = datString Size = 250 end item Name = 'TITULO_FORM' DataType = datString Size = 100 end item Name = 'EVENTO' DataType = datString Size = 50 end item Name = 'NOTAS' DataType = datMemo end item Name = 'TNAME' DataType = datString Size = 20 end> end item Params = <> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'USUARIOS_LOGON' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'LOGONID' TableField = 'LOGONID' end item DatasetField = 'ID_USUARIO' TableField = 'ID_USUARIO' end item DatasetField = 'APLICACION' TableField = 'APLICACION' end item DatasetField = 'EQUIPO' TableField = 'EQUIPO' end item DatasetField = 'DATA' TableField = 'DATA' end> end> Name = 'USUARIOS_LOGON' Fields = < item Name = 'LOGONID' DataType = datString Size = 38 Required = True InPrimaryKey = True end item Name = 'ID_USUARIO' DataType = datInteger end item Name = 'APLICACION' DataType = datString Size = 50 end item Name = 'EQUIPO' DataType = datString Size = 50 end item Name = 'DATA' DataType = datString Size = 14 end> end item Params = <> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'PERMISOS' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ID_USUARIO' TableField = 'ID_USUARIO' end item DatasetField = 'MODULO' TableField = 'MODULO' end item DatasetField = 'NOMBRECOMP' TableField = 'NOMBRECOMP' end item DatasetField = 'CHECKSUM' TableField = 'CHECKSUM' end> end> Name = 'PERMISOS' Fields = < item Name = 'ID_USUARIO' DataType = datInteger end item Name = 'MODULO' DataType = datString Size = 50 end item Name = 'NOMBRECOMP' DataType = datString Size = 50 end item Name = 'CHECKSUM' DataType = datString Size = 250 end> end item Params = <> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'PERMISOSEX' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ID_USUARIO' TableField = 'ID_USUARIO' end item DatasetField = 'MODULO' TableField = 'MODULO' end item DatasetField = 'NOMBRECOMP' TableField = 'NOMBRECOMP' end item DatasetField = 'NOMBREFORM' TableField = 'NOMBREFORM' end item DatasetField = 'CHECKSUM' TableField = 'CHECKSUM' end> end> Name = 'PERMISOSEX' Fields = < item Name = 'ID_USUARIO' DataType = datInteger end item Name = 'MODULO' DataType = datString Size = 50 end item Name = 'NOMBRECOMP' DataType = datString Size = 50 end item Name = 'NOMBREFORM' DataType = datString Size = 50 end item Name = 'CHECKSUM' DataType = datString Size = 250 end> end item Params = <> Statements = < item Connection = 'IBX' TargetTable = 'V_PERFILES' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'USERNAME' TableField = 'USERNAME' end item DatasetField = 'LOGIN' TableField = 'LOGIN' end item DatasetField = 'TIPO' TableField = 'TIPO' end> end> Name = 'PERFILES' Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_USUARIOS_ID' DictionaryEntry = 'PERFILES_ID' InPrimaryKey = True end item Name = 'USERNAME' DataType = datString Size = 30 DictionaryEntry = 'PERFILES_USERNAME' end item Name = 'LOGIN' DataType = datString Size = 30 DictionaryEntry = 'PERFILES_LOGIN' end item Name = 'TIPO' DataType = datString Size = 1 DictionaryEntry = 'PERFILES_TIPO' end> end> JoinDataTables = <> UnionDataTables = <> Commands = <> RelationShips = <> UpdateRules = <> Version = 0 Left = 48 Top = 24 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 88 end end