roberto
edadc2068a
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@258 0c75b7a4-871f-7646-8a2f-f78d34cc349f
117 lines
3.1 KiB
Plaintext
117 lines
3.1 KiB
Plaintext
object srvReferencias: TsrvReferencias
|
|
OldCreateOrder = True
|
|
OnCreate = DataAbstractServiceCreate
|
|
SessionManager = dmServer.SessionManager
|
|
ServiceSchema = schReferencias
|
|
ServiceDataStreamer = Bin2DataStreamer
|
|
ExportedDataTables = <>
|
|
BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection
|
|
Height = 300
|
|
Width = 300
|
|
object schReferencias: TDASchema
|
|
ConnectionManager = dmServer.ConnectionManager
|
|
Datasets = <
|
|
item
|
|
Params = <>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
ConnectionType = 'Interbase'
|
|
Default = True
|
|
TargetTable = 'REFERENCIAS'
|
|
Name = 'IBX'
|
|
StatementType = stAutoSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'ID'
|
|
TableField = 'ID'
|
|
end
|
|
item
|
|
DatasetField = 'ID_EMPRESA'
|
|
TableField = 'ID_EMPRESA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGO'
|
|
TableField = 'CODIGO'
|
|
end
|
|
item
|
|
DatasetField = 'VALOR'
|
|
TableField = 'VALOR'
|
|
end
|
|
item
|
|
DatasetField = 'DESCRIPCION'
|
|
TableField = 'DESCRIPCION'
|
|
end>
|
|
end>
|
|
Name = 'Referencias'
|
|
Fields = <
|
|
item
|
|
Name = 'ID'
|
|
DataType = datInteger
|
|
GeneratorName = 'GEN_REFERENCIAS_ID'
|
|
Required = True
|
|
InPrimaryKey = True
|
|
end
|
|
item
|
|
Name = 'ID_EMPRESA'
|
|
DataType = datInteger
|
|
end
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datString
|
|
Size = 50
|
|
Required = True
|
|
end
|
|
item
|
|
Name = 'VALOR'
|
|
DataType = datString
|
|
Size = 255
|
|
Required = True
|
|
end
|
|
item
|
|
Name = 'DESCRIPCION'
|
|
DataType = datString
|
|
Size = 255
|
|
end>
|
|
end>
|
|
JoinDataTables = <>
|
|
UnionDataTables = <>
|
|
Commands = <
|
|
item
|
|
IsPublic = False
|
|
Params = <
|
|
item
|
|
Name = 'VALOR'
|
|
Value = ''
|
|
end
|
|
item
|
|
Name = 'CODIGO'
|
|
Value = ''
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
ConnectionType = 'Interbase'
|
|
Default = True
|
|
TargetTable = 'REFERENCIAS'
|
|
Name = 'IBX'
|
|
SQL =
|
|
'UPDATE REFERENCIAS SET'#10' VALOR = :VALOR'#10'WHERE CODIGO = :CODIGO' +
|
|
#10' AND {Where}'#10
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'ModificarValorReferencia'
|
|
end>
|
|
RelationShips = <>
|
|
UpdateRules = <>
|
|
Version = 0
|
|
Left = 40
|
|
Top = 24
|
|
end
|
|
object Bin2DataStreamer: TDABin2DataStreamer
|
|
Left = 40
|
|
Top = 88
|
|
end
|
|
end
|