object dmArticulos: TdmArticulos OldCreateOrder = True OnCreate = DAClientDataModuleCreate RemoteService = RORemoteService Adapter = DABINAdapter SchemaCall.MethodName = 'GetSchemaAsXML' SchemaCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtString end> Left = 328 Top = 294 Height = 197 Width = 369 object RORemoteService: TRORemoteService ServiceName = 'srvArticulos' Message = dmBase.ROMessage Channel = dmBase.ROChannel Left = 48 Top = 20 end object DABINAdapter: TDABINAdapter Left = 48 Top = 88 end object tbl_Articulos: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'CODIGO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'C'#243'digo' Alignment = taLeftJustify DictionaryEntry = 'CODIGO (GENERICO)' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGOALMACEN' DataType = datInteger BlobType = dabtUnknown Required = True DisplayWidth = 0 DisplayLabel = 'C'#243'd. almac'#233'n' Alignment = taLeftJustify DictionaryEntry = 'CODIGOALMACEN' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGOPEDIDO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'C'#243'd. pedido' Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CANTIDAD' DataType = datInteger BlobType = dabtUnknown LogChanges = False DisplayWidth = 0 Alignment = taRightJustify InPrimaryKey = False Calculated = True Lookup = False LookupCache = False end item Name = 'CODIGOMONTAJE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DESCRIPCION' DataType = datString Size = 100 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Descripci'#243'n' Alignment = taLeftJustify DictionaryEntry = 'DESCRIPCION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIAPEDIDO' DataType = datString Size = 20 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIAMONTAJE' DataType = datString Size = 20 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CLIENTE' DataType = datString Size = 100 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Cliente' Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ALMACEN' DataType = datString Size = 100 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Almac'#233'n' Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'SITUACION' DataType = datString Size = 30 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 = 'ARTICULOS' end> DataRequestCall.MethodName = 'GetDatasetDataEx' DataRequestCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'DatasetName' ParamType = fIn DataType = rtString Value = 'ARTICULOS' 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 = 'ARTICULOS' end> ReadOnly = False RemoteService = RORemoteService Adapter = DABINAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'ARTICULOS' IndexDefs = <> Left = 168 Top = 24 end object ds_Articulos: TDADataSource DataTable = tbl_Articulos Left = 248 Top = 24 end end