inherited DataModuleEjercicios: TDataModuleEjercicios OnCreate = DAClientDataModuleCreate Height = 207 Width = 483 object RORemoteService: TRORemoteService Message = dmConexion.ROMessage Channel = dmConexion.ROChannel ServiceName = 'srvEjercicios' Left = 48 Top = 24 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 104 end object rda_Ejercicios: TDARemoteDataAdapter GetSchemaCall.RemoteService = RORemoteService GetDataCall.RemoteService = RORemoteService UpdateDataCall.RemoteService = RORemoteService GetScriptsCall.RemoteService = RORemoteService RemoteService = RORemoteService DataStreamer = Bin2DataStreamer Left = 176 Top = 24 end object tbl_Ejercicios: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_CONT_EJERCICIOS_ID' Required = True ServerAutoRefresh = True DictionaryEntry = 'Ejercicios_ID' InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger DisplayLabel = 'Ejercicios_ID_EMPRESA' DictionaryEntry = 'Ejercicios_ID_EMPRESA' end item Name = 'NOMBRE' DataType = datString Size = 255 DisplayLabel = 'Nombre' DictionaryEntry = 'Ejercicios_NOMBRE' end item Name = 'FECHA_INICIO' DataType = datDateTime DisplayLabel = 'Fecha inicio' DictionaryEntry = 'Ejercicios_FECHA_INICIO' end item Name = 'FECHA_FIN' DataType = datDateTime DisplayLabel = 'Fecha fin' DictionaryEntry = 'Ejercicios_FECHA_FIN' end item Name = 'ESTADO' DataType = datString Size = 255 DisplayLabel = 'Estado' DictionaryEntry = 'Ejercicios_ESTADO' end item Name = 'LONG_SUB_CUENTA' DataType = datSmallInt DisplayLabel = 'Long. Subcuenta' DictionaryEntry = 'Ejercicios_LONG_SUB_CUENTA' end item Name = 'ID_ASIENTO_APERTURA' DataType = datInteger DisplayLabel = 'Ejercicios_ID_ASIENTO_APERTURA' DictionaryEntry = 'Ejercicios_ID_ASIENTO_APERTURA' end item Name = 'ID_ASIENTO_PERYGAN' DataType = datInteger DisplayLabel = 'Ejercicios_ID_ASIENTO_PERYGAN' DictionaryEntry = 'Ejercicios_ID_ASIENTO_PERYGAN' end item Name = 'ID_ASIENTO_CIERRE' DataType = datInteger DisplayLabel = 'Ejercicios_ID_ASIENTO_CIERRE' DictionaryEntry = 'Ejercicios_ID_ASIENTO_CIERRE' end item Name = 'ACTIVO' DataType = datSmallInt DisplayLabel = 'Ejercicios_ACTIVO' DictionaryEntry = 'Ejercicios_ACTIVO' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_Ejercicios DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'Ejercicios' IndexDefs = <> Left = 296 Top = 88 end object ds_Ejercicios: TDADataSource DataSet = tbl_Ejercicios.Dataset DataTable = tbl_Ejercicios Left = 296 Top = 32 end end