Noviseda_FactuGES2/Source/Modulos/Comisiones/Servidor/srvComisiones_Impl.dfm

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 = datAutoInc
            GeneratorName = 'GEN_FACTURAS_CLIENTE_ID'
            ServerAutoRefresh = True
            DictionaryEntry = 'FacturasComision_ID'
            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 = '<unknown>'
                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'
            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, 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 ID = :ID'#10#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_Refresh'
        Fields = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_FACTURAS_CLIENTE_ID'
            ServerAutoRefresh = True
            DictionaryEntry = 'FacturasComision_ID'
            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>
    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 = 'Delete FacturasComision'
        DoUpdate = False
        DoInsert = False
        DatasetName = 'FacturasComision'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Delete Comisiones'
        DoUpdate = False
        DoInsert = False
        DatasetName = 'Comisiones'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Insert Comisiones'
        DoUpdate = False
        DoDelete = False
        DatasetName = 'Comisiones'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Update Comisiones'
        DoInsert = False
        DoDelete = False
        DatasetName = 'Comisiones'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Insert FacturasComision'
        DoUpdate = False
        DoDelete = False
        DatasetName = 'FacturasComision'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Update FacturasComision'
        DoInsert = False
        DoDelete = False
        DatasetName = 'FacturasComision'
        FailureBehavior = fbRaiseException
      end>
    Version = 0
    Left = 48
    Top = 24
  end
  object Diagrams: TDADiagrams
    Left = 150
    Top = 74
    DiagramData = 
      '<Diagrams>'#13#10'  <Diagram Name="2D18D13A61EF420786DCB03803545680" L' +
      'eft="200" Top="200" Width="400" Height="300">'#13#10'    <Entity Name=' +
      '"Comisiones" Left="0,00" Top="36,98" />'#13#10'    <Entity Name="Factu' +
      'rasComision" Left="375,00" Top="0,00" />'#13#10'    <Entity Name="List' +
      'aAnosComisiones" Left="174,00" Top="118,00" />'#13#10'  </Diagram>'#13#10'</' +
      'Diagrams>'#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'
    RefreshDatasetName = 'FacturasComision_Refresh'
    ReferencedDataset = 'FacturasComision'
    ProcessorOptions = [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
      item
        Name = 'FacturasComision_ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_FACTURAS_CLIENTE_ID'
        Required = True
        DisplayLabel = 'ID'
        ServerAutoRefresh = True
      end>
    Left = 150
    Top = 22
  end
end