object srvLogin: TsrvLogin OldCreateOrder = True SessionManager = dmServer.SessionManager AcquireConnection = True ServiceSchema = schLogin OnAfterProcessTransactionAction = pptaNone ExportedDataTables = <> CacheElements = <> Options = [rsoProcessDeltasWithoutUpdateRules] Height = 220 Width = 339 object schLogin: TDASchema ConnectionManager = dmServer.ConnectionManager DataDictionary = dmServer.DataDictionary Diagrams = dmServer.DADiagrams Datasets = < item Params = < item Name = 'USERID' DataType = datString BlobType = dabtUnknown Value = 'zeus' ParamType = daptInput end item Name = 'PASSWORD' DataType = datString BlobType = dabtUnknown Value = 'zvg' ParamType = daptInput end> Statements = < item Connection = 'GFT_VARELA' TargetTable = 'USUARIOS' SQL = 'SELECT'#10' CLAVE AS ID, PASSW AS PASS'#10' FROM'#10' USUARIOS'#10' WH' + 'ERE CLAVE = :USERID AND'#10' PASSW = :PASSWORD;' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'CLAVE' SQLOrigin = 'ID' end item DatasetField = 'PASS' TableField = 'PASSW' SQLOrigin = 'PASS' end> end> Name = 'GetLoginInfo' Fields = < item Name = 'ID' DataType = datString Size = 12 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = True Calculated = False ServerCalculated = False Lookup = False LookupCache = False end item Name = 'PASS' DataType = datString Size = 12 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False ServerCalculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end> JoinDataTables = <> UnionDataTables = <> Commands = <> RelationShips = <> UpdateRules = <> Version = 0 Left = 56 Top = 24 end object DABINAdapter: TDABINAdapter BufferSize = 262144 IsCompatibleV4 = True Left = 56 Top = 96 end end