inherited DataModuleRecibosProveedor: TDataModuleRecibosProveedor OnCreate = DAClientDataModuleCreate Height = 362 Width = 518 object RORemoteService: TRORemoteService Message = dmConexion.ROMessage Channel = dmConexion.ROChannel ServiceName = 'srvRecibosProveedor' Left = 48 Top = 24 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 84 end object rda_RecibosProveedor: TDARemoteDataAdapter DataStreamer = Bin2DataStreamer GetSchemaCall.RemoteService = RORemoteService GetDataCall.RemoteService = RORemoteService UpdateDataCall.RemoteService = RORemoteService GetScriptsCall.RemoteService = RORemoteService RemoteService = RORemoteService Left = 51 Top = 151 end object tbl_PagosProveedor: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_PAGOS_PROVEEDOR_ID' Required = True DictionaryEntry = 'PagosProveedor_ID' InPrimaryKey = True end item Name = 'ID_RECIBO' DataType = datInteger DisplayLabel = 'PagosCliente_ID_RECIBO' DictionaryEntry = 'PagosProveedor_ID_RECIBO' end item Name = 'TIPO' DataType = datString Size = 255 DisplayLabel = 'PagosCliente_TIPO' DictionaryEntry = 'PagosProveedor_TIPO' end item Name = 'FECHA_PAGO' DataType = datDateTime DisplayLabel = 'PagosCliente_FECHA_PAGO' DictionaryEntry = 'PagosProveedor_FECHA_PAGO' end item Name = 'TITULAR' DataType = datString Size = 255 DisplayLabel = 'PagosCliente_TITULAR' DictionaryEntry = 'PagosProveedor_TITULAR' end item Name = 'ENTIDAD' DataType = datString Size = 15 DisplayLabel = 'PagosCliente_ENTIDAD' DictionaryEntry = 'PagosProveedor_ENTIDAD' end item Name = 'SUCURSAL' DataType = datString Size = 15 end item Name = 'DC' DataType = datString Size = 15 DisplayLabel = 'PagosCliente_DC' DictionaryEntry = 'PagosProveedor_DC' end item Name = 'CUENTA' DataType = datString Size = 15 DisplayLabel = 'PagosCliente_CUENTA' DictionaryEntry = 'PagosProveedor_CUENTA' end item Name = 'FECHA_ALTA' DataType = datDateTime DisplayLabel = 'PagosCliente_FECHA_ALTA' DictionaryEntry = 'PagosProveedor_FECHA_ALTA' end item Name = 'FECHA_MODIFICACION' DataType = datDateTime DisplayLabel = 'PagosCliente_FECHA_MODIFICACION' DictionaryEntry = 'PagosProveedor_FECHA_MODIFICACION' end item Name = 'USUARIO' DataType = datString Size = 20 DisplayLabel = 'PagosCliente_USUARIO' DictionaryEntry = 'PagosProveedor_USUARIO' end item Name = 'IGNORAR_CONTABILIDAD' DataType = datSmallInt end item Name = 'ID_SUBCUENTA' DataType = datInteger end item Name = 'SUBCUENTA' DataType = datString Size = 255 end item Name = 'ID_EJERCICIO' DataType = datInteger end item Name = 'ESTADO_EJERCICIO' DataType = datString Size = 255 end item Name = 'ASIENTO_PUNTEADO' DataType = datSmallInt end> Params = <> MasterMappingMode = mmWhere StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_RecibosProveedor MasterSource = ds_RecibosProveedor MasterFields = 'ID' DetailFields = 'ID_RECIBO' LogicalName = 'PagosProveedor' IndexDefs = <> Left = 288 Top = 96 end object ds_PagosProveedor: TDADataSource DataSet = tbl_PagosProveedor.Dataset DataTable = tbl_PagosProveedor Left = 288 Top = 40 end object tbl_RecibosCompensadosProv: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datInteger Required = True ServerAutoRefresh = True InPrimaryKey = True end item Name = 'ID_RECIBO_COMPENSADO' DataType = datInteger end item Name = 'REFERENCIA_REC_COMPENSADO' DataType = datString Size = 255 end item Name = 'REFERENCIA' DataType = datString Size = 255 end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 end item Name = 'SITUACION' DataType = datString Size = 9 end item Name = 'ID_FACTURA' DataType = datInteger end item Name = 'REFERENCIA_FACTURA_PROV' DataType = datString Size = 255 end item Name = 'FECHA_FACTURA' DataType = datDateTime end item Name = 'FORMA_PAGO_FACTURA' DataType = datString Size = 255 end item Name = 'IMPORTE_FACTURA' DataType = datCurrency end item Name = 'ID_REMESA' DataType = datInteger end item Name = 'REFERENCIA_REMESA' DataType = datString Size = 255 end item Name = 'FECHA_EMISION' DataType = datDateTime end item Name = 'FECHA_VENCIMIENTO' DataType = datDateTime end item Name = 'DESCRIPCION' DataType = datString Size = 255 end item Name = 'OBSERVACIONES' DataType = datString Size = 255 end item Name = 'IMPORTE' DataType = datCurrency end item Name = 'OTROS_GASTOS' DataType = datCurrency end item Name = 'IMPORTE_TOTAL' DataType = datCurrency end item Name = 'ID_EMPRESA' DataType = datInteger end item Name = 'ID_PROVEEDOR' DataType = datInteger end item Name = 'NOMBRE_PROVEEDOR' DataType = datString Size = 255 end item Name = 'NOMBRE_COMERCIAL' DataType = datString Size = 255 end item Name = 'ENTIDAD_PROVEEDOR' DataType = datString Size = 15 end item Name = 'SUCURSAL_PROVEEDOR' DataType = datString Size = 15 end item Name = 'DC_PROVEEDOR' DataType = datString Size = 15 end item Name = 'CUENTA_PROVEEDOR' DataType = datString Size = 15 end item Name = 'NIF_CIF' DataType = datString Size = 15 end item Name = 'NOMBRE' DataType = datString Size = 255 end item Name = 'CALLE' DataType = datString Size = 255 end item Name = 'POBLACION' DataType = datString Size = 255 end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 end item Name = 'PROVINCIA' DataType = datString Size = 255 end item Name = 'FECHA_ALTA' DataType = datDateTime end item Name = 'FECHA_MODIFICACION' DataType = datDateTime end item Name = 'USUARIO' DataType = datString Size = 30 end item Name = 'ID_TIENDA' DataType = datInteger end item Name = 'TIENDA' DataType = datString Size = 255 end> Params = <> MasterMappingMode = mmWhere StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_RecibosProveedor MasterSource = ds_RecibosProveedor MasterFields = 'ID' DetailFields = 'ID_RECIBO_COMPENSADO' LogicalName = 'RecibosCompensadosProv' IndexDefs = <> Left = 424 Top = 96 end object ds_RecibosCompensadosProv: TDADataSource DataSet = tbl_RecibosCompensadosProv.Dataset DataTable = tbl_RecibosCompensadosProv Left = 424 Top = 40 end object tbl_RecibosProveedor: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_RECIBOS_PROVEEDOR_ID' Required = True DictionaryEntry = 'RecibosProveedor_ID' InPrimaryKey = True end item Name = 'ID_RECIBO_COMPENSADO' DataType = datInteger DisplayLabel = 'RecibosProveedor_ID_RECIBO_COMPENSADO' DictionaryEntry = 'RecibosProveedor_ID_RECIBO_COMPENSADO' end item Name = 'REFERENCIA_REC_COMPENSADO' DataType = datString Size = 255 DisplayLabel = 'RecibosProveedor_REFERENCIA_REC_COMPENSADO' DictionaryEntry = 'RecibosProveedor_REFERENCIA_REC_COMPENSADO' end item Name = 'REFERENCIA' DataType = datString Size = 255 DictionaryEntry = 'RecibosProveedor_REFERENCIA' end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 DictionaryEntry = 'RecibosProveedor_REFERENCIA_PROVEEDOR' end item Name = 'SITUACION' DataType = datString Size = 9 ServerAutoRefresh = True DictionaryEntry = 'RecibosProveedor_SITUACION' end item Name = 'ID_FACTURA' DataType = datInteger DictionaryEntry = 'RecibosProveedor_ID_FACTURA' end item Name = 'REFERENCIA_FACTURA_PROV' DataType = datString Size = 255 DisplayLabel = 'Ref. factura prov.' DictionaryEntry = 'RecibosProveedor_REFERENCIA_FACTURA_PROV' end item Name = 'FECHA_FACTURA' DataType = datDateTime DictionaryEntry = 'RecibosProveedor_FECHA_FACTURA' end item Name = 'FORMA_PAGO_FACTURA' DataType = datString Size = 255 DictionaryEntry = 'RecibosProveedor_FORMA_PAGO_FACTURA' end item Name = 'IMPORTE_FACTURA' DataType = datCurrency Alignment = taRightJustify DictionaryEntry = 'RecibosProveedor_IMPORTE_FACTURA' end item Name = 'ID_REMESA' DataType = datInteger DictionaryEntry = 'RecibosProveedor_ID_REMESA' end item Name = 'REFERENCIA_REMESA' DataType = datString Size = 255 DictionaryEntry = 'RecibosProveedor_REFERENCIA_REMESA' end item Name = 'FECHA_EMISION' DataType = datDateTime DisplayLabel = 'RecibosCliente_FECHA_EMISION' DictionaryEntry = 'RecibosProveedor_FECHA_EMISION' end item Name = 'FECHA_VENCIMIENTO' DataType = datDateTime DictionaryEntry = 'RecibosProveedor_FECHA_VENCIMIENTO' end item Name = 'DESCRIPCION' DataType = datString Size = 255 DictionaryEntry = 'RecibosProveedor_DESCRIPCION' end item Name = 'OBSERVACIONES' DataType = datString Size = 255 DictionaryEntry = 'RecibosProveedor_OBSERVACIONES' end item Name = 'IMPORTE' DataType = datCurrency Alignment = taRightJustify DictionaryEntry = 'RecibosProveedor_IMPORTE' end item Name = 'OTROS_GASTOS' DataType = datCurrency DisplayLabel = 'RecibosCliente_OTROS_GASTOS' Alignment = taRightJustify DictionaryEntry = 'RecibosProveedor_OTROS_GASTOS' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency Alignment = taRightJustify ServerAutoRefresh = True DictionaryEntry = 'RecibosProveedor_IMPORTE_TOTAL' end item Name = 'ID_EMPRESA' DataType = datInteger DictionaryEntry = 'RecibosProveedor_ID_EMPRESA' end item Name = 'ID_PROVEEDOR' DataType = datInteger DisplayLabel = 'RecibosProveedor_ID_PROVEEDOR' DictionaryEntry = 'RecibosProveedor_ID_PROVEEDOR' end item Name = 'NOMBRE_PROVEEDOR' DataType = datString Size = 255 DisplayLabel = 'RecibosProveedor_NOMBRE_PROVEEDOR' ServerAutoRefresh = True DictionaryEntry = 'RecibosProveedor_NOMBRE_PROVEEDOR' end item Name = 'NOMBRE_COMERCIAL' DataType = datString Size = 255 end item Name = 'ENTIDAD_PROVEEDOR' DataType = datString Size = 15 DisplayLabel = 'RecibosProveedor_ENTIDAD_PROVEEDOR' DictionaryEntry = 'RecibosProveedor_ENTIDAD_PROVEEDOR' end item Name = 'SUCURSAL_PROVEEDOR' DataType = datString Size = 15 DisplayLabel = 'RecibosProveedor_SUCURSAL_PROVEEDOR' DictionaryEntry = 'RecibosProveedor_SUCURSAL_PROVEEDOR' end item Name = 'DC_PROVEEDOR' DataType = datString Size = 15 DisplayLabel = 'RecibosProveedor_DC_PROVEEDOR' DictionaryEntry = 'RecibosProveedor_DC_PROVEEDOR' end item Name = 'CUENTA_PROVEEDOR' DataType = datString Size = 15 DisplayLabel = 'RecibosProveedor_CUENTA_PROVEEDOR' DictionaryEntry = 'RecibosProveedor_CUENTA_PROVEEDOR' end item Name = 'NIF_CIF' DataType = datString Size = 15 end item Name = 'NOMBRE' DataType = datString Size = 255 end item Name = 'CALLE' DataType = datString Size = 255 end item Name = 'POBLACION' DataType = datString Size = 255 end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 end item Name = 'PROVINCIA' DataType = datString Size = 255 end item Name = 'FECHA_ALTA' DataType = datDateTime DictionaryEntry = 'RecibosProveedor_FECHA_ALTA' end item Name = 'FECHA_MODIFICACION' DataType = datDateTime DictionaryEntry = 'RecibosProveedor_FECHA_MODIFICACION' end item Name = 'USUARIO' DataType = datString Size = 20 DictionaryEntry = 'RecibosCliente_USUARIO' end item Name = 'ID_TIENDA' DataType = datInteger end item Name = 'TIENDA' DataType = datString Size = 255 end item Name = 'FECHA_PAGO' DataType = datDateTime end item Name = 'SUBCUENTA' DataType = datString Size = 255 end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_RecibosProveedor LogicalName = 'RecibosProveedor' IndexDefs = <> Left = 176 Top = 96 end object ds_RecibosProveedor: TDADataSource DataSet = tbl_RecibosProveedor.Dataset DataTable = tbl_RecibosProveedor Left = 176 Top = 40 end object tbl_ListaAnosRecibos: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ANO' DataType = datString Size = 255 end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_RecibosProveedor LogicalName = 'ListaAnosRecibos' IndexDefs = <> Left = 176 Top = 200 end object ds_ListaAnosRecibos: TDADataSource DataSet = tbl_ListaAnosRecibos.Dataset DataTable = tbl_ListaAnosRecibos Left = 176 Top = 152 end end