Componentes.Terceros.RemObjects/internal/5.0.35.741/1/Data Abstract for Delphi/Samples/Multi Level Detail/MultiLevelDetailClient_Data.dfm

object MultiLevelDetailClient_DataModule: TMultiLevelDetailClient_DataModule
  OldCreateOrder = True
  Height = 300
  Width = 300
  object Channel: TROWinInetHTTPChannel
    UserAgent = 'RemObjects SDK'
    TargetURL = 'http://localhost:8099/BIN'
    ServerLocators = <>
    DispatchOptions = []
    Left = 40
    Top = 8
  end
  object Message: TROBinMessage
    Envelopes = <>
    Left = 40
    Top = 52
  end
  object RemoteService: TRORemoteService
    Message = Message
    Channel = Channel
    ServiceName = 'MultiLevelDetailService'
    Left = 40
    Top = 96
  end
  object DataStreamer: TDABinDataStreamer
    Left = 40
    Top = 140
  end
  object RemoteDataAdapter: TDARemoteDataAdapter
    GetSchemaCall.RemoteService = RemoteService
    GetDataCall.RemoteService = RemoteService
    UpdateDataCall.RemoteService = RemoteService
    GetScriptsCall.RemoteService = RemoteService
    RemoteService = RemoteService
    DataStreamer = DataStreamer
    Left = 40
    Top = 184
  end
  object ds_Categories: TDADataSource
    DataSet = tbl_Categories.Dataset
    DataTable = tbl_Categories
    Left = 133
    Top = 131
  end
  object ds_Products: TDADataSource
    DataSet = tbl_Products.Dataset
    DataTable = tbl_Products
    Left = 133
    Top = 177
  end
  object ds_OrderDetails: TDADataSource
    DataSet = tbl_OrderDetails.Dataset
    DataTable = tbl_OrderDetails
    Left = 133
    Top = 86
  end
  object tbl_OrderDetails: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'OrderID'
        DataType = datInteger
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'ProductID'
        DataType = datInteger
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'UnitPrice'
        DataType = datCurrency
        Required = True
      end
      item
        Name = 'Quantity'
        DataType = datSmallInt
        Required = True
      end
      item
        Name = 'Discount'
        DataType = datFloat
        Required = True
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = RemoteDataAdapter
    AfterInsert = tbl_OrderDetailsAfterInsert
    MasterSource = ds_Products
    MasterFields = 'ProductID'
    DetailFields = 'ProductID'
    LogicalName = 'Order Details'
    IndexDefs = <>
    Left = 221
    Top = 86
  end
  object tbl_Products: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ProductID'
        DataType = datAutoInc
        GeneratorName = 'Products'
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'ProductName'
        DataType = datWideString
        Size = 40
        Required = True
      end
      item
        Name = 'SupplierID'
        DataType = datInteger
      end
      item
        Name = 'CategoryID'
        DataType = datInteger
      end
      item
        Name = 'QuantityPerUnit'
        DataType = datWideString
        Size = 20
      end
      item
        Name = 'UnitPrice'
        DataType = datCurrency
      end
      item
        Name = 'UnitsInStock'
        DataType = datSmallInt
      end
      item
        Name = 'UnitsOnOrder'
        DataType = datSmallInt
      end
      item
        Name = 'ReorderLevel'
        DataType = datSmallInt
      end
      item
        Name = 'Discontinued'
        DataType = datBoolean
        Required = True
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = RemoteDataAdapter
    AfterInsert = tbl_ProductsAfterInsert
    MasterSource = ds_Categories
    MasterFields = 'CategoryID'
    DetailFields = 'CategoryID'
    LogicalName = 'Products'
    IndexDefs = <>
    Left = 218
    Top = 179
  end
  object tbl_Categories: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'CategoryID'
        DataType = datAutoInc
        GeneratorName = 'Categories'
        Required = True
        InPrimaryKey = True
      end
      item
        Name = 'CategoryName'
        DataType = datWideString
        Size = 15
        Required = True
      end
      item
        Name = 'Description'
        DataType = datMemo
      end
      item
        Name = 'Picture'
        DataType = datBlob
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = RemoteDataAdapter
    LogicalName = 'Categories'
    IndexDefs = <>
    Left = 220
    Top = 131
  end
end