object srvInventario: TsrvInventario
  OldCreateOrder = True
  SessionManager = dmServer.SessionManager
  ConnectionName = 'IBX'
  ServiceSchema = schInventario
  ServiceDataStreamer = Bin2DataStreamer
  ExportedDataTables = <>
  BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection
  Height = 168
  Width = 300
  object schInventario: TDASchema
    ConnectionManager = dmServer.ConnectionManager
    DataDictionary = DataDictionary
    Datasets = <
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'V_INVENTARIO'
            SQL = 
              'SELECT'#10'    ID_ALMACEN, ID_ARTICULO, IMPORTE_COMPRA_2ANOS, NOMBRE' +
              ' as ALMACEN, ID_EMPRESA, REFERENCIA, FAMILIA,'#10'    DESCRIPCION, S' +
              'TOCK_MIN, UNIDAD_MEDIDA, PRECIO_NETO, STOCK, (IMPORTE_COMPRA_2AN' +
              'OS * STOCK) as COSTE_MEDIO_TOTAL,'#10'    UNIDADES_ALMACEN, COSTE_UN' +
              'IDADES, RESERVA, PENDIENTE_RECEPCION,'#10'    '#10'    /*'#10'    NO BORRAR ' +
              'YA QUE SIRVE PARA LAS ENTRADAS Y SALIDAS DE ALMACEN(TABLA MOVIMI' +
              'ENTOS)'#10'    DEBERIA GENERAR UNA TABLA DE MOVIMIENTOS INDEPENDIENT' +
              'E DEL INVENTARIO PERO POR FALTA'#10'    DE TIEMPO Y FIABILIDAD YA QU' +
              'E AHORA FUNCIONA TODO, CREAMOS ESTOS CAMPOS FICTICIOS'#10'    */'#10#10'  ' +
              '  0 as ID, 0 as CANTIDAD, current_date as FECHA_MOVIMIENTO, NULL' +
              ' as CAUSA, NULL as TIPO'#10#10#10'FROM V_INVENTARIO'#10'where {where}'#10'ORDER ' +
              'BY ID_ARTICULO'#10#10#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID_ALMACEN'
                TableField = 'ID_ALMACEN'
              end
              item
                DatasetField = 'ID_ARTICULO'
                TableField = 'ID_ARTICULO'
              end
              item
                DatasetField = 'ALMACEN'
                TableField = 'ALMACEN'
              end
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'FAMILIA'
                TableField = 'FAMILIA'
              end
              item
                DatasetField = 'DESCRIPCION'
                TableField = 'DESCRIPCION'
              end
              item
                DatasetField = 'STOCK'
                TableField = 'STOCK'
              end
              item
                DatasetField = 'RESERVA'
                TableField = 'RESERVA'
              end
              item
                DatasetField = 'PENDIENTE_RECEPCION'
                TableField = 'PENDIENTE_RECEPCION'
              end
              item
                DatasetField = 'CANTIDAD'
                TableField = 'CANTIDAD'
              end
              item
                DatasetField = 'FECHA_MOVIMIENTO'
                TableField = 'FECHA_MOVIMIENTO'
              end
              item
                DatasetField = 'CAUSA'
                TableField = 'CAUSA'
              end
              item
                DatasetField = 'TIPO'
                TableField = 'TIPO'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'UNIDADES_ALMACEN'
                TableField = 'UNIDADES_ALMACEN'
              end
              item
                DatasetField = 'PRECIO_NETO'
                TableField = 'PRECIO_NETO'
              end
              item
                DatasetField = 'COSTE_UNIDADES'
                TableField = 'COSTE_UNIDADES'
              end
              item
                DatasetField = 'STOCK_MIN'
                TableField = 'STOCK_MIN'
              end
              item
                DatasetField = 'UNIDAD_MEDIDA'
                TableField = 'UNIDAD_MEDIDA'
              end
              item
                DatasetField = 'IMPORTE_COMPRA_2ANOS'
                TableField = 'IMPORTE_COMPRA_2ANOS'
              end
              item
                DatasetField = 'COSTE_MEDIO_TOTAL'
                TableField = '<unknown>'
                SQLOrigin = 'COSTE_MEDIO_TOTAL'
              end>
          end>
        Name = 'Inventario'
        Fields = <
          item
            Name = 'ID_ALMACEN'
            DataType = datInteger
            DictionaryEntry = 'Inventario_ID_ALMACEN'
          end
          item
            Name = 'ID_ARTICULO'
            DataType = datInteger
            DictionaryEntry = 'Inventario_ID_ARTICULO'
          end
          item
            Name = 'IMPORTE_COMPRA_2ANOS'
            DataType = datFloat
          end
          item
            Name = 'ALMACEN'
            DataType = datString
            Size = 255
            DictionaryEntry = 'Inventario_ALMACEN'
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            DictionaryEntry = 'Inventario_ID_EMPRESA'
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'Inventario_REFERENCIA'
          end
          item
            Name = 'FAMILIA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'Inventario_FAMILIA'
          end
          item
            Name = 'DESCRIPCION'
            DataType = datString
            Size = 255
            DictionaryEntry = 'Inventario_DESCRIPCION'
          end
          item
            Name = 'STOCK_MIN'
            DataType = datInteger
            DictionaryEntry = 'Inventario_STOCK_MIN'
          end
          item
            Name = 'UNIDAD_MEDIDA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'Inventario_UNIDAD_MEDIDA'
          end
          item
            Name = 'PRECIO_NETO'
            DataType = datCurrency
            DictionaryEntry = 'Inventario_PRECIO_NETO'
          end
          item
            Name = 'STOCK'
            DataType = datFloat
            DictionaryEntry = 'Inventario_STOCK'
          end
          item
            Name = 'COSTE_MEDIO_TOTAL'
            DataType = datFloat
          end
          item
            Name = 'UNIDADES_ALMACEN'
            DataType = datFloat
            DictionaryEntry = 'Inventario_UNIDADES_ALMACEN'
          end
          item
            Name = 'COSTE_UNIDADES'
            DataType = datCurrency
            DictionaryEntry = 'Inventario_COSTE_UNIDADES'
          end
          item
            Name = 'RESERVA'
            DataType = datFloat
            DictionaryEntry = 'Inventario_RESERVA'
          end
          item
            Name = 'PENDIENTE_RECEPCION'
            DataType = datFloat
            DictionaryEntry = 'Inventario_PENDIENTE_RECEPCION'
          end
          item
            Name = 'ID'
            DataType = datInteger
            DictionaryEntry = 'Inventario_ID'
            InPrimaryKey = True
            Calculated = True
          end
          item
            Name = 'CANTIDAD'
            DataType = datFloat
            DictionaryEntry = 'Inventario_CANTIDAD'
          end
          item
            Name = 'FECHA_MOVIMIENTO'
            DataType = datDateTime
            DictionaryEntry = 'Inventario_FECHA_MOVIMIENTO'
          end
          item
            Name = 'CAUSA'
            DataType = datString
            Size = 2000
            DictionaryEntry = 'Inventario_CAUSA'
          end
          item
            Name = 'TIPO'
            DataType = datString
            Size = 1
            DictionaryEntry = 'Inventario_TIPO'
          end>
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'V_INV_DETALLE_RESERVAS'
            SQL = 
              'SELECT'#10'  ID_ALB,'#10'  ID_EMPRESA,'#10'  REFERENCIA_ALB,'#10'  SITUACION_ALB' +
              ','#10'  FECHA_PREVISTA_ENVIO_ALB,'#10'  ID_ALMACEN_ALB,'#10'  ALMACEN_ALB,'#10' ' +
              ' ID_CLIENTE_ALB,'#10'  CLIENTE_ALB,'#10'  ID_ART,'#10'  FAMILIA_ART,'#10'  REFER' +
              'ENCIA_ART,'#10'  REFERENCIA_PROV_ART,'#10'  DESCRIPCION_ART,'#10'  CANTIDAD_' +
              'ART'#10'  '#10'FROM V_INV_DETALLE_RESERVAS'#10'where {where}'#10'ORDER BY REFERE' +
              'NCIA_ALB'#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID_ALB'
                TableField = 'ID_ALB'
              end
              item
                DatasetField = 'REFERENCIA_ALB'
                TableField = 'REFERENCIA_ALB'
              end
              item
                DatasetField = 'SITUACION_ALB'
                TableField = 'SITUACION_ALB'
              end
              item
                DatasetField = 'FECHA_PREVISTA_ENVIO_ALB'
                TableField = 'FECHA_PREVISTA_ENVIO_ALB'
              end
              item
                DatasetField = 'ID_ALMACEN_ALB'
                TableField = 'ID_ALMACEN_ALB'
              end
              item
                DatasetField = 'ALMACEN_ALB'
                TableField = 'ALMACEN_ALB'
              end
              item
                DatasetField = 'ID_CLIENTE_ALB'
                TableField = 'ID_CLIENTE_ALB'
              end
              item
                DatasetField = 'CLIENTE_ALB'
                TableField = 'CLIENTE_ALB'
              end
              item
                DatasetField = 'ID_ART'
                TableField = 'ID_ART'
              end
              item
                DatasetField = 'FAMILIA_ART'
                TableField = 'FAMILIA_ART'
              end
              item
                DatasetField = 'REFERENCIA_ART'
                TableField = 'REFERENCIA_ART'
              end
              item
                DatasetField = 'REFERENCIA_PROV_ART'
                TableField = 'REFERENCIA_PROV_ART'
              end
              item
                DatasetField = 'DESCRIPCION_ART'
                TableField = 'DESCRIPCION_ART'
              end
              item
                DatasetField = 'CANTIDAD_ART'
                TableField = 'CANTIDAD_ART'
              end
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end>
          end>
        Name = 'DetalleReservas'
        Fields = <
          item
            Name = 'ID_ALB'
            DataType = datInteger
            DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_ALB'
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_EMPRESA'
          end
          item
            Name = 'REFERENCIA_ALB'
            DataType = datString
            Size = 255
            DictionaryEntry = 'DETALLE_RESERVAS_INV_REFERENCIA_ALB'
          end
          item
            Name = 'SITUACION_ALB'
            DataType = datString
            Size = 9
            DictionaryEntry = 'DETALLE_RESERVAS_INV_SITUACION_ALB'
          end
          item
            Name = 'FECHA_PREVISTA_ENVIO_ALB'
            DataType = datDateTime
            DictionaryEntry = 'DETALLE_RESERVAS_INV_FECHA_PREVISTA_ENVIO_ALB'
          end
          item
            Name = 'ID_ALMACEN_ALB'
            DataType = datInteger
            DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_ALMACEN_ALB'
          end
          item
            Name = 'ALMACEN_ALB'
            DataType = datString
            Size = 255
            DictionaryEntry = 'DETALLE_RESERVAS_INV_ALMACEN_ALB'
          end
          item
            Name = 'ID_CLIENTE_ALB'
            DataType = datInteger
            DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_CLIENTE_ALB'
          end
          item
            Name = 'CLIENTE_ALB'
            DataType = datString
            Size = 255
            DictionaryEntry = 'DETALLE_RESERVAS_INV_CLIENTE_ALB'
          end
          item
            Name = 'ID_ART'
            DataType = datInteger
            DictionaryEntry = 'DETALLE_RESERVAS_INV_ID_ART'
          end
          item
            Name = 'FAMILIA_ART'
            DataType = datString
            Size = 255
            DictionaryEntry = 'DETALLE_RESERVAS_INV_FAMILIA_ART'
          end
          item
            Name = 'REFERENCIA_ART'
            DataType = datString
            Size = 255
            DictionaryEntry = 'DETALLE_RESERVAS_INV_REFERENCIA_ART'
          end
          item
            Name = 'REFERENCIA_PROV_ART'
            DataType = datString
            Size = 255
            DictionaryEntry = 'DETALLE_RESERVAS_INV_REFERENCIA_PROV_ART'
          end
          item
            Name = 'DESCRIPCION_ART'
            DataType = datString
            Size = 255
            DictionaryEntry = 'DETALLE_RESERVAS_INV_DESCRIPCION_ART'
          end
          item
            Name = 'CANTIDAD_ART'
            DataType = datFloat
            DictionaryEntry = 'DETALLE_RESERVAS_INV_CANTIDAD_ART'
          end>
      end>
    JoinDataTables = <>
    UnionDataTables = <>
    Commands = <
      item
        Params = <
          item
            Name = 'ID'
            DataType = datAutoInc
            GeneratorName = 'GEN_MOVIMIENTOS_ID'
            Value = ''
          end
          item
            Name = 'ID_ALMACEN'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_ARTICULO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'FECHA_MOVIMIENTO'
            DataType = datDateTime
            Value = ''
          end
          item
            Name = 'TIPO'
            DataType = datString
            Size = 1
            Value = ''
          end
          item
            Name = 'CANTIDAD'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'CAUSA'
            DataType = datString
            Size = 2000
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'MOVIMIENTOS'
            SQL = 
              'INSERT'#10'  INTO MOVIMIENTOS'#10'    (ID, ID_ALMACEN, ID_ARTICULO, FECH' +
              'A_MOVIMIENTO, TIPO, CANTIDAD, CAUSA)'#10'  VALUES'#10'    (:ID, :ID_ALMA' +
              'CEN, :ID_ARTICULO, :FECHA_MOVIMIENTO, :TIPO, :CANTIDAD, :CAUSA)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Insert_INVENTARIO'
      end
      item
        Params = <
          item
            Name = 'OLD_ID'
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'MOVIMIENTOS'
            SQL = 'DELETE '#10'  FROM'#10'    MOVIMIENTO'#10'  WHERE'#10'    (ID = :OLD_ID)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Delete_INVENTARIO'
      end
      item
        Params = <
          item
            Name = 'ID'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_ALMACEN'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'ID_ARTICULO'
            DataType = datInteger
            Value = ''
          end
          item
            Name = 'FECHA_MOVIMIENTO'
            DataType = datDateTime
            Value = ''
          end
          item
            Name = 'TIPO'
            DataType = datString
            Size = 1
            Value = ''
          end
          item
            Name = 'CANTIDAD'
            DataType = datCurrency
            Value = ''
          end
          item
            Name = 'CAUSA'
            DataType = datString
            Size = 2000
            Value = ''
          end
          item
            Name = 'OLD_ID'
            Value = ''
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'MOVIMIENTOS'
            SQL = 
              'UPDATE MOVIMIENTOS'#10'  SET '#10'    ID = :ID,'#10'    ID_ALMACEN = :ID_ALM' +
              'ACEN,'#10'    ID_ARTICULO = :ID_ARTICULO,'#10'    FECHA_MOVIMIENTO = :FE' +
              'CHA_MOVIMIENTO,'#10'    TIPO = :TIPO,'#10'    CANTIDAD = :CANTIDAD,'#10'    ' +
              'CAUSA = :CAUSA'#10'  WHERE'#10'    (ID = :OLD_ID)'#10
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_INVENTARIO'
      end>
    RelationShips = <>
    UpdateRules = <>
    Version = 0
    Left = 40
    Top = 16
  end
  object bpInventario: TDABusinessProcessor
    Schema = schInventario
    InsertCommandName = 'Insert_INVENTARIO'
    DeleteCommandName = 'Delete_INVENTARIO'
    UpdateCommandName = 'Update_INVENTARIO'
    ReferencedDataset = 'INVENTARIO'
    ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
    UpdateMode = updWhereKeyOnly
    Left = 208
    Top = 16
  end
  object DataDictionary: TDADataDictionary
    Fields = <
      item
        Name = 'DETALLE_RESERVAS_INV_ID_ALB'
        DataType = datInteger
        DisplayLabel = 'IdAlbaran'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_REFERENCIA_ALB'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. albar'#225'n'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_SITUACION_ALB'
        DataType = datString
        Size = 9
        DisplayLabel = 'Situaci'#243'n'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_FECHA_PREVISTA_ENVIO_ALB'
        DataType = datDateTime
        DisplayLabel = 'Fecha prevista de envio'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_ID_ALMACEN_ALB'
        DataType = datInteger
        DisplayLabel = 'IdAlmac'#233'n'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_ALMACEN_ALB'
        DataType = datString
        Size = 255
        DisplayLabel = 'Almac'#233'n'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_ID_CLIENTE_ALB'
        DataType = datInteger
        DisplayLabel = 'IdCliente'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_CLIENTE_ALB'
        DataType = datString
        Size = 255
        DisplayLabel = 'Cliente'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_ID_ART'
        DataType = datInteger
        DisplayLabel = 'IdArticulo'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_FAMILIA_ART'
        DataType = datString
        Size = 255
        DisplayLabel = 'Familia'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_REFERENCIA_ART'
        DataType = datString
        Size = 255
        DisplayLabel = 'Referencia'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_REFERENCIA_PROV_ART'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. proveedor'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_DESCRIPCION_ART'
        DataType = datString
        Size = 255
        DisplayLabel = 'Descripci'#243'n'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_CANTIDAD_ART'
        DataType = datFloat
        DisplayLabel = 'Reservado'
      end
      item
        Name = 'DETALLE_RESERVAS_INV_ID_EMPRESA'
        DataType = datInteger
      end
      item
        Name = 'Inventario_ID_ALMACEN'
        DataType = datInteger
        DisplayLabel = 'ID_ALMACEN'
      end
      item
        Name = 'Inventario_ID_ARTICULO'
        DataType = datInteger
        DisplayLabel = 'ID_ARTICULO'
      end
      item
        Name = 'Inventario_ALMACEN'
        DataType = datString
        Size = 255
        DisplayLabel = 'ALMACEN'
      end
      item
        Name = 'Inventario_ID_EMPRESA'
        DataType = datInteger
        DisplayLabel = 'ID_EMPRESA'
      end
      item
        Name = 'Inventario_REFERENCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'INVENTARIO_REFERENCIA'
      end
      item
        Name = 'Inventario_FAMILIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'FAMILIA'
      end
      item
        Name = 'Inventario_DESCRIPCION'
        DataType = datString
        Size = 255
        DisplayLabel = 'DESCRIPCION'
      end
      item
        Name = 'Inventario_REFERENCIA_PROVEEDOR'
        DataType = datString
        Size = 255
        DisplayLabel = 'REFERENCIA_PROVEEDOR'
      end
      item
        Name = 'Inventario_PRECIO_NETO'
        DataType = datCurrency
        DisplayLabel = 'Precio unidad'
        Alignment = taRightJustify
      end
      item
        Name = 'Inventario_STOCK'
        DataType = datFloat
        DisplayLabel = 'Stock disponible'
      end
      item
        Name = 'Inventario_UNIDADES_ALMACEN'
        DataType = datFloat
        DisplayLabel = 'U. Almac'#233'n'
      end
      item
        Name = 'Inventario_COSTE_UNIDADES'
        DataType = datCurrency
        DisplayLabel = 'Coste unidades'
        Alignment = taRightJustify
      end
      item
        Name = 'Inventario_RESERVA'
        DataType = datFloat
        DisplayLabel = 'Reservado'
      end
      item
        Name = 'Inventario_PENDIENTE_RECEPCION'
        DataType = datFloat
        DisplayLabel = 'Pendiente de recibir'
      end
      item
        Name = 'Inventario_ID'
        DataType = datInteger
        LogChanges = False
        DisplayLabel = 'INVENTARIO_ID'
      end
      item
        Name = 'Inventario_CANTIDAD'
        DataType = datFloat
        DisplayLabel = 'INVENTARIO_CANTIDAD'
      end
      item
        Name = 'Inventario_FECHA_MOVIMIENTO'
        DataType = datDateTime
        DisplayLabel = 'INVENTARIO_FECHA_MOVIMIENTO'
      end
      item
        Name = 'Inventario_CAUSA'
        DataType = datString
        Size = 2000
        DisplayLabel = 'INVENTARIO_CAUSA'
      end
      item
        Name = 'Inventario_TIPO'
        DataType = datString
        Size = 1
        DisplayLabel = 'INVENTARIO_TIPO'
      end
      item
        Name = 'Inventario_STOCK_MIN'
        DataType = datInteger
      end
      item
        Name = 'Inventario_UNIDAD_MEDIDA'
        DataType = datString
        Size = 255
      end>
    Left = 126
    Top = 14
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 40
    Top = 80
  end
end