object srvComisiones: TsrvComisiones OldCreateOrder = True OnCreate = DARemoteServiceCreate ConnectionName = 'IBX' ServiceSchema = schComisiones ServiceDataStreamer = Bin2DataStreamer ExportedDataTables = <> BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection Height = 180 Width = 386 object schComisiones: TDASchema ConnectionManager = dmServer.ConnectionManager DataDictionary = DataDictionary Diagrams = Diagrams Datasets = < item Params = <> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True Name = 'IBX' SQL = 'select ANO from'#10'(select distinct(substr(FECHA, 1,4)) as ANO'#10'from' + ' comisiones_liquidadas'#10'order by 1 desc)'#10#10'UNION ALL'#10#10'select disti' + 'nct '#39'Todos'#39' as ANO'#10'from empresas'#10#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'ANO' TableField = 'ANO' end> end> Name = 'ListaAnosComisiones' Fields = < item Name = 'ANO' DataType = datString Size = 254 end> end item Params = <> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'V_FACTURAS_CLIENTE' SQL = 'SELECT '#10' ID, ID_EMPRESA, ID_COMISION_LIQUIDADA, REFERENCIA, F' + 'ECHA_FACTURA, FECHA_VENCIMIENTO,'#10' SITUACION, BASE_IMPONIBLE, ' + 'ID_CLIENTE, NIF_CIF, NOMBRE,'#10' ID_AGENTE, COMISION, IMPORTE_CO' + 'MISION'#10' FROM'#10' V_FACTURAS_CLIENTE'#10' WHERE {Where}'#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 = 'FECHA_FACTURA' TableField = 'FECHA_FACTURA' end item DatasetField = 'FECHA_VENCIMIENTO' TableField = 'FECHA_VENCIMIENTO' end item DatasetField = 'SITUACION' TableField = 'SITUACION' end item DatasetField = 'BASE_IMPONIBLE' TableField = 'BASE_IMPONIBLE' end item DatasetField = 'ID_CLIENTE' TableField = 'ID_CLIENTE' end item DatasetField = 'NIF_CIF' TableField = 'NIF_CIF' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end item DatasetField = 'ID_AGENTE' TableField = 'ID_AGENTE' end item DatasetField = 'COMISION' TableField = 'COMISION' end item DatasetField = 'IMPORTE_COMISION' TableField = 'IMPORTE_COMISION' end item DatasetField = 'ID_COMISION_LIQUIDADA' TableField = 'ID_COMISION_LIQUIDADA' end> end> Name = 'FacturasComision' Fields = < item Name = 'ID' DataType = datInteger GeneratorName = 'GEN_FACTURAS_CLIENTE_ID' Required = True ServerAutoRefresh = True InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger DictionaryEntry = 'FacturasCliente_ID_EMPRESA' end item Name = 'ID_COMISION_LIQUIDADA' DataType = datInteger ServerAutoRefresh = True DictionaryEntry = 'FacturasCliente_ID_COMISION_LIQUIDADA' end item Name = 'REFERENCIA' DataType = datString Size = 20 DictionaryEntry = 'FacturasCliente_REFERENCIA' end item Name = 'FECHA_FACTURA' DataType = datDateTime DictionaryEntry = 'FacturasCliente_FECHA_FACTURA' end item Name = 'FECHA_VENCIMIENTO' DataType = datDateTime DictionaryEntry = 'FacturasCliente_FECHA_VENCIMIENTO' end item Name = 'SITUACION' DataType = datString Size = 255 DictionaryEntry = 'FacturasCliente_SITUACION' end item Name = 'BASE_IMPONIBLE' DataType = datCurrency DictionaryEntry = 'FacturasCliente_BASE_IMPONIBLE' end item Name = 'ID_CLIENTE' DataType = datInteger DictionaryEntry = 'FacturasCliente_ID_CLIENTE' end item Name = 'NIF_CIF' DataType = datString Size = 15 DictionaryEntry = 'FacturasCliente_NIF_CIF' end item Name = 'NOMBRE' DataType = datString Size = 100 DictionaryEntry = 'FacturasCliente_NOMBRE' end item Name = 'ID_AGENTE' DataType = datInteger DictionaryEntry = 'FacturasCliente_ID_AGENTE' end item Name = 'COMISION' DataType = datFloat DictionaryEntry = 'FacturasCliente_COMISION' end item Name = 'IMPORTE_COMISION' DataType = datCurrency DecimalPrecision = 11 DecimalScale = 2 DictionaryEntry = 'FacturasCliente_IMPORTE_COMISION' end> end item Params = <> Statements = < item Connection = 'IBX' TargetTable = 'COMISIONES_LIQUIDADAS' SQL = 'SELECT'#10' COMISIONES_LIQUIDADAS.ID, COMISIONES_LIQUIDADAS.ID_EM' + 'PRESA,'#10' COMISIONES_LIQUIDADAS.REFERENCIA, COMISIONES_LIQUIDAD' + 'AS.ID_AGENTE,'#10' CONTACTOS.NOMBRE as AGENTE,'#10' COMISIONES_LIQ' + 'UIDADAS.DESCRIPCION, COMISIONES_LIQUIDADAS.FECHA,'#10' COMISIONES' + '_LIQUIDADAS.IMPORTE_TOTAL, COMISIONES_LIQUIDADAS.USUARIO'#10'FROM CO' + 'MISIONES_LIQUIDADAS'#10'LEFT JOIN CONTACTOS ON (CONTACTOS.ID = COMIS' + 'IONES_LIQUIDADAS.ID_AGENTE)'#10'WHERE {Where}'#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 = 'AGENTE' TableField = '' SQLOrigin = 'AGENTE' end> end> Name = 'Comisiones' Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_COMISIONES_LIQUID_ID' ServerAutoRefresh = True DictionaryEntry = 'Comisiones_ID' InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger DictionaryEntry = 'Comisiones_ID_EMPRESA' end item Name = 'REFERENCIA' DataType = datString Size = 255 DictionaryEntry = 'Comisiones_REFERENCIA' end item Name = 'ID_AGENTE' DataType = datInteger DictionaryEntry = 'Comisiones_ID_AGENTE' end item Name = 'AGENTE' DataType = datString Size = 255 DictionaryEntry = 'Comisiones_AGENTE' end item Name = 'DESCRIPCION' DataType = datString Size = 255 DictionaryEntry = 'Comisiones_DESCRIPCION' end item Name = 'FECHA' DataType = datDateTime DictionaryEntry = 'Comisiones_FECHA' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DictionaryEntry = 'Comisiones_IMPORTE_TOTAL' end item Name = 'USUARIO' DataType = datString Size = 30 DictionaryEntry = 'Comisiones_USUARIO' end> end item Params = < item Name = 'ID_COMISION_LIQUIDADA' DataType = datInteger Value = '' end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'V_FACTURAS_CLIENTE' SQL = 'SELECT'#10' ID, ID_EMPRESA, ID_COMISION_LIQUIDADA, REFERENCIA, FE' + 'CHA_FACTURA, FECHA_VENCIMIENTO,'#10' SITUACION, BASE_IMPONIBLE, I' + 'D_CLIENTE, NIF_CIF, NOMBRE,'#10' ID_AGENTE, COMISION, IMPORTE_COM' + 'ISION'#10' FROM'#10' V_FACTURAS_CLIENTE'#10' WHERE ID_COMISION_LIQUIDAD' + 'A = :ID_COMISION_LIQUIDADA'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'ID_COMISION_LIQUIDADA' TableField = 'ID_COMISION_LIQUIDADA' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end item DatasetField = 'FECHA_FACTURA' TableField = 'FECHA_FACTURA' end item DatasetField = 'FECHA_VENCIMIENTO' TableField = 'FECHA_VENCIMIENTO' end item DatasetField = 'SITUACION' TableField = 'SITUACION' end item DatasetField = 'BASE_IMPONIBLE' TableField = 'BASE_IMPONIBLE' end item DatasetField = 'ID_CLIENTE' TableField = 'ID_CLIENTE' end item DatasetField = 'NIF_CIF' TableField = 'NIF_CIF' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end item DatasetField = 'ID_AGENTE' TableField = 'ID_AGENTE' end item DatasetField = 'COMISION' TableField = 'COMISION' end item DatasetField = 'IMPORTE_COMISION' TableField = 'IMPORTE_COMISION' end> end> Name = 'FacturasComision_Refresh' Fields = < item Name = 'ID' DataType = datInteger ServerAutoRefresh = True InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger end item Name = 'ID_COMISION_LIQUIDADA' DataType = datInteger ServerAutoRefresh = True end item Name = 'REFERENCIA' DataType = datString Size = 255 end item Name = 'FECHA_FACTURA' DataType = datDateTime end item Name = 'FECHA_VENCIMIENTO' DataType = datDateTime end item Name = 'SITUACION' DataType = datString Size = 19 end item Name = 'BASE_IMPONIBLE' DataType = datCurrency end item Name = 'ID_CLIENTE' DataType = datInteger end item Name = 'NIF_CIF' DataType = datString Size = 15 end item Name = 'NOMBRE' DataType = datString Size = 255 end item Name = 'ID_AGENTE' DataType = datInteger end item Name = 'COMISION' DataType = datFloat end item Name = 'IMPORTE_COMISION' DataType = datCurrency end> end item Params = < item Name = 'ID' DataType = datInteger Value = '' end> Statements = < item Connection = 'IBX' TargetTable = 'V_COMISIONES_LIQUIDADAS' SQL = 'SELECT'#10' COMISIONES_LIQUIDADAS.ID, COMISIONES_LIQUIDADAS.ID_EM' + 'PRESA,'#10' COMISIONES_LIQUIDADAS.REFERENCIA, COMISIONES_LIQUIDAD' + 'AS.ID_AGENTE,'#10' CONTACTOS.NOMBRE as AGENTE,'#10' COMISIONES_LIQ' + 'UIDADAS.DESCRIPCION, COMISIONES_LIQUIDADAS.FECHA,'#10' COMISIONES' + '_LIQUIDADAS.IMPORTE_TOTAL, COMISIONES_LIQUIDADAS.USUARIO'#10'FROM CO' + 'MISIONES_LIQUIDADAS'#10'LEFT JOIN CONTACTOS ON (CONTACTOS.ID = COMIS' + 'IONES_LIQUIDADAS.ID_AGENTE)'#10'WHERE COMISIONES_LIQUIDADAS.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 = 'AGENTE' TableField = '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> end> Name = 'Comisiones_Refresh' Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_COMISIONES_LIQUID_ID' ServerAutoRefresh = True DictionaryEntry = 'Comisiones_ID' 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 = 'AGENTE' DataType = datString Size = 255 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> end> JoinDataTables = <> UnionDataTables = <> Commands = < item Params = < item Name = 'OLD_ID' DataType = datInteger Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'COMISIONES_LIQUIDADAS' SQL = 'DELETE'#10' FROM'#10' COMISIONES_LIQUIDADAS'#10' WHERE'#10' (ID = :OLD_I' + 'D)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_Comisiones' end item Params = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_COMISIONES_LIQUID_ID' Value = '' end item Name = 'ID_EMPRESA' DataType = datInteger Value = '' end item Name = 'REFERENCIA' DataType = datString Size = 255 Value = '' end item Name = 'ID_AGENTE' DataType = datInteger Value = '' end item Name = 'DESCRIPCION' DataType = datString Size = 255 Value = '' end item Name = 'FECHA' DataType = datDateTime Value = '' end item Name = 'IMPORTE_TOTAL' DataType = datDecimal Value = '' end item Name = 'USUARIO' DataType = datString Size = 30 Value = '' end> Statements = < item Connection = 'IBX' Default = True TargetTable = 'COMISIONES_LIQUIDADAS' SQL = 'INSERT'#10' INTO COMISIONES_LIQUIDADAS'#10' (ID, ID_EMPRESA, REFEREN' + 'CIA, ID_AGENTE, DESCRIPCION, FECHA, IMPORTE_TOTAL, USUARIO)'#10' VA' + 'LUES'#10' (:ID, :ID_EMPRESA, :REFERENCIA, :ID_AGENTE, :DESCRIPCIO' + 'N, :FECHA, :IMPORTE_TOTAL, :USUARIO)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_Comisiones' end item Params = < item Name = 'ID' DataType = datInteger Value = '' end item Name = 'ID_EMPRESA' DataType = datInteger Value = '' end item Name = 'REFERENCIA' DataType = datString Size = 255 Value = '' end item Name = 'ID_AGENTE' DataType = datInteger Value = '' end item Name = 'DESCRIPCION' DataType = datString Size = 255 Value = '' end item Name = 'FECHA' DataType = datDateTime Value = '' end item Name = 'IMPORTE_TOTAL' DataType = datDecimal Value = '' end item Name = 'USUARIO' DataType = datString Size = 30 Value = '' end item Name = 'OLD_ID' Value = '' end> Statements = < item Connection = 'IBX' TargetTable = 'COMISIONES_LIQUIDADAS' SQL = 'UPDATE COMISIONES_LIQUIDADAS'#10' SET'#10' ID = :ID,'#10' ID_EMPRESA ' + '= :ID_EMPRESA,'#10' REFERENCIA = :REFERENCIA,'#10' ID_AGENTE = :ID' + '_AGENTE,'#10' DESCRIPCION = :DESCRIPCION,'#10' FECHA = :FECHA,'#10' ' + ' IMPORTE_TOTAL = :IMPORTE_TOTAL,'#10' USUARIO = :USUARIO'#10' WHERE'#10 + ' (ID = :OLD_ID)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Update_Comisiones' end item Params = < item Name = 'ID_COMISION_LIQUIDADA' DataType = datInteger Value = '' end item Name = 'COMISION' DataType = datCurrency Value = '' end item Name = 'IMPORTE_COMISION' DataType = datDecimal Value = '' end item Name = 'ID' DataType = datInteger Value = '' end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'FACTURAS_CLIENTE' SQL = 'UPDATE FACTURAS_CLIENTE'#10' SET'#10' ID_COMISION_LIQUIDADA = :ID_CO' + 'MISION_LIQUIDADA,'#10' COMISION = :COMISION,'#10' IMPORTE_COMISION' + ' = :IMPORTE_COMISION'#10' WHERE'#10' (ID = :ID)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_FacturasComision' end item Params = < item Name = 'ID_COMISION_LIQUIDADA' DataType = datInteger Value = '' end item Name = 'COMISION' DataType = datFloat Value = '' end item Name = 'IMPORTE_COMISION' DataType = datDecimal Value = '' end item Name = 'OLD_ID' Value = '' end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'FACTURAS_CLIENTE' SQL = 'UPDATE FACTURAS_CLIENTE'#10' SET'#10' ID_COMISION_LIQUIDADA = :ID_CO' + 'MISION_LIQUIDADA,'#10' COMISION = :COMISION,'#10' IMPORTE_COMISION' + ' = :IMPORTE_COMISION'#10' WHERE'#10' (ID = :OLD_ID)'#10' '#10#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Update_FacturasComision' end item Params = < item Name = 'OLD_ID' Value = '' end> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True TargetTable = 'FACTURAS_CLIENTE' SQL = 'UPDATE FACTURAS_CLIENTE'#10' SET'#10' ID_COMISION_LIQUIDADA = NULL'#10' ' + ' WHERE'#10' (ID = :OLD_ID)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_FacturasComision' end> RelationShips = < item Name = 'FacturasComision_FK' MasterDatasetName = 'Comisiones' MasterFields = 'ID' DetailDatasetName = 'FacturasComision' DetailFields = 'ID_COMISION_LIQUIDADA' RelationshipType = rtForeignKey end> UpdateRules = < item Name = 'Insert Comisiones' DoUpdate = False DoDelete = False DatasetName = 'Comisiones' FailureBehavior = fbRaiseException end item Name = 'Insert FacturasComision' DoUpdate = False DoDelete = False DatasetName = 'FacturasComision' FailureBehavior = fbRaiseException end item Name = 'Update Comisiones' DoInsert = False DoDelete = False DatasetName = 'Comisiones' FailureBehavior = fbRaiseException end item Name = 'Update FacturasComision' DoInsert = False DoDelete = False DatasetName = 'FacturasComision' FailureBehavior = fbRaiseException end item Name = 'Delete FacturasComision' DoUpdate = False DoInsert = False DatasetName = 'FacturasComision' FailureBehavior = fbRaiseException end item Name = 'Delete Comisiones' DoUpdate = False DoInsert = False DatasetName = 'Comisiones' FailureBehavior = fbRaiseException end> Version = 0 Left = 48 Top = 24 end object Diagrams: TDADiagrams Left = 150 Top = 74 DiagramData = ''#13#10' '#13#10' '#13#10' '#13#10' '#13#10' '#13#10''#13#10 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 80 end object bpComisiones: TDABusinessProcessor Schema = schComisiones InsertCommandName = 'Insert_Comisiones' DeleteCommandName = 'Delete_Comisiones' UpdateCommandName = 'Update_Comisiones' ReferencedDataset = 'Comisiones' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 248 Top = 24 end object bpFacturasComision: TDABusinessProcessor Schema = schComisiones InsertCommandName = 'Insert_FacturasComision' DeleteCommandName = 'Delete_FacturasComision' UpdateCommandName = 'Update_FacturasComision' ReferencedDataset = 'FacturasComision' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 248 Top = 80 end object DataDictionary: TDADataDictionary Fields = < item Name = 'FacturasCliente_CLIENTE_FINAL' DataType = datString Size = 255 DisplayLabel = 'Cliente final' end item Name = 'FacturasCliente_ID' DataType = datAutoInc GeneratorName = 'GEN_FACTURAS_CLIENTE_ID' Required = True DisplayLabel = 'ID' ServerAutoRefresh = True end item Name = 'FacturasCliente_ID_EMPRESA' DataType = datInteger DisplayLabel = 'ID_EMPRESA' 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 = datCurrency DisplayLabel = 'Base imponible' Alignment = taRightJustify end item Name = 'FacturasCliente_IMPORTE_DESCUENTO' DataType = datCurrency DisplayLabel = 'Importe dto.' Alignment = taRightJustify end item Name = 'FacturasCliente_IMPORTE_IVA' DataType = datCurrency DisplayLabel = 'Importe IVA' Alignment = taRightJustify end item Name = 'FacturasCliente_IMPORTE_TOTAL' DataType = datCurrency 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' Alignment = taRightJustify end item Name = 'FacturasCliente_USUARIO' DataType = datString Size = 100 DisplayLabel = 'USUARIO' end item Name = 'FacturasCliente_DESCUENTO' DataType = datFloat DisplayLabel = 'Dto.' Alignment = taRightJustify end item Name = 'FacturasCliente_FECHA_PAGADO' DataType = datDateTime DisplayLabel = 'Fecha de pago' end item Name = 'FacturasCliente_FECHA_VENCIMIENTO' DataType = datDateTime DisplayLabel = 'Fecha de vencimiento' ServerAutoRefresh = True end item Name = 'FacturasCliente_RE' DataType = datFloat DisplayLabel = 'RE' Alignment = taRightJustify end item Name = 'FacturasCliente_IMPORTE_RE' DataType = datCurrency DisplayLabel = 'Importe RE' Alignment = taRightJustify end item Name = 'FacturasCliente_REFERENCIA' DataType = datString Size = 20 DisplayLabel = 'Referencia' ServerAutoRefresh = True end item Name = 'FacturasCliente_ID_FORMA_PAGO' DataType = datInteger end item Name = 'FacturasCliente_IMPORTE_NETO' DataType = datCurrency DisplayLabel = 'Importe neto' Alignment = taRightJustify end item Name = 'FacturasCliente_IMPORTE_PORTE' DataType = datCurrency DisplayLabel = 'Importe del porte' Alignment = taRightJustify end item Name = 'FacturasCliente_RECARGO_EQUIVALENCIA' DataType = datSmallInt DisplayLabel = #191'Con R.E.?' end item Name = 'FacturasCliente_TIPO' DataType = datString Size = 1 DisplayLabel = 'Tipo' end item Name = 'FacturasCliente_ID_TIPO_IVA' DataType = datInteger DisplayLabel = 'ID_TIPO_IVA' end item Name = 'FacturasCliente_ID_COMISION_LIQUIDADA' DataType = datInteger DisplayLabel = 'ID_COMISION_LIQUIDADA' end item Name = 'FacturasCliente_REFERENCIA_COMISION' DataType = datString Size = 255 DisplayLabel = 'REFERENCIA_COMISION' end item Name = 'FacturasCliente_ID_AGENTE' DataType = datInteger DisplayLabel = 'ID_AGENTE' end item Name = 'FacturasCliente_DATOS_BANCARIOS' DataType = datString Size = 255 DisplayLabel = 'Datos bancarios' end item Name = 'FacturasCliente_FECHA_RETENCION' DataType = datDateTime end item Name = 'FacturasCliente_ID_DIRECCION' DataType = datInteger end item Name = 'FacturasCliente_PERSONA_CONTACTO' DataType = datString Size = 255 end item Name = 'FacturasCliente_RETENCION' DataType = datFloat DisplayLabel = 'RETENCION' end item Name = 'FacturasCliente_IMPORTE_RETENCION' DataType = datCurrency DisplayLabel = 'IMPORTE_RETENCION' end item Name = 'FacturasCliente_DESCUENTO2' DataType = datFloat DisplayLabel = 'DESCUENTO2' end item Name = 'FacturasCliente_IMPORTE_DESCUENTO2' DataType = datCurrency DisplayLabel = 'IMPORTE_DESCUENTO2' end item Name = 'FacturasCliente_COMISION' DataType = datFloat DisplayLabel = 'COMISION' end item Name = 'FacturasCliente_IMPORTE_COMISION' DataType = datCurrency DecimalPrecision = 11 DecimalScale = 2 DisplayLabel = 'IMPORTE_COMISION' end item Name = 'Comisiones_ID' DataType = datAutoInc GeneratorName = 'GEN_COMISIONES_LIQUID_ID' DisplayLabel = 'ID' end item Name = 'Comisiones_ID_EMPRESA' DataType = datInteger end item Name = 'Comisiones_REFERENCIA' DataType = datString Size = 255 end item Name = 'Comisiones_ID_AGENTE' DataType = datInteger end item Name = 'Comisiones_AGENTE' DataType = datString Size = 255 end item Name = 'Comisiones_DESCRIPCION' DataType = datString Size = 255 end item Name = 'Comisiones_FECHA' DataType = datDateTime end item Name = 'Comisiones_IMPORTE_TOTAL' DataType = datCurrency end item Name = 'Comisiones_USUARIO' DataType = datString Size = 30 end> Left = 150 Top = 22 end end