2007-10-24 18:54:18 +00:00
|
|
|
inherited DataModuleFamilias: TDataModuleFamilias
|
2007-09-12 14:11:44 +00:00
|
|
|
OnCreate = DAClientDataModuleCreate
|
2007-10-24 18:54:18 +00:00
|
|
|
Height = 195
|
|
|
|
|
Width = 390
|
2007-09-12 14:11:44 +00:00
|
|
|
object RORemoteService: TRORemoteService
|
2007-10-10 08:51:38 +00:00
|
|
|
Message = dmConexion.ROMessage
|
|
|
|
|
Channel = dmConexion.ROChannel
|
2007-09-12 14:11:44 +00:00
|
|
|
ServiceName = 'srvFamilias'
|
|
|
|
|
Left = 48
|
|
|
|
|
Top = 24
|
|
|
|
|
end
|
2007-10-10 08:51:38 +00:00
|
|
|
object rda_Familias: TDARemoteDataAdapter
|
|
|
|
|
GetSchemaCall.RemoteService = RORemoteService
|
|
|
|
|
GetDataCall.RemoteService = RORemoteService
|
|
|
|
|
UpdateDataCall.RemoteService = RORemoteService
|
|
|
|
|
GetScriptsCall.RemoteService = RORemoteService
|
|
|
|
|
RemoteService = RORemoteService
|
|
|
|
|
DataStreamer = Bin2DataStreamer
|
|
|
|
|
Left = 203
|
|
|
|
|
Top = 23
|
2007-09-12 14:11:44 +00:00
|
|
|
end
|
2007-10-10 08:51:38 +00:00
|
|
|
object Bin2DataStreamer: TDABin2DataStreamer
|
2007-09-12 14:11:44 +00:00
|
|
|
Left = 48
|
2007-10-10 08:51:38 +00:00
|
|
|
Top = 88
|
2007-09-12 14:11:44 +00:00
|
|
|
end
|
2007-10-10 08:51:38 +00:00
|
|
|
object tbl_Familias: TDAMemDataTable
|
2007-09-12 14:11:44 +00:00
|
|
|
RemoteUpdatesOptions = []
|
|
|
|
|
Fields = <
|
2008-02-04 16:33:54 +00:00
|
|
|
item
|
|
|
|
|
Name = 'ID'
|
|
|
|
|
DataType = datAutoInc
|
|
|
|
|
GeneratorName = 'GEN_EMPRESAS_ID'
|
|
|
|
|
Required = True
|
|
|
|
|
DictionaryEntry = 'Familias_ID'
|
|
|
|
|
InPrimaryKey = True
|
|
|
|
|
end
|
2007-09-12 14:11:44 +00:00
|
|
|
item
|
|
|
|
|
Name = 'DESCRIPCION'
|
|
|
|
|
DataType = datString
|
|
|
|
|
Size = 255
|
2008-02-04 16:33:54 +00:00
|
|
|
DisplayLabel = 'Descripci'#243'n'
|
|
|
|
|
DictionaryEntry = 'Familias_DESCRIPCION'
|
2007-09-12 14:11:44 +00:00
|
|
|
end>
|
|
|
|
|
Params = <>
|
|
|
|
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
2007-10-10 08:51:38 +00:00
|
|
|
RemoteDataAdapter = rda_Familias
|
2007-09-12 14:11:44 +00:00
|
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
|
|
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
|
|
|
LogicalName = 'Familias'
|
2008-02-04 16:33:54 +00:00
|
|
|
IndexDefs = <>
|
2007-10-10 08:51:38 +00:00
|
|
|
Left = 280
|
|
|
|
|
Top = 24
|
2007-09-12 14:11:44 +00:00
|
|
|
end
|
|
|
|
|
object ds_Familias: TDADataSource
|
2007-10-10 08:51:38 +00:00
|
|
|
DataSet = tbl_Familias.Dataset
|
2007-09-12 14:11:44 +00:00
|
|
|
DataTable = tbl_Familias
|
2007-10-10 08:51:38 +00:00
|
|
|
Left = 280
|
|
|
|
|
Top = 88
|
2007-09-12 14:11:44 +00:00
|
|
|
end
|
|
|
|
|
end
|