object srvArticulos: TsrvArticulos
  OldCreateOrder = True
  OnCreate = DARemoteServiceCreate
  ConnectionName = 'IBX'
  ServiceSchema = schArticulos
  ServiceDataStreamer = Bin2DataStreamer
  AllowWhereSQL = True
  ExportedDataTables = <>
  BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection
  Height = 229
  Width = 517
  object DataDictionary: TDADataDictionary
    Fields = <
      item
        Name = 'Articulos_REFERENCIA'
        DataType = datString
        Size = 255
        LogChanges = False
        DisplayLabel = 'Referencia'
        ReadOnly = True
      end
      item
        Name = 'Articulos_DESCRIPCION'
        DataType = datString
        Size = 255
        LogChanges = False
        DisplayLabel = 'Descripci'#243'n'
        ReadOnly = True
      end
      item
        Name = 'Articulos_FAMILIA'
        DataType = datString
        Size = 25
        LogChanges = False
        DisplayLabel = 'Familia'
        ReadOnly = True
      end
      item
        Name = 'Articulos_ID'
        DataType = datInteger
        LogChanges = False
        ReadOnly = True
      end>
    Left = 150
    Top = 22
  end
  object schArticulos: TDASchema
    ConnectionManager = dmServer.ConnectionManager
    DataDictionary = DataDictionary
    Datasets = <
      item
        Params = <>
        Statements = <
          item
            Connection = 'FARMATIC'
            ConnectionType = 'MSSQL'
            Default = True
            SQL = 
              'SELECT'#10'      dbo.ARTICU.IdArticu as ID, dbo.ARTICU.IdArticu as R' +
              'EFERENCIA, dbo.ARTICU.Descripcion as DESCRIPCION, dbo.FAMILIA.De' +
              'scripcion as FAMILIA'#10'FROM'#10'    dbo.ARTICU WITH (NOLOCK INDEX = id' +
              'x_descripcion)'#10'LEFT JOIN'#10'     dbo.FAMILIA ON (dbo.FAMILIA.IdFami' +
              'lia = dbo.ARTICU.XFam_IdFamilia)'#10'WHERE {Where}'#10'ORDER BY IdArticu' +
              #10#10
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'REFERENCIA'
                TableField = 'REFERENCIA'
              end
              item
                DatasetField = 'DESCRIPCION'
                TableField = 'DESCRIPCION'
              end
              item
                DatasetField = 'FAMILIA'
                TableField = 'FAMILIA'
              end>
          end>
        Name = 'Articulos'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            DictionaryEntry = 'Articulos_ID'
          end
          item
            Name = 'REFERENCIA'
            DataType = datString
            Size = 255
            DictionaryEntry = 'Articulos_REFERENCIA'
          end
          item
            Name = 'DESCRIPCION'
            DataType = datString
            Size = 255
            DictionaryEntry = 'Articulos_DESCRIPCION'
          end
          item
            Name = 'FAMILIA'
            DataType = datString
            Size = 25
            DictionaryEntry = 'Articulos_FAMILIA'
          end>
        ReadOnly = True
      end>
    JoinDataTables = <>
    UnionDataTables = <>
    Commands = <>
    RelationShips = <
      item
        Name = 'FK_Articulos_Proveedor1'
        MasterFields = 'ID'
        DetailFields = 'ID_ARTICULO'
        RelationshipType = rtForeignKey
      end>
    UpdateRules = <
      item
        Name = 'Insert Articulos'
        DoUpdate = False
        DoDelete = False
        DatasetName = 'Articulos'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Insert Articulos_Proveedores'
        DoUpdate = False
        DoDelete = False
        DatasetName = 'Articulos_Proveedores'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Update Articulos_Proveedores'
        DoInsert = False
        DoDelete = False
        DatasetName = 'Articulos_Proveedores'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Update Articulos'
        DoInsert = False
        DoDelete = False
        DatasetName = 'Articulos'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Delete Articulos_Proveedores'
        DoUpdate = False
        DoInsert = False
        DatasetName = 'Articulos_Proveedores'
        FailureBehavior = fbRaiseException
      end
      item
        Name = 'Delete Articulos'
        DoUpdate = False
        DoInsert = False
        DatasetName = 'Articulos'
        FailureBehavior = fbRaiseException
      end>
    Version = 0
    Left = 48
    Top = 24
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 80
  end
end
