object srvConfiguracion: TsrvConfiguracion OldCreateOrder = True OnCreate = DARemoteServiceCreate SessionManager = dmServer.SessionManager 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, VALOr_BLOB'#10'FROM CONFIGURACION'#10'WHERE CODIGO = :CODI' + 'GO'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'VALOR' TableField = 'VALOR' end item DatasetField = 'VALOR_BLOB' TableField = 'VALOR_BLOB' end> end> Name = 'darValor' Fields = < item Name = 'VALOR' DataType = datString Size = 2000 end item Name = 'VALOR_BLOB' DataType = datMemo end> end item Params = < item Name = 'CODIGO' DataType = datString Size = 50 Value = '' end item Name = 'ID_EMPRESA' DataType = datInteger Value = '' end> Statements = < item Connection = 'IBX' TargetTable = 'CONFIGURACION' SQL = 'SELECT VALOR, VALOr_BLOB'#10'FROM CONFIGURACION'#10'WHERE CODIGO = :CODI' + 'GO'#10'AND ID_EMPRESA = :ID_EMPRESA'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'VALOR' TableField = 'VALOR' end item DatasetField = 'VALOR_BLOB' TableField = 'VALOR_BLOB' end> end> Name = 'darValorParaEmpresa' Fields = < item Name = 'VALOR' DataType = datString Size = 2000 end item Name = 'VALOR_BLOB' DataType = datMemo end> end> JoinDataTables = <> UnionDataTables = <> Commands = < item Params = < item Name = 'CODIGO' Value = '' end item Name = 'VALOR' Value = '' end item Name = 'VALOR_BLOB' DataType = datMemo Value = '' end item Name = 'ID_EMPRESA' Value = '' end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True Name = 'IBX' SQL = 'insert into CONFIGURACION (ID, CODIGO, VALOR, VALOR_BLOB, ID_EMP' + 'RESA)'#10'values(GEN_ID(GEN_CONFIGURACION_ID, 1), :CODIGO, :VALOR, :' + 'VALOR_BLOB, :ID_EMPRESA)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'InsertarValor' end item Params = < item Name = 'VALOR' Value = '' end item Name = 'VALOR_BLOB' DataType = datMemo Value = '' end item Name = 'CODIGO' Value = '' end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True SQL = 'update CONFIGURACION'#10'set'#10'VALOR = :VALOR,'#10'VALOR_BLOB = :VALOR_BLO' + 'B'#10'where CODIGO = :CODIGO'#10#10 StatementType = stSQL ColumnMappings = <> end> Name = 'UpdateValor' end item Params = < item Name = 'VALOR' Value = '' end item Name = 'VALOR_BLOB' Value = '' end item Name = 'CODIGO' Value = '' end item Name = 'ID_EMPRESA' Value = '' end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True SQL = 'update CONFIGURACION'#10'set'#10'VALOR = :VALOR,'#10'VALOR_BLOB = :VALOR_BLO' + 'B'#10'where CODIGO = :CODIGO'#10'AND ID_EMPRESA = :ID_EMPRESA'#10#10 StatementType = stSQL ColumnMappings = <> end> Name = 'UpdateValorParaEmpresa' end> RelationShips = <> UpdateRules = <> Version = 0 Left = 40 Top = 16 end object Bin2DataStreamer: TDABin2DataStreamer Left = 40 Top = 80 end end