AbetoDesign_FactuGES2/Source/Modulos/Contratos de cliente/Servidor/srvContratosCliente_Impl.dfm

object srvContratosCliente: TsrvContratosCliente
  OldCreateOrder = True
  OnCreate = DARemoteServiceCreate
  ConnectionName = 'IBX'
  ServiceSchema = schContratosCliente
  ServiceDataStreamer = Bin2DataStreamer
  ExportedDataTables = <>
  Height = 230
  Width = 346
  object schContratosCliente: TDASchema
    ConnectionManager = dmServer.ConnectionManager
    DataDictionary = DADataDictionary
    Datasets = <
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            ConnectionType = 'Interbase'
            Default = True
            TargetTable = 'PRESUPUESTOS_VALORES'
            Name = 'IBX'
            StatementType = stAutoSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_PROPIEDAD'
                TableField = 'ID_PROPIEDAD'
              end
              item
                DatasetField = 'DESCRIPCION'
                TableField = 'DESCRIPCION'
              end>
          end>
        Name = 'Valores'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            Required = True
            InPrimaryKey = True
          end
          item
            Name = 'ID_PROPIEDAD'
            DataType = datInteger
          end
          item
            Name = 'DESCRIPCION'
            DataType = datString
            Size = 2000
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            ConnectionType = 'Interbase'
            Default = True
            TargetTable = 'PRESUPUESTOS_PROPIEDADES'
            Name = 'IBX'
            SQL = 
              'select ID,'#10'       DESCRIPCION,'#10'       case WHEN ID_PADRE IS NULL' +
              ' THEN ID'#10'            ELSE ID_PADRE'#10'       end AS ID_PROPIEDAD_VA' +
              'LORES'#10#10'from presupuestos_propiedades'#10#10'WHERE {Where}'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'DESCRIPCION'
                TableField = 'DESCRIPCION'
              end
              item
                DatasetField = 'ID_PROPIEDAD_VALORES'
                TableField = '<unknown>'
                SQLOrigin = 'ID_PROPIEDAD_VALORES'
              end>
          end>
        Name = 'Propiedades'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            Required = True
            InPrimaryKey = True
          end
          item
            Name = 'DESCRIPCION'
            DataType = datString
            Size = 50
          end
          item
            Name = 'ID_PROPIEDAD_VALORES'
            DataType = datInteger
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            ConnectionType = 'Interbase'
            Default = True
            Name = 'IBX'
            SQL = 
              'select ANO from'#10'(select distinct(substr(FECHA_CONTRATO, 1,4)) as' +
              ' ANO'#10'from contratos_cliente'#10'order by 1 desc)'#10#10'UNION ALL'#10#10'select ' +
              'distinct '#39'Todos'#39' as ANO'#10'from empresas'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ANO'
                TableField = 'ANO'
              end>
          end>
        Name = 'ListaAnosContratos'
        Fields = <
          item
            Name = 'ANO'
            DataType = datString
            Size = 254
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            ConnectionType = 'Interbase'
            Default = True
            TargetTable = 'V_CONTRATOS_BENEFICIOS'
            Name = 'IBX'
            SQL = 
              'SELECT '#10'    ID, REFERENCIA, FECHA_CONTRATO, REFERENCIA_CLIENTE, ' +
              'NOMBRE, NIF_CIF, IMPORTE_NETO,'#10'    IMPORTE_DESCUENTO, BASE_IMPON' +
              'IBLE, IMPORTE_FACTURAS_PROVEEDOR, '#10'    IMPORTE_BENEFICIO, PORCEN' +
              'TAJE_BENEFICIO, IMPORTE_FACTURAS_CLIENTE,'#10'    IMPORTE_BENEFICIO_' +
              'REAL, PORCENTAJE_BENEFICIO_REAL'#10'  FROM'#10'    V_CONTRATOS_BENEFICIO' +
              'S'#10'  WHERE {Where}'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'FECHA_CONTRATO'
                TableField = 'FECHA_CONTRATO'
              end
              item
                DatasetField = 'REFERENCIA_CLIENTE'
                TableField = 'REFERENCIA_CLIENTE'
              end
              item
                DatasetField = 'NOMBRE'
                TableField = 'NOMBRE'
              end
              item
                DatasetField = 'NIF_CIF'
                TableField = 'NIF_CIF'
              end
              item
                DatasetField = 'IMPORTE_NETO'
                TableField = 'IMPORTE_NETO'
              end
              item
                DatasetField = 'IMPORTE_DESCUENTO'
                TableField = 'IMPORTE_DESCUENTO'
              end
              item
                DatasetField = 'BASE_IMPONIBLE'
                TableField = 'BASE_IMPONIBLE'
              end
              item
                DatasetField = 'IMPORTE_FACTURAS_PROVEEDOR'
                TableField = 'IMPORTE_FACTURAS_PROVEEDOR'
              end
              item
                DatasetField = 'IMPORTE_BENEFICIO'
                TableField = 'IMPORTE_BENEFICIO'
              end
              item
                DatasetField = 'PORCENTAJE_BENEFICIO'
                TableField = 'PORCENTAJE_BENEFICIO'
              end
              item
                DatasetField = 'IMPORTE_FACTURAS_CLIENTE'
                TableField = 'IMPORTE_FACTURAS_CLIENTE'
              end
              item
                DatasetField = 'IMPORTE_BENEFICIO_REAL'
                TableField = 'IMPORTE_BENEFICIO_REAL'
              end
              item
                DatasetField = 'PORCENTAJE_BENEFICIO_REAL'
                TableField = 'PORCENTAJE_BENEFICIO_REAL'
              end>
          end>
        Name = 'ContratosClienteBeneficios'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'FECHA_CONTRATO'
            DataType = datDateTime
          end
          item
            Name = 'REFERENCIA_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
          end
          item
            Name = 'IMPORTE_NETO'
            DataType = datCurrency
          end
          item
            Name = 'IMPORTE_DESCUENTO'
            DataType = datCurrency
          end
          item
            Name = 'BASE_IMPONIBLE'
            DataType = datCurrency
          end
          item
            Name = 'IMPORTE_FACTURAS_PROVEEDOR'
            DataType = datCurrency
          end
          item
            Name = 'IMPORTE_BENEFICIO'
            DataType = datCurrency
          end
          item
            Name = 'PORCENTAJE_BENEFICIO'
            DataType = datCurrency
          end
          item
            Name = 'IMPORTE_FACTURAS_CLIENTE'
            DataType = datCurrency
          end
          item
            Name = 'IMPORTE_BENEFICIO_REAL'
            DataType = datCurrency
          end
          item
            Name = 'PORCENTAJE_BENEFICIO_REAL'
            DataType = datCurrency
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            Default = True
            TargetTable = 'V_CONTRATOS_CLIENTE'
            StatementType = stAutoSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'ID_CLIENTE'
                TableField = 'ID_CLIENTE'
              end
              item
                DatasetField = 'NOMBRE_CLIENTE'
                TableField = 'NOMBRE_CLIENTE'
              end
              item
                DatasetField = 'NOMBRE_COMERCIAL_CLIENTE'
                TableField = 'NOMBRE_COMERCIAL_CLIENTE'
              end
              item
                DatasetField = 'NIF_CIF'
                TableField = 'NIF_CIF'
              end
              item
                DatasetField = 'NOMBRE'
                TableField = 'NOMBRE'
              end
              item
                DatasetField = 'CALLE'
                TableField = 'CALLE'
              end
              item
                DatasetField = 'POBLACION'
                TableField = 'POBLACION'
              end
              item
                DatasetField = 'PROVINCIA'
                TableField = 'PROVINCIA'
              end
              item
                DatasetField = 'CODIGO_POSTAL'
                TableField = 'CODIGO_POSTAL'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'FECHA_CONTRATO'
                TableField = 'FECHA_CONTRATO'
              end
              item
                DatasetField = 'SITUACION'
                TableField = 'SITUACION'
              end
              item
                DatasetField = 'FORMA_PAGO'
                TableField = 'FORMA_PAGO'
              end
              item
                DatasetField = 'PLAZO_ENTREGA'
                TableField = 'PLAZO_ENTREGA'
              end
              item
                DatasetField = 'OBSERVACIONES'
                TableField = 'OBSERVACIONES'
              end
              item
                DatasetField = 'INCIDENCIAS'
                TableField = 'INCIDENCIAS'
              end
              item
                DatasetField = 'INCIDENCIAS_ACTIVAS'
                TableField = 'INCIDENCIAS_ACTIVAS'
              end
              item
                DatasetField = 'FECHA_ALTA'
                TableField = 'FECHA_ALTA'
              end
              item
                DatasetField = 'FECHA_MODIFICACION'
                TableField = 'FECHA_MODIFICACION'
              end
              item
                DatasetField = 'USUARIO'
                TableField = 'USUARIO'
              end
              item
                DatasetField = 'RECARGO_EQUIVALENCIA'
                TableField = 'RECARGO_EQUIVALENCIA'
              end
              item
                DatasetField = 'RE'
                TableField = 'RE'
              end
              item
                DatasetField = 'IMPORTE_RE'
                TableField = 'IMPORTE_RE'
              end
              item
                DatasetField = 'ID_TIPO_IVA'
                TableField = 'ID_TIPO_IVA'
              end
              item
                DatasetField = 'IVA'
                TableField = 'IVA'
              end
              item
                DatasetField = 'IMPORTE_IVA'
                TableField = 'IMPORTE_IVA'
              end
              item
                DatasetField = 'IMPORTE_NETO'
                TableField = 'IMPORTE_NETO'
              end
              item
                DatasetField = 'IMPORTE_PORTE'
                TableField = 'IMPORTE_PORTE'
              end
              item
                DatasetField = 'ID_TIENDA'
                TableField = 'ID_TIENDA'
              end
              item
                DatasetField = 'TIENDA'
                TableField = 'TIENDA'
              end
              item
                DatasetField = 'BASE_IMPONIBLE'
                TableField = 'BASE_IMPONIBLE'
              end
              item
                DatasetField = 'DESCUENTO'
                TableField = 'DESCUENTO'
              end
              item
                DatasetField = 'IMPORTE_DESCUENTO'
                TableField = 'IMPORTE_DESCUENTO'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'ID_FORMA_PAGO'
                TableField = 'ID_FORMA_PAGO'
              end
              item
                DatasetField = 'ID_VENDEDOR'
                TableField = 'ID_VENDEDOR'
              end
              item
                DatasetField = 'VENDEDOR'
                TableField = 'VENDEDOR'
              end
              item
                DatasetField = 'PERSONA_CONTACTO'
                TableField = 'PERSONA_CONTACTO'
              end
              item
                DatasetField = 'REF_CLIENTE'
                TableField = 'REF_CLIENTE'
              end
              item
                DatasetField = 'TELEFONO'
                TableField = 'TELEFONO'
              end
              item
                DatasetField = 'MOVIL'
                TableField = 'MOVIL'
              end
              item
                DatasetField = 'ID_DIRECCION'
                TableField = 'ID_DIRECCION'
              end
              item
                DatasetField = 'TIPO_CONTRATO'
                TableField = 'TIPO_CONTRATO'
              end
              item
                DatasetField = 'REFERENCIA_CLIENTE'
                TableField = 'REFERENCIA_CLIENTE'
              end
              item
                DatasetField = 'FACTURA_ASOCIADA'
                TableField = 'FACTURA_ASOCIADA'
              end
              item
                DatasetField = 'PROCEDENCIA_CLIENTE'
                TableField = 'PROCEDENCIA_CLIENTE'
              end
              item
                DatasetField = 'PRECIO_PUNTO'
                TableField = 'PRECIO_PUNTO'
              end
              item
                DatasetField = 'ID_DIRECCION_ENVIO'
                TableField = 'ID_DIRECCION_ENVIO'
              end
              item
                DatasetField = 'CALLE_ENVIO'
                TableField = 'CALLE_ENVIO'
              end
              item
                DatasetField = 'POBLACION_ENVIO'
                TableField = 'POBLACION_ENVIO'
              end
              item
                DatasetField = 'PROVINCIA_ENVIO'
                TableField = 'PROVINCIA_ENVIO'
              end
              item
                DatasetField = 'CODIGO_POSTAL_ENVIO'
                TableField = 'CODIGO_POSTAL_ENVIO'
              end
              item
                DatasetField = 'PERS_CONTACTO_ENVIO'
                TableField = 'PERS_CONTACTO_ENVIO'
              end
              item
                DatasetField = 'TLFS_ENVIO'
                TableField = 'TLFS_ENVIO'
              end
              item
                DatasetField = 'NOTAS_ENVIO'
                TableField = 'NOTAS_ENVIO'
              end>
          end>
        Name = 'ContratosCliente'
        Fields = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_PRESUPUESTOS_CLI_ID'
            ServerAutoRefresh = True
            DictionaryEntry = 'ContratosCliente_ID'
            InPrimaryKey = True
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            DictionaryEntry = 'ContratosCliente_ID_EMPRESA'
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
            DictionaryEntry = 'ContratosCliente_ID_CLIENTE'
          end
          item
            Name = 'NOMBRE_CLIENTE'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_NOMBRE_CLIENTE'
          end
          item
            Name = 'REF_CLIENTE'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_REF_CLIENTE'
          end
          item
            Name = 'NOMBRE_COMERCIAL_CLIENTE'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_NOMBRE_COMERCIAL_CLIENTE'
          end
          item
            Name = 'PROCEDENCIA_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
            ServerAutoRefresh = True
            DictionaryEntry = 'ContratosCliente_NIF_CIF'
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            ServerAutoRefresh = True
            DictionaryEntry = 'ContratosCliente_NOMBRE'
          end
          item
            Name = 'ID_DIRECCION'
            DataType = datInteger
            DictionaryEntry = 'ContratosCliente_ID_DIRECCION'
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_CALLE'
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_POBLACION'
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_PROVINCIA'
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
            DictionaryEntry = 'ContratosCliente_CODIGO_POSTAL'
          end
          item
            Name = 'TELEFONO'
            DataType = datString
            Size = 25
            DictionaryEntry = 'ContratosCliente_TELEFONO'
          end
          item
            Name = 'MOVIL'
            DataType = datString
            Size = 25
            DictionaryEntry = 'ContratosCliente_MOVIL'
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
            ServerAutoRefresh = True
            DictionaryEntry = 'ContratosCliente_REFERENCIA'
          end
          item
            Name = 'FECHA_CONTRATO'
            DataType = datDateTime
            DictionaryEntry = 'ContratosCliente_FECHA_CONTRATO'
          end
          item
            Name = 'SITUACION'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_SITUACION'
          end
          item
            Name = 'FORMA_PAGO'
            DataType = datMemo
            DictionaryEntry = 'ContratosCliente_FORMA_PAGO'
          end
          item
            Name = 'PLAZO_ENTREGA'
            DataType = datMemo
            DictionaryEntry = 'ContratosCliente_PLAZO_ENTREGA'
          end
          item
            Name = 'OBSERVACIONES'
            DataType = datMemo
            DictionaryEntry = 'ContratosCliente_OBSERVACIONES'
          end
          item
            Name = 'INCIDENCIAS'
            DataType = datMemo
            DictionaryEntry = 'ContratosCliente_INCIDENCIAS'
          end
          item
            Name = 'INCIDENCIAS_ACTIVAS'
            DataType = datInteger
            DictionaryEntry = 'ContratosCliente_INCIDENCIAS_ACTIVAS'
          end
          item
            Name = 'FECHA_ALTA'
            DataType = datDateTime
            DictionaryEntry = 'ContratosCliente_FECHA_ALTA'
          end
          item
            Name = 'FECHA_MODIFICACION'
            DataType = datDateTime
            DictionaryEntry = 'ContratosCliente_FECHA_MODIFICACION'
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 20
            DictionaryEntry = 'ContratosCliente_USUARIO'
          end
          item
            Name = 'RECARGO_EQUIVALENCIA'
            DataType = datSmallInt
            DictionaryEntry = 'ContratosCliente_RECARGO_EQUIVALENCIA'
          end
          item
            Name = 'RE'
            DataType = datFloat
            DictionaryEntry = 'ContratosCliente_RE'
          end
          item
            Name = 'IMPORTE_RE'
            DataType = datCurrency
            DictionaryEntry = 'ContratosCliente_IMPORTE_RE'
          end
          item
            Name = 'ID_TIPO_IVA'
            DataType = datInteger
            DictionaryEntry = 'ContratosCliente_ID_TIPO_IVA'
          end
          item
            Name = 'IVA'
            DataType = datFloat
            DictionaryEntry = 'ContratosCliente_IVA'
          end
          item
            Name = 'IMPORTE_IVA'
            DataType = datCurrency
            DictionaryEntry = 'ContratosCliente_IMPORTE_IVA'
          end
          item
            Name = 'IMPORTE_NETO'
            DataType = datCurrency
            DictionaryEntry = 'ContratosCliente_IMPORTE_NETO'
          end
          item
            Name = 'IMPORTE_PORTE'
            DataType = datCurrency
            DictionaryEntry = 'ContratosCliente_IMPORTE_PORTE'
          end
          item
            Name = 'ID_TIENDA'
            DataType = datInteger
            DictionaryEntry = 'ContratosCliente_ID_TIENDA'
          end
          item
            Name = 'TIENDA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_TIENDA'
          end
          item
            Name = 'BASE_IMPONIBLE'
            DataType = datCurrency
            DictionaryEntry = 'ContratosCliente_BASE_IMPONIBLE'
          end
          item
            Name = 'DESCUENTO'
            DataType = datFloat
            DictionaryEntry = 'ContratosCliente_DESCUENTO'
          end
          item
            Name = 'IMPORTE_DESCUENTO'
            DataType = datCurrency
            DictionaryEntry = 'ContratosCliente_IMPORTE_DESCUENTO'
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
            DictionaryEntry = 'ContratosCliente_IMPORTE_TOTAL'
          end
          item
            Name = 'ID_FORMA_PAGO'
            DataType = datInteger
            DictionaryEntry = 'ContratosCliente_ID_FORMA_PAGO'
          end
          item
            Name = 'ID_VENDEDOR'
            DataType = datInteger
            DictionaryEntry = 'ContratosCliente_ID_VENDEDOR'
          end
          item
            Name = 'VENDEDOR'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_VENDEDOR'
          end
          item
            Name = 'PERSONA_CONTACTO'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_PERSONA_CONTACTO'
          end
          item
            Name = 'TIPO_CONTRATO'
            DataType = datString
            Size = 255
            DictionaryEntry = 'ContratosCliente_TIPO_CONTRATO'
          end
          item
            Name = 'REFERENCIA_CLIENTE'
            DataType = datString
            Size = 255
          end
          item
            Name = 'FACTURA_ASOCIADA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PRECIO_PUNTO'
            DataType = datCurrency
          end
          item
            Name = 'ID_DIRECCION_ENVIO'
            DataType = datInteger
          end
          item
            Name = 'CALLE_ENVIO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'POBLACION_ENVIO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PROVINCIA_ENVIO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CODIGO_POSTAL_ENVIO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'PERS_CONTACTO_ENVIO'
            DataType = datString
            Size = 255
          end
          item
            Name = 'TLFS_ENVIO'
            DataType = datString
            Size = 30
          end
          item
            Name = 'NOTAS_ENVIO'
            DataType = datString
            Size = 255
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            ConnectionType = 'Interbase'
            Default = True
            TargetTable = 'PRESUPUESTOS_CLIENTE_CAPITULOS'
            Name = 'IBX'
            StatementType = stAutoSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'POSICION'
                TableField = 'POSICION'
              end
              item
                DatasetField = 'TIPO_DETALLE'
                TableField = 'TIPO_DETALLE'
              end
              item
                DatasetField = 'TIPO_ARTICULO'
                TableField = 'TIPO_ARTICULO'
              end
              item
                DatasetField = 'ID_ARTICULO'
                TableField = 'ID_ARTICULO'
              end
              item
                DatasetField = 'CONCEPTO'
                TableField = 'CONCEPTO'
              end>
          end>
        Name = 'TiposCapitulos'
        Description = 'No tocar es la lista de distintos capitulos existentes'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            Required = True
            InPrimaryKey = True
          end
          item
            Name = 'POSICION'
            DataType = datInteger
          end
          item
            Name = 'TIPO_DETALLE'
            DataType = datString
            Size = 10
          end
          item
            Name = 'TIPO_ARTICULO'
            DataType = datString
            Size = 2
          end
          item
            Name = 'ID_ARTICULO'
            DataType = datInteger
          end
          item
            Name = 'CONCEPTO'
            DataType = datString
            Size = 2000
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            Default = True
            TargetTable = 'CONTRATOS_CLIENTE_DETALLES'
            SQL = 
              'SELECT'#10'    CONTRATOS_CLIENTE_DETALLES.ID, CONTRATOS_CLIENTE_DETA' +
              'LLES.ID_CONTRATO,'#10'    CONTRATOS_CLIENTE_DETALLES.POSICION, CONTR' +
              'ATOS_CLIENTE_DETALLES.TIPO_DETALLE,'#10'    CONTRATOS_CLIENTE_DETALL' +
              'ES.PROPIEDAD, CONTRATOS_CLIENTE_DETALLES.CONCEPTO, CONTRATOS_CLI' +
              'ENTE_DETALLES.CANTIDAD,'#10'    CONTRATOS_CLIENTE_DETALLES.IMPORTE_U' +
              'NIDAD, CONTRATOS_CLIENTE_DETALLES.IMPORTE_TOTAL,'#10'    CONTRATOS_C' +
              'LIENTE_DETALLES.VISIBLE,'#10'    CONTRATOS_CLIENTE_DETALLES.VALORADO' +
              ','#10#10'    CONTRATOS_CLIENTE_DETALLES.ID_ARTICULO, CONTRATOS_CLIENTE' +
              '_DETALLES.TIPO_ARTICULO,'#10'    CONTRATOS_CLIENTE_DETALLES.DESCUENT' +
              'O,'#10'    CONTRATOS_CLIENTE_DETALLES.IMPORTE_PORTE, ARTICULOS.REFER' +
              'ENCIA,'#10'    '#39#39' as REFERENCIA_PROVEEDOR /*Es necesario para que no' +
              ' fallen los detalles porque los detalles son comunes para la ram' +
              'a de cliente y de proveedor*/'#10#10'FROM CONTRATOS_CLIENTE_DETALLES'#10'L' +
              'EFT JOIN ARTICULOS ON CONTRATOS_CLIENTE_DETALLES.ID_ARTICULO = A' +
              'RTICULOS.ID'#10'where {where}'#10'ORDER BY POSICION;'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_CONTRATO'
                TableField = 'ID_CONTRATO'
              end
              item
                DatasetField = 'POSICION'
                TableField = 'POSICION'
              end
              item
                DatasetField = 'TIPO_DETALLE'
                TableField = 'TIPO_DETALLE'
              end
              item
                DatasetField = 'CONCEPTO'
                TableField = 'CONCEPTO'
              end
              item
                DatasetField = 'CANTIDAD'
                TableField = 'CANTIDAD'
              end
              item
                DatasetField = 'IMPORTE_UNIDAD'
                TableField = 'IMPORTE_UNIDAD'
              end
              item
                DatasetField = 'IMPORTE_TOTAL'
                TableField = 'IMPORTE_TOTAL'
              end
              item
                DatasetField = 'VISIBLE'
                TableField = 'VISIBLE'
              end
              item
                DatasetField = 'ID_ARTICULO'
                TableField = 'ID_ARTICULO'
              end
              item
                DatasetField = 'TIPO_ARTICULO'
                TableField = 'TIPO_ARTICULO'
              end
              item
                DatasetField = 'DESCUENTO'
                TableField = 'DESCUENTO'
              end
              item
                DatasetField = 'IMPORTE_PORTE'
                TableField = 'IMPORTE_PORTE'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = '<unknown>'
                SQLOrigin = 'REFERENCIA'
              end
              item
                DatasetField = 'REFERENCIA_PROVEEDOR'
                TableField = '<unknown>'
                SQLOrigin = 'REFERENCIA_PROVEEDOR'
              end
              item
                DatasetField = 'PROPIEDAD'
                TableField = 'PROPIEDAD'
              end
              item
                DatasetField = 'VALORADO'
                TableField = 'VALORADO'
              end>
          end>
        Name = 'ContratosCliente_Detalles'
        Fields = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_PRESUPUESTOS_CLI_DETALLE_ID'
            InPrimaryKey = True
          end
          item
            Name = 'ID_CONTRATO'
            DataType = datInteger
          end
          item
            Name = 'POSICION'
            DataType = datInteger
          end
          item
            Name = 'TIPO_DETALLE'
            DataType = datString
            Size = 10
          end
          item
            Name = 'PROPIEDAD'
            DataType = datString
            Size = 255
          end
          item
            Name = 'CONCEPTO'
            DataType = datString
            Size = 2000
          end
          item
            Name = 'CANTIDAD'
            DataType = datCurrency
          end
          item
            Name = 'IMPORTE_UNIDAD'
            DataType = datCurrency
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
          end
          item
            Name = 'VISIBLE'
            DataType = datSmallInt
          end
          item
            Name = 'VALORADO'
            DataType = datSmallInt
          end
          item
            Name = 'ID_ARTICULO'
            DataType = datInteger
          end
          item
            Name = 'TIPO_ARTICULO'
            DataType = datString
            Size = 2
          end
          item
            Name = 'DESCUENTO'
            DataType = datFloat
          end
          item
            Name = 'IMPORTE_PORTE'
            DataType = datCurrency
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
          end
          item
            Name = 'REFERENCIA_PROVEEDOR'
            DataType = datString
          end>
      end>
    JoinDataTables = <>
    UnionDataTables = <>
    Commands = <
      item
        Params = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_CONTRATOS_CLI_ID'
            Value = ''
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
            Value = ''
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'ID_DIRECCION'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
            Value = ''
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'FECHA_CONTRATO'
            DataType = datDateTime
            Value = ''
          end
          item
            Name = 'SITUACION'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'FORMA_PAGO'
            DataType = datMemo
            Value = ''
          end
          item
            Name = 'PLAZO_ENTREGA'
            DataType = datMemo
            Value = ''
          end
          item
            Name = 'OBSERVACIONES'
            DataType = datMemo
            Value = ''
          end
          item
            Name = 'INCIDENCIAS'
            DataType = datMemo
            Value = ''
          end
          item
            Name = 'INCIDENCIAS_ACTIVAS'
            DataType = datSmallInt
            Value = ''
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 30
            Value = ''
          end
          item
            Name = 'IMPORTE_NETO'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'IMPORTE_PORTE'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'DESCUENTO'
            DataType = datFloat
            Value = ''
          end
          item
            Name = 'IMPORTE_DESCUENTO'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'BASE_IMPONIBLE'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'ID_TIPO_IVA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'IVA'
            DataType = datFloat
            Value = ''
          end
          item
            Name = 'IMPORTE_IVA'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'ID_FORMA_PAGO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_TIENDA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_VENDEDOR'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'PERSONA_CONTACTO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'RE'
            DataType = datFloat
            Value = ''
          end
          item
            Name = 'IMPORTE_RE'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'RECARGO_EQUIVALENCIA'
            DataType = datSmallInt
            Value = ''
          end
          item
            Name = 'TELEFONO'
            DataType = datString
            Size = 25
            Value = ''
          end
          item
            Name = 'MOVIL'
            DataType = datString
            Size = 25
            Value = ''
          end
          item
            Name = 'TIPO_CONTRATO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'REFERENCIA_CLIENTE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PRECIO_PUNTO'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'ID_DIRECCION_ENVIO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'CALLE_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'POBLACION_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PROVINCIA_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'CODIGO_POSTAL_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PERS_CONTACTO_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'TLFS_ENVIO'
            DataType = datString
            Size = 30
            Value = ''
          end
          item
            Name = 'NOTAS_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            Default = True
            TargetTable = 'CONTRATOS_CLIENTE'
            SQL = 
              'INSERT'#10'  INTO CONTRATOS_CLIENTE'#10'    (ID, ID_EMPRESA, ID_CLIENTE,' +
              ' NIF_CIF, NOMBRE, ID_DIRECCION, CALLE, POBLACION, PROVINCIA,'#10'   ' +
              '  CODIGO_POSTAL, REFERENCIA, FECHA_CONTRATO, SITUACION, FORMA_PA' +
              'GO,'#10'     PLAZO_ENTREGA, OBSERVACIONES, INCIDENCIAS, INCIDENCIAS_' +
              'ACTIVAS, FECHA_ALTA,'#10'     USUARIO, IMPORTE_NETO, IMPORTE_PORTE, ' +
              'DESCUENTO, IMPORTE_DESCUENTO,'#10'     BASE_IMPONIBLE, ID_TIPO_IVA, ' +
              'IVA, IMPORTE_IVA,'#10'     IMPORTE_TOTAL, ID_FORMA_PAGO, ID_TIENDA, ' +
              'ID_VENDEDOR, PERSONA_CONTACTO,'#10'     RE, IMPORTE_RE, RECARGO_EQUI' +
              'VALENCIA, TELEFONO, MOVIL, TIPO_CONTRATO,'#10'     REFERENCIA_CLIENT' +
              'E, PRECIO_PUNTO,'#10'     ID_DIRECCION_ENVIO, CALLE_ENVIO, POBLACION' +
              '_ENVIO, PROVINCIA_ENVIO, CODIGO_POSTAL_ENVIO,'#10'     PERS_CONTACTO' +
              '_ENVIO, TLFS_ENVIO, NOTAS_ENVIO'#10'     )'#10'  VALUES'#10'    (:ID, :ID_EM' +
              'PRESA, :ID_CLIENTE, :NIF_CIF, :NOMBRE, :ID_DIRECCION, :CALLE, :P' +
              'OBLACION, :PROVINCIA,'#10'     :CODIGO_POSTAL, :REFERENCIA, :FECHA_C' +
              'ONTRATO, :SITUACION, :FORMA_PAGO,'#10'     :PLAZO_ENTREGA, :OBSERVAC' +
              'IONES, :INCIDENCIAS, :INCIDENCIAS_ACTIVAS, CURRENT_TIMESTAMP,'#10'  ' +
              '   :USUARIO, :IMPORTE_NETO, :IMPORTE_PORTE, :DESCUENTO, :IMPORTE' +
              '_DESCUENTO,'#10'     :BASE_IMPONIBLE, :ID_TIPO_IVA, :IVA, :IMPORTE_I' +
              'VA, :IMPORTE_TOTAL, :ID_FORMA_PAGO,'#10'     :ID_TIENDA, :ID_VENDEDO' +
              'R, :PERSONA_CONTACTO, :RE, :IMPORTE_RE, :RECARGO_EQUIVALENCIA,'#10' ' +
              '    :TELEFONO, :MOVIL, :TIPO_CONTRATO, :REFERENCIA_CLIENTE, :PRE' +
              'CIO_PUNTO,'#10'     :ID_DIRECCION_ENVIO, :CALLE_ENVIO, :POBLACION_EN' +
              'VIO, :PROVINCIA_ENVIO, :CODIGO_POSTAL_ENVIO,'#10'     :PERS_CONTACTO' +
              '_ENVIO, :TLFS_ENVIO, :NOTAS_ENVIO'#10'     )'#10#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Insert_ContratosCliente'
      end
      item
        Params = <
          item
            Name = 'OLD_ID'
            DataType = datAutoInc
            Value = '0'
          end>
        Statements = <
          item
            Connection = 'IBX'
            Default = True
            TargetTable = 'CONTRATOS_CLIENTE'
            SQL = 'DELETE '#10'  FROM'#10'    CONTRATOS_CLIENTE'#10'  WHERE'#10'    (ID = :OLD_ID)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Delete_ContratosCliente'
      end
      item
        Params = <
          item
            Name = 'ID'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_CLIENTE'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
            Value = ''
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'ID_DIRECCION'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
            Value = ''
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'FECHA_CONTRATO'
            DataType = datDateTime
            Value = ''
          end
          item
            Name = 'SITUACION'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'FORMA_PAGO'
            DataType = datMemo
            Value = ''
          end
          item
            Name = 'PLAZO_ENTREGA'
            DataType = datMemo
            Value = ''
          end
          item
            Name = 'OBSERVACIONES'
            DataType = datMemo
            Value = ''
          end
          item
            Name = 'INCIDENCIAS'
            DataType = datMemo
            Value = ''
          end
          item
            Name = 'INCIDENCIAS_ACTIVAS'
            DataType = datSmallInt
            Value = ''
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 30
            Value = ''
          end
          item
            Name = 'IMPORTE_NETO'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'IMPORTE_PORTE'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'DESCUENTO'
            DataType = datFloat
            Value = ''
          end
          item
            Name = 'IMPORTE_DESCUENTO'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'BASE_IMPONIBLE'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'ID_TIPO_IVA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'IVA'
            DataType = datFloat
            Value = ''
          end
          item
            Name = 'IMPORTE_IVA'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'ID_FORMA_PAGO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_TIENDA'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_VENDEDOR'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'PERSONA_CONTACTO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'RE'
            DataType = datFloat
            Value = ''
          end
          item
            Name = 'IMPORTE_RE'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'RECARGO_EQUIVALENCIA'
            DataType = datSmallInt
            Value = ''
          end
          item
            Name = 'TELEFONO'
            DataType = datString
            Size = 25
            Value = ''
          end
          item
            Name = 'MOVIL'
            DataType = datString
            Size = 25
            Value = ''
          end
          item
            Name = 'TIPO_CONTRATO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'REFERENCIA_CLIENTE'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PRECIO_PUNTO'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'ID_DIRECCION_ENVIO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'CALLE_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'POBLACION_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PROVINCIA_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'CODIGO_POSTAL_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'PERS_CONTACTO_ENVIO'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'TLFS_ENVIO'
            DataType = datString
            Size = 30
            Value = ''
          end
          item
            Name = 'OLD_ID'
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'CONTRATOS_CLIENTE'
            SQL = 
              'UPDATE CONTRATOS_CLIENTE'#10'  SET '#10'    ID = :ID,'#10'    ID_EMPRESA = :' +
              'ID_EMPRESA,'#10'    ID_CLIENTE = :ID_CLIENTE,'#10'    NIF_CIF = :NIF_CIF' +
              ','#10'    NOMBRE = :NOMBRE,'#10'    ID_DIRECCION = :ID_DIRECCION,'#10'    CA' +
              'LLE = :CALLE,'#10'    POBLACION = :POBLACION,'#10'    PROVINCIA = :PROVI' +
              'NCIA,'#10'    CODIGO_POSTAL = :CODIGO_POSTAL,'#10'    REFERENCIA = :REFE' +
              'RENCIA,'#10'    FECHA_CONTRATO = :FECHA_CONTRATO,'#10'    SITUACION = :S' +
              'ITUACION,'#10'    FORMA_PAGO = :FORMA_PAGO,'#10'    PLAZO_ENTREGA = :PLA' +
              'ZO_ENTREGA,'#10'    OBSERVACIONES = :OBSERVACIONES,'#10'    INCIDENCIAS ' +
              '= :INCIDENCIAS,'#10'    INCIDENCIAS_ACTIVAS = :INCIDENCIAS_ACTIVAS,'#10 +
              '    FECHA_MODIFICACION = CURRENT_TIMESTAMP,'#10'    USUARIO = :USUAR' +
              'IO,'#10'    IMPORTE_NETO = :IMPORTE_NETO,'#10'    IMPORTE_PORTE = :IMPOR' +
              'TE_PORTE,'#10'    DESCUENTO = :DESCUENTO,'#10'    IMPORTE_DESCUENTO = :I' +
              'MPORTE_DESCUENTO,'#10'    BASE_IMPONIBLE = :BASE_IMPONIBLE,'#10'    ID_T' +
              'IPO_IVA = :ID_TIPO_IVA,'#10'    IVA = :IVA,'#10'    IMPORTE_IVA = :IMPOR' +
              'TE_IVA,'#10'    IMPORTE_TOTAL = :IMPORTE_TOTAL,'#10'    ID_FORMA_PAGO = ' +
              ':ID_FORMA_PAGO,'#10'    ID_TIENDA = :ID_TIENDA,'#10'    ID_VENDEDOR = :I' +
              'D_VENDEDOR,'#10'    PERSONA_CONTACTO = :PERSONA_CONTACTO,'#10'    RE = :' +
              'RE,'#10'    IMPORTE_RE = :IMPORTE_RE,'#10'    RECARGO_EQUIVALENCIA = :RE' +
              'CARGO_EQUIVALENCIA,'#10'    TELEFONO = :TELEFONO,'#10'    MOVIL = :MOVIL' +
              ','#10'    TIPO_CONTRATO = :TIPO_CONTRATO,'#10'    REFERENCIA_CLIENTE = :' +
              'REFERENCIA_CLIENTE,'#10'    PRECIO_PUNTO = :PRECIO_PUNTO,'#10'    ID_DIR' +
              'ECCION_ENVIO = :ID_DIRECCION_ENVIO,'#10'    CALLE_ENVIO = :CALLE_ENV' +
              'IO,'#10'    POBLACION_ENVIO = :POBLACION_ENVIO,'#10'    PROVINCIA_ENVIO ' +
              '= :PROVINCIA_ENVIO,'#10'    CODIGO_POSTAL_ENVIO = :CODIGO_POSTAL_ENV' +
              'IO,'#10'    PERS_CONTACTO_ENVIO = :PERS_CONTACTO_ENVIO,'#10'    TLFS_ENV' +
              'IO = :TLFS_ENVIO,'#10'    NOTAS_ENVIO = NOTAS_ENVIO'#10#10'  WHERE'#10'    (ID' +
              ' = :OLD_ID)'#10#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_ContratosCliente'
      end
      item
        Params = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_CONTRATOS_CLI_DETALLE_ID'
            Value = ''
          end
          item
            Name = 'ID_CONTRATO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'POSICION'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'TIPO_DETALLE'
            DataType = datString
            Size = 10
            Value = ''
          end
          item
            Name = 'PROPIEDAD'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'CONCEPTO'
            DataType = datString
            Size = 2000
            Value = ''
          end
          item
            Name = 'CANTIDAD'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'IMPORTE_UNIDAD'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'VALORADO'
            DataType = datSmallInt
            Value = ''
          end
          item
            Name = 'VISIBLE'
            DataType = datSmallInt
            Value = ''
          end
          item
            Name = 'ID_ARTICULO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'TIPO_ARTICULO'
            DataType = datString
            Size = 2
            Value = ''
          end
          item
            Name = 'DESCUENTO'
            DataType = datFloat
            Value = ''
          end
          item
            Name = 'IMPORTE_PORTE'
            DataType = datCurrency
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            Default = True
            TargetTable = 'CONTRATOS_CLIENTE_DETALLES'
            SQL = 
              'INSERT'#10'  INTO CONTRATOS_CLIENTE_DETALLES'#10'    (ID, ID_CONTRATO, P' +
              'OSICION, TIPO_DETALLE, PROPIEDAD, CONCEPTO, CANTIDAD,'#10'     IMPOR' +
              'TE_UNIDAD, IMPORTE_TOTAL, VISIBLE, VALORADO, ID_ARTICULO, TIPO_A' +
              'RTICULO,'#10'     DESCUENTO, IMPORTE_PORTE, FECHA_ALTA)'#10'  VALUES'#10'   ' +
              ' (:ID, :ID_CONTRATO, :POSICION, :TIPO_DETALLE, :PROPIEDAD, :CONC' +
              'EPTO,'#10'     :CANTIDAD, :IMPORTE_UNIDAD, :IMPORTE_TOTAL, :VISIBLE,' +
              ' :VALORADO,'#10'     :ID_ARTICULO, :TIPO_ARTICULO, :DESCUENTO, :IMPO' +
              'RTE_PORTE, CURRENT_TIMESTAMP)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Insert_ContratosCliente_Detalles'
      end
      item
        Params = <
          item
            Name = 'OLD_ID'
            DataType = datAutoInc
            Value = '0'
          end>
        Statements = <
          item
            Connection = 'IBX'
            Default = True
            TargetTable = 'CONTRATOS_CLIENTE_DETALLES'
            SQL = 
              'DELETE '#10'  FROM'#10'    CONTRATOS_CLIENTE_DETALLES'#10'  WHERE'#10'    (ID = ' +
              ':OLD_ID)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Delete_ContratosCliente_Detalles'
      end
      item
        Params = <
          item
            Name = 'VALORADO'
            DataType = datSmallInt
            Value = ''
          end
          item
            Name = 'ID'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_CONTRATO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'POSICION'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'TIPO_DETALLE'
            DataType = datString
            Size = 10
            Value = ''
          end
          item
            Name = 'PROPIEDAD'
            DataType = datString
            Size = 255
            Value = ''
          end
          item
            Name = 'CONCEPTO'
            DataType = datString
            Size = 2000
            Value = ''
          end
          item
            Name = 'CANTIDAD'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'IMPORTE_UNIDAD'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'IMPORTE_TOTAL'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'VISIBLE'
            DataType = datSmallInt
            Value = ''
          end
          item
            Name = 'ID_ARTICULO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'TIPO_ARTICULO'
            DataType = datString
            Size = 2
            Value = ''
          end
          item
            Name = 'DESCUENTO'
            DataType = datFloat
            Value = ''
          end
          item
            Name = 'IMPORTE_PORTE'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'OLD_ID'
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            Default = True
            TargetTable = 'CONTRATOS_CLIENTE_DETALLES'
            SQL = 
              'UPDATE CONTRATOS_CLIENTE_DETALLES'#10'  SET '#10'    ID = :ID,'#10'    ID_CO' +
              'NTRATO = :ID_CONTRATO,'#10'    POSICION = :POSICION, '#10'    TIPO_DETAL' +
              'LE = :TIPO_DETALLE, '#10'    PROPIEDAD = :PROPIEDAD,'#10'    CONCEPTO = ' +
              ':CONCEPTO, '#10'    CANTIDAD = :CANTIDAD, '#10'    IMPORTE_UNIDAD = :IMP' +
              'ORTE_UNIDAD,'#10'    IMPORTE_TOTAL = :IMPORTE_TOTAL, '#10'    VISIBLE = ' +
              ':VISIBLE,'#10'    VALORADO = :VALORADO,'#10'    ID_ARTICULO = :ID_ARTICU' +
              'LO, '#10'    TIPO_ARTICULO = :TIPO_ARTICULO,'#10'    DESCUENTO = :DESCUE' +
              'NTO, '#10'    IMPORTE_PORTE = :IMPORTE_PORTE,'#10'    FECHA_MODIFICACION' +
              ' = CURRENT_TIMESTAMP'#10'  WHERE'#10'    (ID = :OLD_ID)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_ContratosCliente_Detalles'
      end>
    RelationShips = <
      item
        Name = 'FK_Propiedades_Valores'
        MasterDatasetName = 'Propiedades'
        MasterFields = 'ID_PROPIEDAD_VALORES'
        DetailDatasetName = 'Valores'
        DetailFields = 'ID_PROPIEDAD'
        RelationshipType = rtForeignKey
      end
      item
        Name = 'FK_ContratosCliente_Detalles'
        MasterDatasetName = 'ContratosCliente'
        MasterFields = 'ID'
        DetailDatasetName = 'ContratosCliente_Detalles'
        DetailFields = 'ID_CONTRATO'
        RelationshipType = rtForeignKey
      end>
    UpdateRules = <
      item
        Name = 'Insert ContratosCliente'
        DoUpdate = False
        DoDelete = False
        DatasetName = 'ContratosCliente'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Insert ContratosCliente_Detalles'
        DoUpdate = False
        DoDelete = False
        DatasetName = 'ContratosCliente_Detalles'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Update ContratosCliente'
        DoInsert = False
        DoDelete = False
        DatasetName = 'ContratosCliente'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Update ContratosCliente_Detalles'
        DoInsert = False
        DoDelete = False
        DatasetName = 'ContratosCliente_Detalles'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Delete ContratosCliente_Detalles'
        DoUpdate = False
        DoInsert = False
        DatasetName = 'ContratosCliente_Detalles'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Delete ContratosCliente'
        DoUpdate = False
        DoInsert = False
        DatasetName = 'ContratosCliente'
        FailureBehavior = fbRaiseException
      end>
    Version = 0
    Left = 48
    Top = 24
  end
  object DADataDictionary: TDADataDictionary
    Fields = <
      item
        Name = 'ContratosCliente_ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_PRESUPUESTOS_CLI_ID'
        Required = True
        DisplayLabel = 'ID'
        ServerAutoRefresh = True
      end
      item
        Name = 'ContratosCliente_ID_EMPRESA'
        DataType = datInteger
        DisplayLabel = 'ID_EMPRESA'
      end
      item
        Name = 'ContratosCliente_FECHA_DECISION'
        DataType = datDateTime
        DisplayLabel = 'Fecha decisi'#243'n'
      end
      item
        Name = 'ContratosCliente_REFERENCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Referencia'
      end
      item
        Name = 'ContratosCliente_SITUACION'
        DataType = datString
        Size = 255
        DisplayLabel = 'Situaci'#243'n'
      end
      item
        Name = 'ContratosCliente_ID_CLIENTE'
        DataType = datInteger
        DisplayLabel = 'ID_CLIENTE'
      end
      item
        Name = 'ContratosCliente_NIF_CIF'
        DataType = datString
        Size = 15
        DisplayLabel = 'NIF/CIF'
      end
      item
        Name = 'ContratosCliente_OBSERVACIONES'
        DataType = datMemo
        DisplayLabel = 'Observaciones'
      end
      item
        Name = 'ContratosCliente_INCIDENCIAS'
        DataType = datMemo
        DisplayLabel = 'INCIDENCIAS'
      end
      item
        Name = 'ContratosCliente_INCIDENCIAS_ACTIVAS'
        DataType = datInteger
        DisplayLabel = 'INCIDENCIAS_ACTIVAS'
      end
      item
        Name = 'ContratosCliente_FECHA_ALTA'
        DataType = datDateTime
        DisplayLabel = 'FECHA_ALTA'
      end
      item
        Name = 'ContratosCliente_FECHA_MODIFICACION'
        DataType = datDateTime
        DisplayLabel = 'FECHA_MODIFICACION'
      end
      item
        Name = 'ContratosCliente_USUARIO'
        DataType = datString
        Size = 20
        DisplayLabel = 'USUARIO'
      end
      item
        Name = 'ContratosCliente_IMPORTE_NETO'
        DataType = datCurrency
        DisplayLabel = 'Importe neto'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_PERSONA_CONTACTO'
        DataType = datString
        Size = 255
        DisplayLabel = 'Persona de contacto'
      end
      item
        Name = 'ContratosCliente_IMPORTE_PORTE'
        DataType = datCurrency
        DisplayLabel = 'Importe del porte'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_DESCUENTO'
        DataType = datFloat
        DisplayLabel = 'Descuento'
        DisplayFormat = ',0.00 %;-,0.00 %'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_IMPORTE_DESCUENTO'
        DataType = datCurrency
        DisplayLabel = 'Importe dto.'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_BASE_IMPONIBLE'
        DataType = datCurrency
        DisplayLabel = 'Base imponible'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_IVA'
        DataType = datFloat
        DisplayLabel = 'IVA'
        DisplayFormat = ',0.00 %;-,0.00 %'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_IMPORTE_IVA'
        DataType = datCurrency
        DisplayLabel = 'Importe IVA'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_IMPORTE_TOTAL'
        DataType = datCurrency
        DisplayLabel = 'Importe total'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_ID_FORMA_PAGO'
        DataType = datInteger
        DisplayLabel = 'ID_FORMA_PAGO'
      end
      item
        Name = 'ContratosCliente_Detalles_ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_PRESUPUESTOS_CLI_DETALLE_ID'
        Required = True
        DisplayLabel = 'ID'
        ServerAutoRefresh = True
      end
      item
        Name = 'ContratosCliente_Detalles_ID_PRESUPUESTO'
        DataType = datInteger
        Required = True
      end
      item
        Name = 'ContratosCliente_Detalles_POSICION'
        DataType = datInteger
        DisplayLabel = 'POSICION'
      end
      item
        Name = 'ContratosCliente_Detalles_TIPO_DETALLE'
        DataType = datString
        Size = 25
        DisplayLabel = 'TIPO_DETALLE'
      end
      item
        Name = 'ContratosCliente_Detalles_CONCEPTO'
        DataType = datString
        Size = 2000
        DisplayLabel = 'Concepto'
      end
      item
        Name = 'ContratosCliente_Detalles_CANTIDAD'
        DataType = datFloat
        DisplayLabel = 'Cantidad'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_Detalles_IMPORTE_UNIDAD'
        DataType = datCurrency
        DisplayLabel = 'Importe unidad'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_Detalles_IMPORTE_TOTAL'
        DataType = datCurrency
        DisplayLabel = 'Importe total'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_Detalles_VISIBLE'
        DataType = datInteger
        DisplayLabel = 'VISIBLE'
      end
      item
        Name = 'ContratosCliente_Detalles_ID_ARTICULO'
        DataType = datInteger
        DisplayLabel = 'ID_ARTICULO'
      end
      item
        Name = 'ContratosCliente_Detalles_DESCUENTO'
        DataType = datFloat
        DisplayLabel = 'Descuento'
        DisplayFormat = ',0.00 %;-,0.00 %'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_Detalles_IMPORTE_PORTE'
        DataType = datCurrency
        DisplayLabel = 'Importe porte'
        Alignment = taRightJustify
      end
      item
        Name = 'ContratosCliente_Detalles_REFERENCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Referencia'
      end
      item
        Name = 'ContratosCliente_Detalles_REFERENCIA_PROVEEDOR'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. proveedor'
      end
      item
        Name = 'ContratosCliente_Detalles_UNIDAD_MEDIDA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Unidad de medida'
      end
      item
        Name = 'ContratosCliente_CALLE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Calle'
      end
      item
        Name = 'ContratosCliente_POBLACION'
        DataType = datString
        Size = 255
        DisplayLabel = 'Poblaci'#243'n'
      end
      item
        Name = 'ContratosCliente_PROVINCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ContratosCliente_CODIGO_POSTAL'
        DataType = datString
        Size = 10
        DisplayLabel = 'C'#243'd. postal'
      end
      item
        Name = 'ContratosCliente_TELEFONO'
        DataType = datString
        Size = 25
        DisplayLabel = 'Tel'#233'fono'
      end
      item
        Name = 'ContratosCliente_MOVIL'
        DataType = datString
        Size = 25
        DisplayLabel = 'M'#243'vil'
      end
      item
        Name = 'ContratosCliente_FECHA_CONTRATO'
        DataType = datDateTime
        DisplayLabel = 'Fecha contrato'
      end
      item
        Name = 'ContratosCliente_FORMA_PAGO'
        DataType = datMemo
      end
      item
        Name = 'ContratosCliente_RECARGO_EQUIVALENCIA'
        DataType = datSmallInt
      end
      item
        Name = 'ContratosCliente_RE'
        DataType = datFloat
      end
      item
        Name = 'ContratosCliente_IMPORTE_RE'
        DataType = datCurrency
        DisplayLabel = 'Importe RE'
      end
      item
        Name = 'ContratosCliente_ID_TIPO_IVA'
        DataType = datInteger
      end
      item
        Name = 'ContratosCliente_ID_TIENDA'
        DataType = datInteger
      end
      item
        Name = 'ContratosCliente_TIENDA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ContratosCliente_ID_VENDEDOR'
        DataType = datInteger
      end
      item
        Name = 'ContratosCliente_VENDEDOR'
        DataType = datString
        Size = 255
        DisplayLabel = 'Vendedor'
      end
      item
        Name = 'ContratosCliente_REF_CLIENTE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. Cliente'
      end
      item
        Name = 'ContratosCliente_NOMBRE_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ContratosCliente_NOMBRE_COMERCIAL_CLIENTE'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ContratosCliente_NOMBRE'
        DataType = datString
        Size = 255
        ServerAutoRefresh = True
      end
      item
        Name = 'ContratosCliente_PLAZO_ENTREGA'
        DataType = datMemo
      end
      item
        Name = 'ContratosCliente_ID_DIRECCION'
        DataType = datInteger
      end
      item
        Name = 'ContratosCliente_TIPO_CONTRATO'
        DataType = datString
        Size = 255
        DisplayLabel = 'Tipo'
      end>
    Left = 48
    Top = 152
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 88
  end
  object bpContratosCliente: TDABusinessProcessor
    Schema = schContratosCliente
    InsertCommandName = 'Insert_ContratosCliente'
    DeleteCommandName = 'Delete_ContratosCliente'
    UpdateCommandName = 'Update_ContratosCliente'
    ReferencedDataset = 'ContratosCliente'
    ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
    UpdateMode = updWhereKeyOnly
    Left = 232
    Top = 24
  end
  object bpContratosClienteDetalles: TDABusinessProcessor
    Schema = schContratosCliente
    InsertCommandName = 'Insert_ContratosCliente_Detalles'
    DeleteCommandName = 'Delete_ContratosCliente_Detalles'
    UpdateCommandName = 'Update_ContratosCliente_Detalles'
    ReferencedDataset = 'ContratosCliente_Detalles'
    ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
    UpdateMode = updWhereKeyOnly
    Left = 232
    Top = 96
  end
end