object dmRecibosCliente: TdmRecibosCliente OldCreateOrder = True OnCreate = DAClientDataModuleCreate RemoteService = RORemoteService Adapter = DABINAdapter SchemaCall.MethodName = 'GetSchemaAsXML' SchemaCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtString end> Left = 444 Top = 330 Height = 230 Width = 259 object RORemoteService: TRORemoteService ServiceName = 'srvRecibosCliente' Message = dmBase.ROMessage Channel = dmBase.ROChannel Left = 48 Top = 32 end object tbl_RecibosCliente: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'CODIGO' DataType = datInteger BlobType = dabtUnknown Required = True DisplayWidth = 0 DisplayLabel = 'C'#243'digo' Alignment = taLeftJustify DictionaryEntry = 'CODIGO' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'FECHAALTA' DataType = datDateTime BlobType = dabtUnknown Required = True DisplayWidth = 0 DisplayLabel = 'Fecha de alta' Alignment = taLeftJustify DictionaryEntry = 'FECHAALTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'USUARIO' DataType = datString Size = 100 BlobType = dabtUnknown Required = True DisplayWidth = 0 DisplayLabel = 'Usuario de alta' Alignment = taLeftJustify DictionaryEntry = 'USUARIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHARECIBO' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Importe' Alignment = taRightJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TEXTO' DataType = datMemo BlobType = dabtBlob DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGOCONTACTO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NIFCIF' DataType = datString Size = 10 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE' DataType = datString Size = 100 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CALLE' DataType = datString Size = 150 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PROVINCIA' DataType = datString Size = 30 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGOPOSTAL' DataType = datString Size = 5 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'POBLACION' DataType = datString Size = 40 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGOOBRA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> Params = <> MasterMappingMode = mmDataRequest StreamingOptions = [soDisableEventsWhileStreaming] SchemaCall.MethodName = 'GetDatasetSchema' SchemaCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'aDatasetName' ParamType = fIn DataType = rtString Value = 'RecibosCliente' end> DataRequestCall.MethodName = 'GetDatasetDataEx' DataRequestCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'DatasetName' ParamType = fIn DataType = rtString Value = 'RecibosCliente' end item Name = 'Params' ParamType = fIn DataType = rtUserDefined UserClassName = 'TDADatasetParamArray' end item Name = 'UserFilter' ParamType = fIn DataType = rtString Value = '' end item Name = 'IncludeSchema' ParamType = fIn DataType = rtBoolean Value = False end item Name = 'MaxRecords' ParamType = fIn DataType = rtInteger Value = -1 end> DataUpdateCall.MethodName = 'UpdateData' DataUpdateCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'Delta' ParamType = fIn DataType = rtBinary end> ScriptCall.MethodName = 'GetDatasetScripts' ScriptCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtString Value = '' end item Name = 'DatasetNames' ParamType = fIn DataType = rtString Value = 'RecibosCliente' end> ReadOnly = False RemoteService = RORemoteService Adapter = dmBase.DABINAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'RecibosCliente' IndexDefs = <> Left = 48 Top = 104 end object ds_RecibosCliente: TDADataSource DataTable = tbl_RecibosCliente Left = 152 Top = 104 end object DABINAdapter: TDABINAdapter Left = 152 Top = 32 end end