object srvConfiguracion: TsrvConfiguracion OldCreateOrder = True OnCreate = DARemoteServiceCreate ConnectionName = 'IBX' ServiceSchema = schConfiguracion ServiceDataStreamer = Bin2DataStreamer ExportedDataTables = <> BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection Height = 160 Width = 300 object schConfiguracion: TDASchema ConnectionManager = dmServer.ConnectionManager Datasets = < item Params = < item Name = 'CODIGO' DataType = datString Size = 50 Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONFIGURACION' SQL = 'SELECT VALOR'#10'FROM CONFIGURACION'#10'WHERE CODIGO = :CODIGO' StatementType = stSQL ColumnMappings = < item DatasetField = 'VALOR' TableField = 'VALOR' end> end> Name = 'darValor' Fields = < item Name = 'VALOR' DataType = datString Size = 255 end> end> JoinDataTables = <> UnionDataTables = <> Commands = < item Params = < item Name = 'CODIGO' Value = '' end item Name = 'VALOR' Value = '' end item Name = 'ID_EMPRESA' Value = '' end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'CONFIGURACION' Name = 'IBX' SQL = 'insert into CONFIGURACION (ID, CODIGO, VALOR, ID_EMPRESA)'#10'values' + '(GEN_ID(GEN_CONFIGURACION_ID, 1), :CODIGO, :VALOR, :ID_EMPRESA)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'InsertarValor' end> RelationShips = <> UpdateRules = <> Version = 0 Left = 40 Top = 16 end object Bin2DataStreamer: TDABin2DataStreamer Left = 40 Top = 80 end end