inherited DataModulePedidosProveedor: TDataModulePedidosProveedor OnCreate = DAClientDataModuleCreate Height = 218 Width = 621 object RORemoteService: TRORemoteService Message = dmConexion.ROMessage Channel = dmConexion.ROChannel ServiceName = 'srvPedidosProveedor' Left = 40 Top = 32 end object Bin2DataStreamer: TDABin2DataStreamer Left = 40 Top = 84 end object rda_PedidosProveedor: TDARemoteDataAdapter GetSchemaCall.RemoteService = RORemoteService GetDataCall.RemoteService = RORemoteService UpdateDataCall.RemoteService = RORemoteService GetScriptsCall.RemoteService = RORemoteService RemoteService = RORemoteService DataStreamer = Bin2DataStreamer Left = 43 Top = 151 end object tbl_PedidosProveedor: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_PEDIDOS_PROV_ID' Required = True ServerAutoRefresh = True DictionaryEntry = 'PedidosProveedor_ID' InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger DictionaryEntry = 'PedidosProveedor_ID_EMPRESA' end item Name = 'ID_PROVEEDOR' DataType = datInteger DisplayLabel = 'PedidosProveedor_ID_PROVEEDOR' DictionaryEntry = 'PedidosProveedor_ID_PROVEEDOR' end item Name = 'NOMBRE' DataType = datString Size = 255 DisplayLabel = 'Nombre del proveedor' ServerAutoRefresh = True DictionaryEntry = 'PedidosProveedor_NOMBRE' end item Name = 'REFERENCIA' DataType = datString Size = 255 DictionaryEntry = 'PedidosProveedor_REFERENCIA' end item Name = 'SITUACION' DataType = datString Size = 255 DisplayLabel = 'Situaci'#243'n' DictionaryEntry = 'PedidosProveedor_SITUACION' end item Name = 'FECHA_ENVIO' DataType = datDateTime DisplayLabel = #191'Enviado?' DictionaryEntry = 'PedidosProveedor_FECHA_ENVIO' end item Name = 'FECHA_PEDIDO' DataType = datDateTime DisplayLabel = 'Fecha pedido' DictionaryEntry = 'PedidosProveedor_FECHA_PEDIDO' end item Name = 'FECHA_CONFIRMACION' DataType = datDateTime DisplayLabel = #191'Confirmado?' DictionaryEntry = 'PedidosProveedor_FECHA_CONFIRMACION' end item Name = 'FECHA_ENTREGA' DataType = datDateTime DisplayLabel = 'Entrega prevista' DictionaryEntry = 'PedidosProveedor_FECHA_ENTREGA' end item Name = 'ID_ALMACEN' DataType = datInteger DisplayLabel = 'PedidosProveedor_ID_ALMACEN' DictionaryEntry = 'PedidosProveedor_ID_ALMACEN' end item Name = 'TIPO_ALMACEN' DataType = datString Size = 10 ServerAutoRefresh = True end item Name = 'NOMBRE_ALMACEN' DataType = datString Size = 255 DisplayLabel = 'Almac'#233'n' ServerAutoRefresh = True DictionaryEntry = 'PedidosProveedor_NOMBRE_ALMACEN' end item Name = 'ID_OBRA' DataType = datInteger DisplayLabel = 'PedidosProveedor_ID_OBRA' DictionaryEntry = 'PedidosProveedor_ID_OBRA' end item Name = 'NOMBRE_OBRA' DataType = datString Size = 255 DisplayLabel = 'Obra' ServerAutoRefresh = True DictionaryEntry = 'PedidosProveedor_NOMBRE_OBRA' end item Name = 'OBSERVACIONES' DataType = datMemo DisplayLabel = 'Observaciones' DictionaryEntry = 'PedidosProveedor_OBSERVACIONES' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_IMPORTE_TOTAL' end item Name = 'INCIDENCIAS' DataType = datMemo DictionaryEntry = 'PedidosProveedor_INCIDENCIAS' end item Name = 'INCIDENCIAS_ACTIVAS' DataType = datInteger DictionaryEntry = 'PedidosProveedor_INCIDENCIAS_ACTIVAS' end item Name = 'CALLE' DataType = datString Size = 255 DisplayLabel = 'Calle' DictionaryEntry = 'PedidosProveedor_CALLE' end item Name = 'POBLACION' DataType = datString Size = 255 DisplayLabel = 'Poblaci'#243'n' DictionaryEntry = 'PedidosProveedor_POBLACION' end item Name = 'PROVINCIA' DataType = datString Size = 255 DisplayLabel = 'Provincia' DictionaryEntry = 'PedidosProveedor_PROVINCIA' end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 DisplayLabel = 'C'#243'd. postal' DictionaryEntry = 'PedidosProveedor_CODIGO_POSTAL' end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 DisplayLabel = 'Persona de contacto' DictionaryEntry = 'PedidosProveedor_PERSONA_CONTACTO' end item Name = 'TELEFONO' DataType = datString Size = 25 DisplayLabel = 'Tel'#233'fono' DictionaryEntry = 'PedidosProveedor_TELEFONO' end item Name = 'FECHA_ALTA' DataType = datDateTime DictionaryEntry = 'PedidosProveedor_FECHA_ALTA' end item Name = 'FECHA_MODIFICACION' DataType = datDateTime DictionaryEntry = 'PedidosProveedor_FECHA_MODIFICACION' end item Name = 'USUARIO' DataType = datString Size = 20 DictionaryEntry = 'PedidosProveedor_USUARIO' end item Name = 'ID_PEDIDO_CLIENTE' DataType = datInteger DisplayLabel = 'PedidosProveedor_ID_PEDIDO_CLIENTE' DictionaryEntry = 'PedidosProveedor_ID_PEDIDO_CLIENTE' end item Name = 'REF_PED_CLIENTE' DataType = datString Size = 255 DisplayLabel = 'PedidosProveedor_REF_PED_CLIENTE' ServerAutoRefresh = True DictionaryEntry = 'PedidosProveedor_REF_PED_CLIENTE' end item Name = 'IMPORTE_NETO' DataType = datCurrency DisplayLabel = 'Importe neto' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_IMPORTE_NETO' end item Name = 'IMPORTE_PORTE' DataType = datCurrency DisplayLabel = 'Importe del porte' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_IMPORTE_PORTE' end item Name = 'DESCUENTO' DataType = datFloat DisplayLabel = 'Descuento' DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_DESCUENTO' end item Name = 'IMPORTE_DESCUENTO' DataType = datCurrency DisplayLabel = 'Importe dto.' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_IMPORTE_DESCUENTO' end item Name = 'BASE_IMPONIBLE' DataType = datCurrency DisplayLabel = 'Base imponible' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_BASE_IMPONIBLE' end item Name = 'IVA' DataType = datFloat DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify ServerAutoRefresh = True DictionaryEntry = 'PedidosProveedor_IVA' end item Name = 'IMPORTE_IVA' DataType = datCurrency DisplayLabel = 'Importe IVA' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_IMPORTE_IVA' end item Name = 'ID_FORMA_PAGO' DataType = datInteger DictionaryEntry = 'PedidosProveedor_ID_FORMA_PAGO' end item Name = 'ID_FACTURA' DataType = datInteger end item Name = 'REF_FACTURA_PROV' DataType = datString Size = 255 end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_PedidosProveedor DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'PedidosProveedor' IndexDefs = <> Left = 160 Top = 88 end object ds_PedidosProveedor: TDADataSource DataSet = tbl_PedidosProveedor.Dataset DataTable = tbl_PedidosProveedor Left = 160 Top = 32 end object tbl_PedidosProveedor_Articulos_Pendientes: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID_PEDIDO' DataType = datInteger Required = True DictionaryEntry = 'PedidosProveedor_Detalles_ID_PEDIDO' end item Name = 'REFERENCIA' DataType = datString Size = 255 DisplayLabel = 'Referencia' DictionaryEntry = 'PedidosProveedor_Detalles_REFERENCIA' end item Name = 'ID_ARTICULO' DataType = datInteger DictionaryEntry = 'PedidosProveedor_Detalles_ID_ARTICULO' end item Name = 'CONCEPTO' DataType = datString Size = 2000 DictionaryEntry = 'PedidosProveedor_Detalles_CONCEPTO' end item Name = 'CANTIDAD' DataType = datInteger Alignment = taRightJustify DictionaryEntry = 'CANTIDAD' end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 DisplayLabel = 'Ref. proveedor' DictionaryEntry = 'PedidosProveedor_Detalles_REFERENCIA_PROVEEDOR' end> Params = < item Name = 'ID' Value = '' ParamType = daptInput end> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_PedidosProveedor DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'PedidosProveedor_Articulos_Pendientes' IndexDefs = <> Left = 480 Top = 88 end object ds_PedidosProveedor_Articulos_Pendientes: TDADataSource DataSet = tbl_PedidosProveedor_Articulos_Pendientes.Dataset DataTable = tbl_PedidosProveedor_Articulos_Pendientes Left = 472 Top = 32 end object tbl_PedidosProveedor_Detalles: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_PEDIDOS_PROV_DETALLES_ID' Required = True ServerAutoRefresh = True DictionaryEntry = 'PedidosProveedor_Detalles_ID' InPrimaryKey = True end item Name = 'ID_PEDIDO' DataType = datInteger Required = True DictionaryEntry = 'PedidosProveedor_Detalles_ID_PEDIDO' end item Name = 'POSICION' DataType = datInteger DictionaryEntry = 'POSICIONCONCEPTO' end item Name = 'TIPO_DETALLE' DataType = datString Size = 25 DictionaryEntry = 'PedidosProveedor_Detalles_TIPO_DETALLE' end item Name = 'CONCEPTO' DataType = datString Size = 2000 DictionaryEntry = 'PedidosProveedor_Detalles_CONCEPTO' end item Name = 'CANTIDAD' DataType = datInteger Alignment = taRightJustify DictionaryEntry = 'CANTIDAD' end item Name = 'UNIDAD_MEDIDA' DataType = datString Size = 255 DisplayLabel = 'Unidad de medida' DictionaryEntry = 'PedidosProveedor_Detalles_UNIDAD_MEDIDA' end item Name = 'IMPORTE_UNIDAD' DataType = datCurrency DisplayLabel = 'Importe unidad' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_Detalles_IMPORTE_UNIDAD' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_Detalles_IMPORTE_TOTAL' end item Name = 'VISIBLE' DataType = datInteger DictionaryEntry = 'PedidosProveedor_Detalles_VISIBLE' end item Name = 'ID_ARTICULO' DataType = datInteger DictionaryEntry = 'PedidosProveedor_Detalles_ID_ARTICULO' end item Name = 'DESCUENTO' DataType = datFloat DisplayLabel = 'Descuento' DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_Detalles_DESCUENTO' end item Name = 'IMPORTE_PORTE' DataType = datCurrency DisplayLabel = 'Importe porte' Alignment = taRightJustify DictionaryEntry = 'PedidosProveedor_Detalles_IMPORTE_PORTE' end item Name = 'REFERENCIA' DataType = datString Size = 255 DisplayLabel = 'Referencia' DictionaryEntry = 'PedidosProveedor_Detalles_REFERENCIA' end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 DisplayLabel = 'Ref. proveedor' DictionaryEntry = 'PedidosProveedor_Detalles_REFERENCIA_PROVEEDOR' end item Name = 'REFERENCIA_FABRICANTE' DataType = datString Size = 255 DisplayLabel = 'Ref. fabricante' DictionaryEntry = 'PedidosProveedor_Detalles_REFERENCIA_FABRICANTE' end> Params = <> MasterMappingMode = mmWhere StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_PedidosProveedor MasterSource = ds_PedidosProveedor MasterFields = 'ID' DetailFields = 'ID_PEDIDO' DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'PedidosProveedor_Detalles' IndexDefs = <> Left = 296 Top = 88 end object ds_PedidosProveedor_Detalles: TDADataSource DataSet = tbl_PedidosProveedor_Detalles.Dataset DataTable = tbl_PedidosProveedor_Detalles Left = 296 Top = 32 end end