object DataModuleInventario: TDataModuleInventario OldCreateOrder = True OnCreate = DAClientDataModuleCreate RemoteService = RORemoteService Adapter = DABinAdapter SchemaCall.MethodName = 'GetSchemaAsXML' SchemaCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtString end> Height = 414 Width = 518 object RORemoteService: TRORemoteService ServiceName = 'srvInventario' Message = ROBinMessage1 Channel = ROWinInetHTTPChannel1 Left = 48 Top = 24 end object DABinAdapter: TDABINAdapter Left = 48 Top = 80 end object DADesigntimeCall1: TDADesigntimeCall RemoteRequest.MethodName = 'Login' RemoteRequest.Params = < item Name = 'Result' ParamType = fResult DataType = rtBoolean end item Name = 'User' ParamType = fIn DataType = rtString Value = 'Administrador' end item Name = 'Password' ParamType = fIn DataType = rtString Value = '1' end item Name = 'LoginInfo' ParamType = fOut DataType = rtUserDefined UserClassName = 'TRdxLoginInfo' end> RemoteService = LoginRemoteService Left = 48 Top = 160 end object LoginRemoteService: TRORemoteService ServiceName = 'srvLogin' Message = ROBinMessage1 Channel = ROWinInetHTTPChannel1 Left = 48 Top = 216 end object ROWinInetHTTPChannel1: TROWinInetHTTPChannel ServerLocators = <> DispatchOptions = [] ProbeServers = False ProbeFrequency = 60000 UserAgent = 'RemObjects SDK' TargetURL = 'http://localhost:8090/bin' Left = 48 Top = 272 end object ROBinMessage1: TROBinMessage Left = 48 Top = 324 end object tbl_INVENTARIO: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'INVENTARIO_ID' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_ID' InPrimaryKey = True Calculated = True Lookup = False LookupCache = False end item Name = 'ID_ALMACEN' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_ID_ALMACEN' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_ARTICULO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_ID_ARTICULO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ALMACEN' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_ALMACEN' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_ID_EMPRESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'INVENTARIO_REFERENCIA' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_REFERENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FAMILIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_FAMILIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DESCRIPCION' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_DESCRIPCION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PRECIO_NETO' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Precio unidad' Alignment = taRightJustify DictionaryEntry = 'INVENTARIO_PRECIO_NETO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_REFERENCIA_PROVEEDOR' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'UNIDADES_ALMACEN' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'U. Almac'#233'n' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_UNIDADES_ALMACEN' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'COSTE_UNIDADES' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Coste unidades' Alignment = taRightJustify DictionaryEntry = 'INVENTARIO_COSTE_UNIDADES' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'STOCK' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Stock disponible' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_STOCK' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'RESERVA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Reservado' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_RESERVA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PENDIENTE_RECEPCION' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Pendiente de recibir' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_PENDIENTE_RECEPCION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CANTIDAD' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'INVENTARIO_CANTIDAD' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_CANTIDAD' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MOVIMIENTO' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'INVENTARIO_FECHA_MOVIMIENTO' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_FECHA_MOVIMIENTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CAUSA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'INVENTARIO_CAUSA' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_CAUSA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TIPO' DataType = datString Size = 1 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'INVENTARIO_TIPO' Alignment = taLeftJustify DictionaryEntry = 'INVENTARIO_TIPO' 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 = 'INVENTARIO' end> DataRequestCall.MethodName = 'GetDatasetDataEx' DataRequestCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'DatasetName' ParamType = fIn DataType = rtString Value = 'INVENTARIO' 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 = 'INVENTARIO' end> ReadOnly = False RemoteService = RORemoteService Adapter = DABinAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'INVENTARIO' IndexDefs = <> Left = 280 Top = 160 end object ds_INVENTARIO: TDADataSource DataTable = tbl_INVENTARIO Left = 280 Top = 96 end object tbl_DetalleReservas: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID_ALB' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IdAlbaran' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_ALB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'DETALLE_RESERVAS_INV_ID_EMPRESA' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_EMPRESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA_ALB' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Ref. albar'#225'n' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_REFERENCIA_ALB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'SITUACION_ALB' DataType = datString Size = 9 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Situaci'#243'n' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_SITUACION_ALB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_PREVISTA_ENVIO_ALB' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Fecha prevista de envio' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_FECHA_PREVISTA_ENVIO_ALB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_ALMACEN_ALB' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IdAlmac'#233'n' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_ALMACEN_ALB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ALMACEN_ALB' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Almac'#233'n' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_ALMACEN_ALB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CLIENTE_ALB' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IdCliente' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_CLIENTE_ALB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CLIENTE_ALB' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Cliente' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_CLIENTE_ALB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_ART' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'IdArticulo' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_ART' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FAMILIA_ART' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Familia' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_FAMILIA_ART' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA_ART' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Referencia' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_REFERENCIA_ART' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA_PROV_ART' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Ref. proveedor' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_REFERENCIA_PROV_ART' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DESCRIPCION_ART' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Descripci'#243'n' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_DESCRIPCION_ART' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CANTIDAD_ART' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Reservado' Alignment = taLeftJustify DictionaryEntry = 'DETALLE_RESERVAS_INV_CANTIDAD_ART' 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 = 'DETALLE_RESERVAS_INV' end> DataRequestCall.MethodName = 'GetDatasetDataEx' DataRequestCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'DatasetName' ParamType = fIn DataType = rtString Value = 'DETALLE_RESERVAS_INV' 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 = 'DETALLE_RESERVAS_INV' end> ReadOnly = False RemoteService = RORemoteService Adapter = DABinAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'DETALLE_RESERVAS_INV' IndexDefs = <> Left = 408 Top = 160 end object dsDetalleReservas: TDADataSource DataTable = tbl_DetalleReservas Left = 408 Top = 104 end end