inherited DataModuleFacturasProveedor: TDataModuleFacturasProveedor OnCreate = DAClientDataModuleCreate Height = 318 Width = 518 object RORemoteService: TRORemoteService Message = dmConexion.ROMessage Channel = dmConexion.ROChannel ServiceName = 'srvFacturasProveedor' Left = 48 Top = 24 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 84 end object rda_FacturasProveedor: TDARemoteDataAdapter DataStreamer = Bin2DataStreamer GetSchemaCall.RemoteService = RORemoteService GetDataCall.RemoteService = RORemoteService UpdateDataCall.RemoteService = RORemoteService GetScriptsCall.RemoteService = RORemoteService RemoteService = RORemoteService Left = 51 Top = 151 end object tbl_FacturasProveedor: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_FACTURAS_PROVEEDOR_ID' Required = True ServerAutoRefresh = True DictionaryEntry = 'FacturasProveedor_ID' InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger DictionaryEntry = 'FacturasProveedor_ID_EMPRESA' end item Name = 'REFERENCIA' DataType = datString Size = 20 DisplayLabel = 'Referencia' DictionaryEntry = 'FacturasProveedor_REFERENCIA' end item Name = 'TIPO' DataType = datString Size = 1 DisplayLabel = 'Tipo' DictionaryEntry = 'FacturasProveedor_TIPO' end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 DictionaryEntry = 'FacturasProveedor_REFERENCIA_PROVEEDOR' end item Name = 'FECHA_FACTURA' DataType = datDateTime DisplayLabel = 'Fecha de las factura' DictionaryEntry = 'FacturasProveedor_FECHA_FACTURA' end item Name = 'FECHA_RECEPCION' DataType = datDateTime DisplayLabel = 'FacturasProveedor_FECHA_RECEPCION' DictionaryEntry = 'FacturasProveedor_FECHA_RECEPCION' end item Name = 'FECHA_VENCIMIENTO' DataType = datDateTime DisplayLabel = 'Fecha de vencimiento' DictionaryEntry = 'FacturasProveedor_FECHA_VENCIMIENTO' end item Name = 'SITUACION' DataType = datString Size = 255 DisplayLabel = 'Situaci'#243'n' DictionaryEntry = 'FacturasProveedor_SITUACION' end item Name = 'BASE_IMPONIBLE' DataType = datCurrency DisplayLabel = 'Base imponible' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_BASE_IMPONIBLE' end item Name = 'DESCUENTO' DataType = datFloat DisplayLabel = 'Dto.' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_DESCUENTO' end item Name = 'IMPORTE_DESCUENTO' DataType = datCurrency DisplayLabel = 'Importe dto.' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_IMPORTE_DESCUENTO' end item Name = 'IVA' DataType = datFloat Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_IVA' end item Name = 'IMPORTE_IVA' DataType = datCurrency DisplayLabel = 'Importe IVA' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_IMPORTE_IVA' end item Name = 'RETENCION' DataType = datFloat DisplayLabel = 'Retenci'#243'n' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_RETENCION' end item Name = 'IMPORTE_RETENCION' DataType = datCurrency DisplayLabel = 'Importe retenci'#243'n' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_IMPORTE_RETENCION' end item Name = 'RE' DataType = datFloat Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_RE' end item Name = 'IMPORTE_RE' DataType = datCurrency DisplayLabel = 'Importe RE' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_IMPORTE_RE' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_IMPORTE_TOTAL' end item Name = 'OBSERVACIONES' DataType = datMemo DisplayLabel = 'Observaciones' DictionaryEntry = 'FacturasProveedor_OBSERVACIONES' end item Name = 'ID_PROVEEDOR' DataType = datInteger DisplayLabel = 'FacturasProveedor_ID_PROVEEDOR' DictionaryEntry = 'FacturasProveedor_ID_PROVEEDOR' end item Name = 'NIF_CIF' DataType = datString Size = 15 DisplayLabel = 'NIF/CIF' DictionaryEntry = 'FacturasProveedor_NIF_CIF' end item Name = 'NOMBRE' DataType = datString Size = 100 DisplayLabel = 'Cliente' DictionaryEntry = 'FacturasProveedor_NOMBRE' end item Name = 'CALLE' DataType = datString Size = 150 DisplayLabel = 'Direcci'#243'n' DictionaryEntry = 'FacturasProveedor_CALLE' end item Name = 'POBLACION' DataType = datString Size = 150 DisplayLabel = 'Poblaci'#243'n' DictionaryEntry = 'FacturasProveedor_POBLACION' end item Name = 'PROVINCIA' DataType = datString Size = 30 DisplayLabel = 'Provincia' DictionaryEntry = 'FacturasProveedor_PROVINCIA' end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 DisplayLabel = 'C'#243'd. postal' DictionaryEntry = 'FacturasProveedor_CODIGO_POSTAL' end item Name = 'FECHA_ALTA' DataType = datDateTime DictionaryEntry = 'FacturasProveedor_FECHA_ALTA' end item Name = 'FECHA_MODIFICACION' DataType = datDateTime DictionaryEntry = 'FacturasProveedor_FECHA_MODIFICACION' end item Name = 'USUARIO' DataType = datString Size = 100 DictionaryEntry = 'FacturasProveedor_USUARIO' end item Name = 'ID_FORMA_PAGO' DataType = datInteger DisplayLabel = 'FacturasProveedor_ID_FORMA_PAGO' DictionaryEntry = 'FacturasProveedor_ID_FORMA_PAGO' end item Name = 'RECARGO_EQUIVALENCIA' DataType = datSmallInt DisplayLabel = #191'Con R.E.?' DictionaryEntry = 'FacturasProveedor_RECARGO_EQUIVALENCIA' end item Name = 'ID_TIPO_IVA' DataType = datInteger DictionaryEntry = 'FacturasProveedor_ID_TIPO_IVA' end item Name = 'IMPORTE_NETO' DataType = datCurrency DisplayLabel = 'Importe neto' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_IMPORTE_NETO' end item Name = 'IMPORTE_PORTE' DataType = datCurrency DisplayLabel = 'Importe del porte' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_IMPORTE_PORTE' end item Name = 'DATOS_BANCARIOS' DataType = datString Size = 255 DisplayLabel = 'Datos bancarios' DictionaryEntry = 'FacturasProveedor_DATOS_BANCARIOS' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_FacturasProveedor LogicalName = 'FacturasProveedor' IndexDefs = <> Left = 208 Top = 32 end object ds_FacturasProveedor: TDADataSource DataSet = tbl_FacturasProveedor.Dataset DataTable = tbl_FacturasProveedor Left = 208 Top = 104 end object tbl_FacturasProveedor_Detalles: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID_TIPO_IVA' DataType = datInteger DictionaryEntry = 'FacturasProveedor_Detalles_ID_TIPO_IVA' end item Name = 'IVA' DataType = datFloat Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_Detalles_IVA' end item Name = 'IMPORTE_IVA' DataType = datCurrency DisplayLabel = 'Importe IVA' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_Detalles_IMPORTE_IVA' end item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_FACTURA_PROV_DETALLES_ID' Required = True ServerAutoRefresh = True DictionaryEntry = 'FacturasProveedor_Detalles_ID' InPrimaryKey = True end item Name = 'ID_FACTURA' DataType = datInteger DictionaryEntry = 'FacturasProveedor_Detalles_ID_FACTURA' end item Name = 'POSICION' DataType = datInteger DisplayLabel = 'Posici'#243'n' DictionaryEntry = 'FacturasProveedor_Detalles_POSICION' end item Name = 'TIPO_DETALLE' DataType = datString Size = 25 DisplayLabel = 'Tipo detalle' DictionaryEntry = 'FacturasProveedor_Detalles_TIPO_DETALLE' end item Name = 'CONCEPTO' DataType = datString Size = 2000 DisplayLabel = 'Concepto' DictionaryEntry = 'FacturasProveedor_Detalles_CONCEPTO' end item Name = 'CANTIDAD' DataType = datFloat DisplayLabel = 'Cantidad' DictionaryEntry = 'FacturasProveedor_Detalles_CANTIDAD' end item Name = 'UNIDAD_MEDIDA' DataType = datString Size = 255 DisplayLabel = 'FacturasProveedor_Detalles_UNIDAD_MEDIDA' DictionaryEntry = 'FacturasProveedor_Detalles_UNIDAD_MEDIDA' end item Name = 'IMPORTE_UNIDAD' DataType = datCurrency DisplayLabel = 'Importe unidad' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_Detalles_IMPORTE_UNIDAD' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' Alignment = taRightJustify DictionaryEntry = 'FacturasProveedor_Detalles_IMPORTE_TOTAL' end item Name = 'VISIBLE' DataType = datSmallInt DisplayLabel = #191'Visible?' DictionaryEntry = 'FacturasProveedor_Detalles_VISIBLE' end item Name = 'ID_ARTICULO' DataType = datInteger DictionaryEntry = 'FacturasProveedor_Detalles_ID_ARTICULO' end item Name = 'DESCUENTO' DataType = datFloat DictionaryEntry = 'FacturasProveedor_Detalles_DESCUENTO' end item Name = 'IMPORTE_PORTE' DataType = datCurrency DictionaryEntry = 'FacturasProveedor_Detalles_IMPORTE_PORTE' end item Name = 'REFERENCIA' DataType = datString Size = 255 DictionaryEntry = 'FacturasProveedor_Detalles_REFERENCIA' end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 DictionaryEntry = 'FacturasProveedor_Detalles_REFERENCIA_PROVEEDOR' end item Name = 'REFERENCIA_FABRICANTE' DataType = datString Size = 255 DisplayLabel = 'FacturasProveedor_Detalles_REFERENCIA_FABRICANTE' DictionaryEntry = 'FacturasProveedor_Detalles_REFERENCIA_FABRICANTE' end> Params = <> MasterMappingMode = mmWhere StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_FacturasProveedor MasterSource = ds_FacturasProveedor MasterFields = 'ID' DetailFields = 'ID_FACTURA' LogicalName = 'FacturasProveedor_Detalles' IndexDefs = <> Left = 368 Top = 32 end object ds_FacturasProveedor_Detalles: TDADataSource DataSet = tbl_FacturasProveedor_Detalles.Dataset DataTable = tbl_FacturasProveedor_Detalles Left = 368 Top = 104 end object tbl_FacturasProveedor_Pedidos: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_PEDIDOS_PROV_PEDIDOS_ID' DictionaryEntry = 'FacturasProveedor_Pedidos_ID' InPrimaryKey = True end item Name = 'ID_FACTURA' DataType = datInteger DisplayLabel = 'FacturasProveedor_Pedidos_ID_FACTURA' DictionaryEntry = 'FacturasProveedor_Pedidos_ID_FACTURA' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' DictionaryEntry = 'FacturasProveedor_Pedidos_IMPORTE_TOTAL' end item Name = 'ID_PEDIDO' DataType = datInteger DisplayLabel = 'FacturasProveedor_Pedidos_ID_PEDIDO' DictionaryEntry = 'FacturasProveedor_Pedidos_ID_PEDIDO' end item Name = 'REFERENCIA' DataType = datString Size = 255 DisplayLabel = 'Ref. pedido' DictionaryEntry = 'FacturasProveedor_Pedidos_REFERENCIA' end item Name = 'FECHA_PEDIDO' DataType = datDateTime DisplayLabel = 'Fecha' DictionaryEntry = 'FacturasProveedor_Pedidos_FECHA_PEDIDO' end item Name = 'PROVEEDOR' DataType = datString Size = 255 DisplayLabel = 'Proveedor' DictionaryEntry = 'FacturasProveedor_Pedidos_PROVEEDOR' end> Params = <> MasterMappingMode = mmWhere StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_FacturasProveedor MasterSource = ds_FacturasProveedor MasterFields = 'ID' DetailFields = 'ID_FACTURA' LogicalName = 'FacturasProveedor_Pedidos' IndexDefs = <> Left = 368 Top = 168 end object ds_FacturasProveedor_Pedidos: TDADataSource DataSet = tbl_FacturasProveedor_Pedidos.Dataset DataTable = tbl_FacturasProveedor_Pedidos Left = 368 Top = 232 end object tbl_ListaAnosFacturas: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ANO' DataType = datString Size = 254 end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_FacturasProveedor LogicalName = 'ListaAnosFacturas' IndexDefs = <> Left = 208 Top = 208 end object ds_ListaAnosFacturas: TDADataSource DataSet = tbl_ListaAnosFacturas.Dataset DataTable = tbl_ListaAnosFacturas Left = 208 Top = 160 end end