FactuGES2/Source/Modulos/Contabilidad balances/Data/uDataModuleBalances.dfm
2007-11-28 17:40:31 +00:00

111 lines
3.3 KiB
Plaintext

inherited DataModuleBalances: TDataModuleBalances
OnCreate = DAClientDataModuleCreate
Height = 177
Width = 332
object RORemoteService: TRORemoteService
Message = dmConexion.ROMessage
Channel = dmConexion.ROChannel
ServiceName = 'srvBalances'
Left = 48
Top = 24
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 48
Top = 104
end
object rda_Balances: 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_Balances
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'Balances'
IndexDefs = <>
Left = 264
Top = 80
end
object ds_Balances: TDADataSource
DataSet = tbl_Balances.Dataset
DataTable = tbl_Balances
Left = 264
Top = 24
end
end