object RptComisiones: TRptComisiones OldCreateOrder = True OnCreate = DataModuleCreate Height = 405 Width = 630 object DADataCabecera: TDADataSource DataSet = tbl_Comisiones.Dataset DataTable = tbl_Comisiones Left = 264 Top = 72 end object tbl_Comisiones: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datInteger Required = True InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger end item Name = 'REFERENCIA' DataType = datString Size = 255 end item Name = 'ID_AGENTE' DataType = datInteger end item Name = 'DESCRIPCION' DataType = datString Size = 255 end item Name = 'FECHA' DataType = datDateTime end item Name = 'IMPORTE_TOTAL' DataType = datCurrency end item Name = 'USUARIO' DataType = datString Size = 30 end item Name = 'NOMBRE' DataType = datString Size = 255 end> Params = < item Name = 'ID' Value = '' ParamType = daptInput end> MasterMappingMode = mmDataRequest LogChanges = False StreamingOptions = [soDisableEventsWhileStreaming] RemoteFetchEnabled = False LocalSchema = schReport LocalDataStreamer = Bin2DataStreamer LogicalName = 'InformeComisiones' IndexDefs = <> Left = 264 Top = 128 end object frxRichObject1: TfrxRichObject Left = 48 Top = 296 end object frxBarCodeObject1: TfrxBarCodeObject Left = 144 Top = 296 end object frxOLEObject1: TfrxOLEObject Left = 48 Top = 344 end object frxCrossObject1: TfrxCrossObject Left = 144 Top = 344 end object frxCheckBoxObject1: TfrxCheckBoxObject Left = 256 Top = 296 end object frxGradientObject1: TfrxGradientObject Left = 360 Top = 296 end object frxChartObject1: TfrxChartObject Left = 256 Top = 344 end object schReport: TDASchema ConnectionManager = dmServer.ConnectionManager DataDictionary = DataDictionary Datasets = < item Params = < item Name = 'ID' Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'COMISIONES_LIQ_VENDEDORES' Name = 'IBX' SQL = 'SELECT '#10' ID, ID_COMISION, ID_VENDEDOR, NOMBRE, COMISION, IMPO' + 'RTE_TOTAL'#10' FROM'#10' COMISIONES_LIQ_VENDEDORES'#10' WHERE ID_COMISI' + 'ON = :ID'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_COMISION' TableField = 'ID_COMISION' end item DatasetField = 'ID_VENDEDOR' TableField = 'ID_VENDEDOR' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end item DatasetField = 'COMISION' TableField = 'COMISION' end item DatasetField = 'IMPORTE_TOTAL' TableField = 'IMPORTE_TOTAL' end> end> Name = 'InformeComisionesVendedores' Fields = < item Name = 'ID' DataType = datInteger Required = True InPrimaryKey = True end item Name = 'ID_COMISION' DataType = datInteger end item Name = 'ID_VENDEDOR' DataType = datInteger end item Name = 'NOMBRE' DataType = datString Size = 255 end item Name = 'COMISION' DataType = datFloat end item Name = 'IMPORTE_TOTAL' DataType = datCurrency end> end item Params = < item Name = 'ID' Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'V_AGEN_COM_DET_AGRU' Name = 'IBX' SQL = 'SELECT'#10' V.ID_EMPRESA,'#10' V.ID_FACTURA,'#10' V.COMISION,'#10' V' + '.FECHA_FACTURA,'#10' V.REFERENCIA,'#10' V.COMISION_LIQUIDADA,'#10' ' + 'V.ID_CLIENTE,'#10' V.ID_AGENTE,'#10' CONTACTOS1.NOMBRE as AGENTE,'#10 + ' CONTACTOS2.NOMBRE as CLIENTE,'#10#10' V.IMPORTE_COMISIONABLE,'#10' ' + ' V.IMPORTE_COMISION'#10#10'from V_AGEN_COM_DET_AGRU as V'#10'LEFT JOIN C' + 'ONTACTOS CONTACTOS1 ON (CONTACTOS1.ID = V.ID_AGENTE)'#10'LEFT JOIN C' + 'ONTACTOS CONTACTOS2 ON (CONTACTOS2.ID = V.ID_CLIENTE)'#10'WHERE V.CO' + 'MISION_LIQUIDADA = :ID'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end item DatasetField = 'ID_CLIENTE' TableField = 'ID_CLIENTE' end item DatasetField = 'ID_AGENTE' TableField = 'ID_AGENTE' end item DatasetField = 'ID_FACTURA' TableField = 'ID_FACTURA' end item DatasetField = 'COMISION' TableField = 'COMISION' end item DatasetField = 'IMPORTE_COMISIONABLE' TableField = '' SQLOrigin = 'IMPORTE_COMISIONABLE' end item DatasetField = 'IMPORTE_COMISION' TableField = 'IMPORTE_COMISION' end item DatasetField = 'AGENTE' TableField = 'AGENTE' end item DatasetField = 'CLIENTE' TableField = 'CLIENTE' end item DatasetField = 'FECHA_FACTURA' TableField = 'FECHA_FACTURA' end item DatasetField = 'COMISION_LIQUIDADA' TableField = 'COMISION_LIQUIDADA' end> end> Name = 'InformeFacturasComision' Fields = < item Name = 'ID_EMPRESA' DataType = datInteger end item Name = 'ID_FACTURA' DataType = datInteger end item Name = 'COMISION' DataType = datFloat end item Name = 'FECHA_FACTURA' DataType = datDateTime end item Name = 'REFERENCIA' DataType = datString Size = 255 end item Name = 'COMISION_LIQUIDADA' DataType = datInteger end item Name = 'ID_CLIENTE' DataType = datInteger end item Name = 'ID_AGENTE' DataType = datInteger end item Name = 'AGENTE' DataType = datString Size = 255 end item Name = 'CLIENTE' DataType = datString Size = 255 end item Name = 'IMPORTE_COMISIONABLE' DataType = datCurrency end item Name = 'IMPORTE_COMISION' DataType = datFloat end> end item Params = < item Name = 'ID' Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'V_AGENTES_COMISIONES' SQL = 'SELECT *'#10' FROM'#10' V_AGENTES_COMISIONES'#10' WHERE ID = :ID'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end item DatasetField = 'ID_AGENTE' TableField = 'ID_AGENTE' end item DatasetField = 'DESCRIPCION' TableField = 'DESCRIPCION' end item DatasetField = 'FECHA' TableField = 'FECHA' end item DatasetField = 'IMPORTE_TOTAL' TableField = 'IMPORTE_TOTAL' end item DatasetField = 'USUARIO' TableField = 'USUARIO' end item DatasetField = 'NOMBRE' TableField = '' SQLOrigin = 'NOMBRE' end> end> Name = 'InformeComisiones' Fields = < item Name = 'ID' DataType = datInteger Required = True InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger end item Name = 'REFERENCIA' DataType = datString Size = 255 end item Name = 'ID_AGENTE' DataType = datInteger end item Name = 'DESCRIPCION' DataType = datString Size = 255 end item Name = 'FECHA' DataType = datDateTime end item Name = 'IMPORTE_TOTAL' DataType = datCurrency end item Name = 'USUARIO' DataType = datString Size = 30 end item Name = 'NOMBRE' DataType = datString Size = 255 end> end item Params = <> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'V_AGEN_COMI_DET' SQL = 'select'#10' V.ID_EMPRESA,'#10' V.ID_FACTURA,'#10' V.FECHA,'#10' V.RE' + 'FERENCIA,'#10' V.ID_COMISION_LIQUIDADA,'#10' V.ID_CLIENTE,'#10' V.I' + 'D_AGENTE,'#10' V.ID_ARTICULO,'#10' V.ARTICULO,'#10' V.CONCEPTO_FACT' + 'URA,'#10' V.CANTIDAD,'#10' V.IMPORTE_COMISIONABLE,'#10' V.COMISION,' + #10' V.IMPORTE_COMISION'#10#10'from V_AGEN_COMI_DET_FAC_CAL as V'#10'WHERE' + ' {where}'#10#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end item DatasetField = 'ID_COMISION_LIQUIDADA' TableField = 'ID_COMISION_LIQUIDADA' end item DatasetField = 'ID_CLIENTE' TableField = 'ID_CLIENTE' end item DatasetField = 'ID_AGENTE' TableField = 'ID_AGENTE' end item DatasetField = 'ID_FACTURA' TableField = 'ID_FACTURA' end item DatasetField = 'COMISION' TableField = 'COMISION' end item DatasetField = 'IMPORTE_COMISION' TableField = 'IMPORTE_COMISION' end item DatasetField = 'FECHA' TableField = 'FECHA' end item DatasetField = 'ID_ARTICULO' TableField = 'ID_ARTICULO' end item DatasetField = 'CONCEPTO_FACTURA' TableField = 'CONCEPTO_FACTURA' end item DatasetField = 'CANTIDAD' TableField = 'CANTIDAD' end item DatasetField = 'ARTICULO' TableField = '' SQLOrigin = 'ARTICULO' end> end> Name = 'InformeFacturasComisionDesglosado' Fields = < item Name = 'ID_EMPRESA' DataType = datInteger end item Name = 'ID_FACTURA' DataType = datInteger end item Name = 'FECHA' DataType = datDateTime end item Name = 'REFERENCIA' DataType = datString Size = 255 end item Name = 'ID_COMISION_LIQUIDADA' DataType = datInteger end item Name = 'ID_CLIENTE' DataType = datInteger end item Name = 'ID_AGENTE' DataType = datInteger end item Name = 'ID_ARTICULO' DataType = datInteger end item Name = 'ARTICULO' DataType = datString Size = 1025 end item Name = 'CONCEPTO_FACTURA' DataType = datString Size = 2000 end item Name = 'CANTIDAD' DataType = datCurrency end item Name = 'IMPORTE_COMISIONABLE' DataType = datCurrency end item Name = 'COMISION' DataType = datFloat end item Name = 'IMPORTE_COMISION' DataType = datFloat end> end> JoinDataTables = <> UnionDataTables = <> Commands = <> RelationShips = <> UpdateRules = <> Version = 0 Left = 48 Top = 16 end object DataDictionary: TDADataDictionary Fields = < item Name = 'FacturasCliente_ID' DataType = datAutoInc Required = True DisplayLabel = 'ID' end item Name = 'FacturasCliente_ID_EMPRESA' DataType = datInteger DisplayLabel = 'ID_EMPRESA' end item Name = 'FacturasCliente_ID_CONTRATO' DataType = datInteger DisplayLabel = 'ID_CONTRATO' end item Name = 'FacturasCliente_FECHA_FACTURA' DataType = datDateTime DisplayLabel = 'Fecha de las factura' end item Name = 'FacturasCliente_VENCIMIENTO' DataType = datInteger DisplayLabel = 'Vencimiento' end item Name = 'FacturasCliente_SITUACION' DataType = datString Size = 255 DisplayLabel = 'Situaci'#243'n' end item Name = 'FacturasCliente_BASE_IMPONIBLE' DataType = datFloat DisplayLabel = 'Base imponible' Alignment = taRightJustify end item Name = 'FacturasCliente_IMPORTE_DESCUENTO' DataType = datFloat DisplayLabel = 'Importe dto.' Alignment = taRightJustify end item Name = 'FacturasCliente_IMPORTE_IVA' DataType = datFloat DisplayLabel = 'Importe IVA' Alignment = taRightJustify end item Name = 'FacturasCliente_IMPORTE_TOTAL' DataType = datFloat DisplayLabel = 'Importe total' Alignment = taRightJustify end item Name = 'FacturasCliente_FORMA_PAGO' DataType = datMemo DisplayLabel = 'Forma de pago' end item Name = 'FacturasCliente_ID_CLIENTE' DataType = datInteger DisplayLabel = 'ID_CLIENTE' end item Name = 'FacturasCliente_NIF_CIF' DataType = datString Size = 15 DisplayLabel = 'NIF/CIF' end item Name = 'FacturasCliente_CODIGO_POSTAL' DataType = datString Size = 10 DisplayLabel = 'C'#243'd. postal' end item Name = 'FacturasCliente_FECHA_ALTA' DataType = datDateTime DisplayLabel = 'FECHA_ALTA' end item Name = 'FacturasCliente_FECHA_MODIFICACION' DataType = datDateTime DisplayLabel = 'FECHA_MODIFICACION' end item Name = 'FacturasCliente_OBSERVACIONES' DataType = datMemo DisplayLabel = 'Observaciones' end item Name = 'FacturasCliente_NOMBRE' DataType = datString Size = 100 DisplayLabel = 'Cliente' end item Name = 'FacturasCliente_CALLE' DataType = datString Size = 150 DisplayLabel = 'Direcci'#243'n' end item Name = 'FacturasCliente_PROVINCIA' DataType = datString Size = 30 DisplayLabel = 'Provincia' end item Name = 'FacturasCliente_POBLACION' DataType = datString Size = 150 DisplayLabel = 'Poblaci'#243'n' end item Name = 'FacturasCliente_IVA' DataType = datFloat DisplayLabel = 'IVA' end item Name = 'FacturasCliente_USUARIO' DataType = datString Size = 100 DisplayLabel = 'USUARIO' end item Name = 'FacturasCliente_REFERENCIA' DataType = datString Size = 20 DisplayLabel = 'Referencia' end item Name = 'FacturasCliente_DESCUENTO' DataType = datFloat DisplayLabel = 'Dto.' end item Name = 'FacturasCliente_Detalles_ID' DataType = datAutoInc Required = True DisplayLabel = 'ID' end item Name = 'FacturasCliente_Detalles_ID_FACTURA' DataType = datInteger DisplayLabel = 'ID_FACTURA' end item Name = 'FacturasCliente_Detalles_TIPO_DETALLE' DataType = datString Size = 10 DisplayLabel = 'Tipo detalle' end item Name = 'FacturasCliente_Detalles_CONCEPTO' DataType = datString Size = 2000 DisplayLabel = 'Concepto' end item Name = 'FacturasCliente_Detalles_IMPORTE_UNIDAD' DataType = datFloat DisplayLabel = 'Importe unidad' Alignment = taRightJustify end item Name = 'FacturasCliente_Detalles_IMPORTE_TOTAL' DataType = datFloat DisplayLabel = 'Importe total' Alignment = taRightJustify end item Name = 'FacturasCliente_Detalles_VISIBLE' DataType = datInteger DisplayLabel = #191'Visible?' end item Name = 'FacturasCliente_Detalles_POSICION' DataType = datInteger DisplayLabel = 'Posici'#243'n' end item Name = 'FacturasCliente_Detalles_CANTIDAD' DataType = datInteger DisplayLabel = 'Cantidad' end> Left = 46 Top = 150 end object frxReport: TfrxReport Version = '4.8.11' DotMatrixReport = False IniFile = '\Software\Fast Reports' PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick] PreviewOptions.Zoom = 1.000000000000000000 PrintOptions.Printer = 'Por defecto' PrintOptions.PrintOnSheet = 0 ReportOptions.CreateDate = 45251.652106296300000000 ReportOptions.LastChange = 45504.781716215280000000 ScriptLanguage = 'PascalScript' ShowProgress = False StoreInDFM = False Left = 169 Top = 16 end object frxDBCabecera: TfrxDBDataset UserName = 'frxDBCabecera' CloseDataSource = False DataSource = DADataCabecera BCDToCurrency = False Left = 264 Top = 16 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 80 end object frxDBDetalles2: TfrxDBDataset UserName = 'frxDBDetalles2' CloseDataSource = False DataSource = DADataDetalles2 BCDToCurrency = False Left = 512 Top = 216 end object DADataDetalles2: TDADataSource DataSet = tbl_Vendedores.Dataset DataTable = tbl_Vendedores Left = 512 Top = 272 end object tbl_Vendedores: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datInteger Required = True InPrimaryKey = True end item Name = 'ID_COMISION' DataType = datInteger end item Name = 'ID_VENDEDOR' DataType = datInteger end item Name = 'NOMBRE' DataType = datString Size = 255 end item Name = 'COMISION' DataType = datFloat end item Name = 'IMPORTE_TOTAL' DataType = datCurrency end> Params = < item Name = 'ID' Value = '' ParamType = daptInput end> MasterMappingMode = mmDataRequest LogChanges = False StreamingOptions = [soDisableEventsWhileStreaming] RemoteFetchEnabled = False LocalSchema = schReport LocalDataStreamer = Bin2DataStreamer LogicalName = 'InformeComisionesVendedores' IndexDefs = <> Left = 512 Top = 328 end object tbl_FacturasComision: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID_EMPRESA' DataType = datInteger end item Name = 'ID_FACTURA' DataType = datInteger end item Name = 'COMISION' DataType = datFloat end item Name = 'FECHA_FACTURA' DataType = datDateTime end item Name = 'REFERENCIA' DataType = datString Size = 255 end item Name = 'COMISION_LIQUIDADA' DataType = datInteger end item Name = 'ID_CLIENTE' DataType = datInteger end item Name = 'ID_AGENTE' DataType = datInteger end item Name = 'AGENTE' DataType = datString Size = 255 end item Name = 'CLIENTE' DataType = datString Size = 255 end item Name = 'IMPORTE_COMISIONABLE' DataType = datCurrency end item Name = 'IMPORTE_COMISION' DataType = datFloat end> Params = < item Name = 'ID' Value = '' ParamType = daptInput end> MasterMappingMode = mmDataRequest LogChanges = False StreamingOptions = [soDisableEventsWhileStreaming] RemoteFetchEnabled = False LocalSchema = schReport LocalDataStreamer = Bin2DataStreamer LogicalName = 'InformeFacturasComision' IndexDefs = <> Left = 368 Top = 128 end object DADataDetalles: TDADataSource DataSet = tbl_FacturasComision.Dataset DataTable = tbl_FacturasComision Left = 368 Top = 72 end object frxDBDetalles: TfrxDBDataset UserName = 'frxDBDetalles' CloseDataSource = False DataSource = DADataDetalles BCDToCurrency = False Left = 368 Top = 16 end object tbl_FacturasComisionDesglosado: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID_EMPRESA' DataType = datInteger end item Name = 'ID_FACTURA' DataType = datInteger end item Name = 'FECHA' DataType = datDateTime end item Name = 'REFERENCIA' DataType = datString Size = 255 end item Name = 'ID_COMISION_LIQUIDADA' DataType = datInteger end item Name = 'ID_CLIENTE' DataType = datInteger end item Name = 'ID_AGENTE' DataType = datInteger end item Name = 'ID_ARTICULO' DataType = datInteger end item Name = 'ARTICULO' DataType = datString Size = 1025 end item Name = 'CONCEPTO_FACTURA' DataType = datString Size = 2000 end item Name = 'CANTIDAD' DataType = datCurrency end item Name = 'IMPORTE_COMISIONABLE' DataType = datCurrency end item Name = 'COMISION' DataType = datFloat end item Name = 'IMPORTE_COMISION' DataType = datFloat end> Params = <> MasterMappingMode = mmWhere LogChanges = False StreamingOptions = [soDisableEventsWhileStreaming] RemoteFetchEnabled = False LocalSchema = schReport LocalDataStreamer = Bin2DataStreamer MasterSource = DADataDetalles MasterFields = 'ID_FACTURA' DetailFields = 'ID_FACTURA' LogicalName = 'InformeFacturasComisionDesglosado' IndexDefs = <> Left = 504 Top = 128 end object DADataDetalles3: TDADataSource DataSet = tbl_FacturasComisionDesglosado.Dataset DataTable = tbl_FacturasComisionDesglosado Left = 504 Top = 72 end object frxDBDetalles3: TfrxDBDataset UserName = 'frxDBDetalles3' CloseDataSource = False DataSource = DADataDetalles3 BCDToCurrency = False Left = 504 Top = 16 end end