inherited DataModuleContabilidad: TDataModuleContabilidad OnCreate = DAClientDataModuleCreate Height = 288 Width = 480 object RORemoteService: TRORemoteService Message = dmConexion.ROMessage Channel = dmConexion.ROChannel ServiceName = 'srvContabilidad' Left = 48 Top = 24 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 104 end object rda_Contabilidad: TDARemoteDataAdapter GetSchemaCall.RemoteService = RORemoteService GetDataCall.RemoteService = RORemoteService UpdateDataCall.RemoteService = RORemoteService GetScriptsCall.RemoteService = RORemoteService RemoteService = RORemoteService DataStreamer = Bin2DataStreamer Left = 176 Top = 24 end object tbl_Balances: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_CONT_BALANCES_ID' Required = True ServerAutoRefresh = True DictionaryEntry = 'Ejercicios_ID' InPrimaryKey = True end item Name = 'REF_BALANCE' DataType = datString Size = 255 DisplayLabel = 'Balances_REF_BALANCE' DictionaryEntry = 'Balances_REF_BALANCE' end item Name = 'NATURALEZA' DataType = datString Size = 255 DisplayLabel = 'Balances_NATURALEZA' DictionaryEntry = 'Balances_NATURALEZA' end item Name = 'NIVEL1' DataType = datString Size = 15 DisplayLabel = 'Balances_NIVEL1' DictionaryEntry = 'Balances_NIVEL1' end item Name = 'DESCRIPCION1' DataType = datString Size = 255 DisplayLabel = 'Balances_DESCRIPCION1' DictionaryEntry = 'Balances_DESCRIPCION1' end item Name = 'NIVEL2' DataType = datString Size = 15 DisplayLabel = 'Balances_NIVEL2' DictionaryEntry = 'Balances_NIVEL2' end item Name = 'DESCRIPCION2' DataType = datString Size = 255 DisplayLabel = 'Balances_DESCRIPCION2' DictionaryEntry = 'Balances_DESCRIPCION2' end item Name = 'NIVEL3' DataType = datString Size = 15 DisplayLabel = 'Balances_NIVEL3' DictionaryEntry = 'Balances_NIVEL3' end item Name = 'DESCRIPCION3' DataType = datString Size = 255 DisplayLabel = 'Balances_DESCRIPCION3' DictionaryEntry = 'Balances_DESCRIPCION3' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_Contabilidad DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'Balances' IndexDefs = <> Left = 352 Top = 216 end object ds_Balances: TDADataSource DataSet = tbl_Balances.Dataset DataTable = tbl_Balances Left = 352 Top = 160 end object tbl_CuentasEspeciales: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_CONT_CUENTAS_ESP_ID' Required = True DictionaryEntry = 'CuentasEspeciales_ID' InPrimaryKey = True end item Name = 'REFERENCIA' DataType = datString Size = 6 DisplayLabel = 'CuentasEspeciales_REFERENCIA' DictionaryEntry = 'CuentasEspeciales_REFERENCIA' end item Name = 'DESCRIPCION' DataType = datString Size = 255 DisplayLabel = 'CuentasEspeciales_DESCRIPCION' DictionaryEntry = 'CuentasEspeciales_DESCRIPCION' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_Contabilidad DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'CuentasEspeciales' IndexDefs = <> Left = 168 Top = 216 end object ds_CuentasEspeciales: TDADataSource DataSet = tbl_CuentasEspeciales.Dataset DataTable = tbl_CuentasEspeciales Left = 168 Top = 160 end object tbl_Epigrafes: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_CONT_EPIGRAFES_ID' Required = True InPrimaryKey = True end item Name = 'REF_EPIGRAFE' DataType = datString Size = 6 DisplayLabel = 'Epigrafes_REF_EPIGRAFE' DictionaryEntry = 'Epigrafes_REF_EPIGRAFE' end item Name = 'ID_PADRE' DataType = datInteger DisplayLabel = 'Epigrafes_ID_PADRE' DictionaryEntry = 'Epigrafes_ID_PADRE' end item Name = 'DESCRIPCION' DataType = datString Size = 255 DisplayLabel = 'Epigrafes_DESCRIPCION' DictionaryEntry = 'Epigrafes_DESCRIPCION' end item Name = 'ID_EJERCICIO' DataType = datInteger DisplayLabel = 'Epigrafes_ID_EJERCICIO' DictionaryEntry = 'Epigrafes_ID_EJERCICIO' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_Contabilidad DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'Epigrafes' IndexDefs = <> Left = 296 Top = 80 end object ds_Epigrafes: TDADataSource DataSet = tbl_Epigrafes.Dataset DataTable = tbl_Epigrafes Left = 296 Top = 16 end end