object DataModulePedidosCliente: TDataModulePedidosCliente OldCreateOrder = True OnCreate = DAClientDataModuleCreate RemoteService = RORemoteService Adapter = DABinAdapter SchemaCall.MethodName = 'GetSchemaAsXML' SchemaCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtString end> Height = 377 Width = 649 object ROChannel: TROWinInetHTTPChannel ServerLocators = <> DispatchOptions = [] ProbeServers = False ProbeFrequency = 60000 UserAgent = 'RemObjects SDK' TargetURL = 'http://localhost:8099/bin' Left = 40 Top = 8 end object ROMessage: TROBinMessage Left = 40 Top = 60 end object RORemoteService: TRORemoteService ServiceName = 'srvPedidosCliente' Message = ROMessage Channel = ROChannel Left = 40 Top = 112 end object DABinAdapter: TDABINAdapter Left = 40 Top = 168 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 = 'Luis' end item Name = 'Password' ParamType = fIn DataType = rtString Value = '1' end item Name = 'LoginInfo' ParamType = fOut DataType = rtUserDefined UserClassName = 'TRdxLoginInfo' end> RemoteService = LoginRemoteService Left = 40 Top = 240 end object LoginRemoteService: TRORemoteService ServiceName = 'srvLogin' Message = ROMessage Channel = ROChannel Left = 40 Top = 296 end object tbl_PedidosCliente: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_ID_EMPRESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_ID_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Nombre del cliente' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_NOMBRE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Referencia' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_REFERENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA_CLIENTE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'PedidosCliente_REFERENCIA_CLIENTE' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_REFERENCIA_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'SITUACION' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Situaci'#243'n' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_SITUACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_PEDIDO' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Fecha pedido' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_FECHA_PEDIDO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Calle' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_CALLE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'C'#243'd. postal' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_CODIGO_POSTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Poblaci'#243'n' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_POBLACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Provincia' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_PROVINCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Persona de contacto' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_PERSONA_CONTACTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO' DataType = datString Size = 25 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Tel'#233'fono' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_TELEFONO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'OBSERVACIONES' DataType = datMemo BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Observaciones' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_OBSERVACIONES' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'INCIDENCIAS' DataType = datMemo BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_INCIDENCIAS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'INCIDENCIAS_ACTIVAS' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_INCIDENCIAS_ACTIVAS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_FECHA_ALTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_FECHA_MODIFICACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_USUARIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_NETO' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Importe neto' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_IMPORTE_NETO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_PORTE' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Importe del porte' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_IMPORTE_PORTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DESCUENTO' DataType = datFloat BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Descuento' DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_DESCUENTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_DESCUENTO' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Importe dto.' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_IMPORTE_DESCUENTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'BASE_IMPONIBLE' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Base imponible' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_BASE_IMPONIBLE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IVA' DataType = datFloat BlobType = dabtUnknown DisplayWidth = 0 DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_IVA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_IVA' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Importe IVA' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_IMPORTE_IVA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_TOTAL' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Importe total' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_IMPORTE_TOTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_FORMA_PAGO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_ID_FORMA_PAGO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REF_TIENDA_WEB' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_REF_TIENDA_WEB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_PREVISTA_ENVIO' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Fecha de entrega prevista' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_FECHA_PREVISTA_ENVIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NUM_COPIAS' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NUM_CORREOS' 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 = 'PedidosCliente' end> DataRequestCall.MethodName = 'GetDatasetDataEx' DataRequestCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'DatasetName' ParamType = fIn DataType = rtString Value = 'PedidosCliente' 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 = 'PedidosCliente' end> ReadOnly = False RemoteService = RORemoteService Adapter = DABinAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'PedidosCliente' IndexDefs = <> Left = 208 Top = 104 end object ds_PedidosCliente: TDADataSource DataTable = tbl_PedidosCliente Left = 208 Top = 48 end object tbl_PedidosCliente_Detalles: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc BlobType = dabtUnknown Required = True DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_Detalles_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_PEDIDO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_Detalles_ID_PEDIDO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'POSICION' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'POSICIONCONCEPTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TIPO_DETALLE' DataType = datString Size = 10 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_Detalles_TIPO_DETALLE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Referencia' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_Detalles_REFERENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_ARTICULO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_Detalles_ID_ARTICULO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CONCEPTO' DataType = datString Size = 2000 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_Detalles_CONCEPTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CANTIDAD' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taRightJustify DictionaryEntry = 'CANTIDAD' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_UNIDAD' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Importe unidad' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_Detalles_IMPORTE_UNIDAD' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_TOTAL' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Importe total' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_Detalles_IMPORTE_TOTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DESCUENTO' DataType = datFloat BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Descuento' DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_Detalles_DESCUENTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'IMPORTE_PORTE' DataType = datCurrency BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Importe porte' Alignment = taRightJustify DictionaryEntry = 'PedidosCliente_Detalles_IMPORTE_PORTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'VISIBLE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_Detalles_VISIBLE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Ref. proveedor' Alignment = taLeftJustify DictionaryEntry = 'PedidosCliente_Detalles_REFERENCIA_PROVEEDOR' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> Params = < item Name = 'ID_PEDIDO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> MasterMappingMode = mmParams MasterParamsMappings.Strings = ( 'ID_PEDIDO=ID') StreamingOptions = [soDisableEventsWhileStreaming] SchemaCall.MethodName = 'GetDatasetSchema' SchemaCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'aDatasetName' ParamType = fIn DataType = rtString Value = 'PedidosCliente_Detalles' end> DataRequestCall.MethodName = 'GetDatasetDataEx' DataRequestCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'DatasetName' ParamType = fIn DataType = rtString Value = 'PedidosCliente_Detalles' 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 = 'PedidosCliente_Detalles' end> ReadOnly = False RemoteService = RORemoteService Adapter = DABinAdapter MasterSource = ds_PedidosCliente MasterFields = 'ID' DetailFields = 'ID_PEDIDO' DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'PedidosCliente_Detalles' IndexDefs = <> Left = 329 Top = 104 end object ds_PedidosCliente_Detalles: TDADataSource DataTable = tbl_PedidosCliente_Detalles Left = 329 Top = 48 end object tbl_PedidoCliente_Articulos_Pendientes: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID_ARTICULO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'PedidoCliente_Articulos_Pendientes_ID_ARTICULO' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'CANTIDAD_PED' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Cantidad en pedido' Alignment = taRightJustify DictionaryEntry = 'PedidoCliente_Articulos_Pendientes_CANTIDAD_PED' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CANTIDAD_ALB' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Cantidad en albaranes' Alignment = taRightJustify DictionaryEntry = 'PedidoCliente_Articulos_Pendientes_CANTIDAD_ALB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CANTIDAD_PENDIENTE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Cantidad pendiente' Alignment = taRightJustify DictionaryEntry = 'PedidoCliente_Articulos_Pendientes_CANTIDAD_PENDIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> Params = < item Name = 'ID_PEDIDO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> 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 = 'PedidoCliente_Articulos_Pendientes' end> DataRequestCall.MethodName = 'GetDatasetDataEx' DataRequestCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'DatasetName' ParamType = fIn DataType = rtString Value = 'PedidoCliente_Articulos_Pendientes' 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 = 'PedidoCliente_Articulos_Pendientes' end> ReadOnly = False RemoteService = RORemoteService Adapter = DABinAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'PedidoCliente_Articulos_Pendientes' IndexDefs = <> Left = 208 Top = 192 end object ds_PedidoCliente_Articulos_Pendientes: TDADataSource DataTable = tbl_PedidoCliente_Articulos_Pendientes Left = 208 Top = 256 end object tbl_PedidoCliente_ArticulosPendientesPedirAProv: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID_PEDIDO' DataType = datAutoInc BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'DarArticulosPendientesPedirAProv_ID_PEDIDO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_ARTICULO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'DarArticulosPendientesPedirAProv_ID_ARTICULO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CANT_PEDIDA_CLIENTE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Cant. pedida por cliente' Alignment = taLeftJustify DictionaryEntry = 'DarArticulosPendientesPedirAProv_CANT_PEDIDA_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify DictionaryEntry = 'DarArticulosPendientesPedirAProv_ID_PROVEEDOR' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CANT_PEDIDA_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Cant. pedida a proveedor' Alignment = taLeftJustify DictionaryEntry = 'DarArticulosPendientesPedirAProv_CANT_PEDIDA_PROVEEDOR' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CANT_PENDIENTE_PEDIR' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Cant. pendiente pedir' Alignment = taLeftJustify DictionaryEntry = 'DarArticulosPendientesPedirAProv_CANT_PENDIENTE_PEDIR' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> Params = < item Name = 'ID_PEDIDO' BlobType = dabtUnknown Value = '' ParamType = daptInput end> 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 = 'PedidoCliente_ArticulosPendientesPedirAProv' end> DataRequestCall.MethodName = 'GetDatasetDataEx' DataRequestCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'DatasetName' ParamType = fIn DataType = rtString Value = 'PedidoCliente_ArticulosPendientesPedirAProv' 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 = 'PedidoCliente_ArticulosPendientesPedirAProv' end> ReadOnly = False RemoteService = RORemoteService Adapter = DABinAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'PedidoCliente_ArticulosPendientesPedirAProv' IndexDefs = <> Left = 440 Top = 192 end object ds_PedidoCliente_ArticulosPendientesPedirAProv: TDADataSource DataTable = tbl_PedidoCliente_ArticulosPendientesPedirAProv Left = 440 Top = 256 end object tbl_ListaAnosPedidos: TDACDSDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ANO' DataType = datString Size = 254 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 = 'ListaAnosPedidos' end> DataRequestCall.MethodName = 'GetDatasetDataEx' DataRequestCall.Params = < item Name = 'Result' ParamType = fResult DataType = rtBinary end item Name = 'DatasetName' ParamType = fIn DataType = rtString Value = 'ListaAnosPedidos' 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 = 'ListaAnosPedidos' end> ReadOnly = False RemoteService = RORemoteService Adapter = DABinAdapter DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'ListaAnosPedidos' IndexDefs = <> Left = 520 Top = 112 end object ds_ListaAnosPedidos: TDADataSource DataTable = tbl_ListaAnosPedidos Left = 520 Top = 48 end end