LuisLeon_FactuGES2/Source/Modulos/Tienda web/Data/uDataModuleTiendaWeb.dfm

inherited DataModuleTiendaWeb: TDataModuleTiendaWeb
  OnCreate = DAClientDataModuleCreate
  Height = 590
  Width = 605
  object RORemoteService: TRORemoteService
    Message = ROBinMessage1
    Channel = ROWinInetHTTPChannel1
    ServiceName = 'srvTiendaWeb'
    Left = 64
    Top = 24
  end
  object DADesigntimeCall1: TDADesigntimeCall
    RemoteService = LoginRemoteService
    Params = <>
    Left = 64
    Top = 160
  end
  object LoginRemoteService: TRORemoteService
    Message = ROBinMessage1
    Channel = ROWinInetHTTPChannel1
    ServiceName = 'srvLogin'
    Left = 64
    Top = 216
  end
  object ROWinInetHTTPChannel1: TROWinInetHTTPChannel
    UserAgent = 'RemObjects SDK'
    TargetURL = 'http://localhost:8099/bin'
    ServerLocators = <>
    DispatchOptions = []
    Left = 64
    Top = 272
  end
  object ROBinMessage1: TROBinMessage
    Envelopes = <>
    Left = 64
    Top = 324
  end
  object tbl_osc_AddressBook: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'address_book_id'
        DataType = datAutoInc
        Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
        ServerAutoRefresh = True
        InPrimaryKey = True
      end
      item
        Name = 'customers_id'
        DataType = datInteger
        DictionaryEntry = 'osc_AddressBook_customers_id'
      end
      item
        Name = 'entry_gender'
        DataType = datString
        Size = 1
        DictionaryEntry = 'osc_AddressBook_entry_gender'
      end
      item
        Name = 'entry_company'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_AddressBook_entry_company'
      end
      item
        Name = 'entry_firstname'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_AddressBook_entry_firstname'
      end
      item
        Name = 'entry_lastname'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_AddressBook_entry_lastname'
      end
      item
        Name = 'entry_street_address'
        DataType = datString
        Size = 64
        DictionaryEntry = 'osc_AddressBook_entry_street_address'
      end
      item
        Name = 'entry_suburb'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_AddressBook_entry_suburb'
      end
      item
        Name = 'entry_postcode'
        DataType = datString
        Size = 10
        DictionaryEntry = 'osc_AddressBook_entry_postcode'
      end
      item
        Name = 'entry_city'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_AddressBook_entry_city'
      end
      item
        Name = 'entry_state'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_AddressBook_entry_state'
      end
      item
        Name = 'entry_country_id'
        DataType = datInteger
        DictionaryEntry = 'osc_AddressBook_entry_country_id'
      end
      item
        Name = 'entry_zone_id'
        DataType = datInteger
        DictionaryEntry = 'osc_AddressBook_entry_zone_id'
      end
      item
        Name = 'entry_telephone'
        DataType = datString
        Size = 32
      end
      item
        Name = 'rdx_address_book_id_local'
        DataType = datInteger
        DictionaryEntry = 'osc_AddressBook_rdx_address_book_id_local'
      end>
    Params = <
      item
        Name = 'customers_id'
        DataType = datInteger
        Value = '1'
        ParamType = daptInput
      end>
    MasterParamsMappings.Strings = (
      'customers_id=customers_id')
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_TiendaWeb
    MasterSource = ds_osc_Customers
    MasterFields = 'customers_id'
    DetailFields = 'customers_id'
    LogicalName = 'osc_AddressBook'
    IndexDefs = <>
    Left = 400
    Top = 248
  end
  object ds_osc_AddressBook: TDADataSource
    DataSet = tbl_osc_AddressBook.Dataset
    DataTable = tbl_osc_AddressBook
    Left = 400
    Top = 176
  end
  object tbl_osc_Customers: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'customers_id'
        DataType = datAutoInc
        Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
        DisplayLabel = 'osc_Customers_customers_id'
        ServerAutoRefresh = True
        InPrimaryKey = True
      end
      item
        Name = 'customers_firstname'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_Customers_customers_firstname'
      end
      item
        Name = 'customers_lastname'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_Customers_customers_lastname'
      end
      item
        Name = 'customers_email_address'
        DataType = datString
        Size = 96
        DictionaryEntry = 'osc_Customers_customers_email_address'
      end
      item
        Name = 'customers_default_address_id'
        DataType = datInteger
        DictionaryEntry = 'osc_Customers_customers_default_address_id'
      end
      item
        Name = 'customers_telephone'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_Customers_customers_telephone'
      end
      item
        Name = 'customers_fax'
        DataType = datString
        Size = 32
        DictionaryEntry = 'osc_Customers_customers_fax'
      end
      item
        Name = 'customers_password'
        DataType = datString
        Size = 40
        DictionaryEntry = 'osc_Customers_customers_password'
      end
      item
        Name = 'rdx_customers_id_local'
        DataType = datInteger
        DictionaryEntry = 'osc_Customers_rdx_customers_id_local'
      end
      item
        Name = 'date_account_created'
        DataType = datDateTime
      end
      item
        Name = 'date_account_last_modified'
        DataType = datDateTime
      end>
    Params = <>
    MasterMappingMode = mmDataRequest
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_TiendaWeb
    LogicalName = 'osc_Customers'
    IndexDefs = <>
    Left = 400
    Top = 88
  end
  object ds_osc_Customers: TDADataSource
    DataSet = tbl_osc_Customers.Dataset
    DataTable = tbl_osc_Customers
    Left = 400
    Top = 24
  end
  object tbl_osc_Manufacturers: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'manufacturers_id'
        DataType = datAutoInc
        Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
        DefaultValue = '0'
        Required = True
        ServerAutoRefresh = True
        InPrimaryKey = True
      end
      item
        Name = 'manufacturers_name'
        DataType = datString
        Size = 32
        DefaultValue = #39#39
        Required = True
      end
      item
        Name = 'manufacturers_image'
        DataType = datString
        Size = 64
      end
      item
        Name = 'date_added'
        DataType = datDateTime
      end
      item
        Name = 'last_modified'
        DataType = datDateTime
      end
      item
        Name = 'rdx_manufacturers_id_local'
        DataType = datInteger
      end>
    Params = <>
    MasterMappingMode = mmDataRequest
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_TiendaWeb
    LogicalName = 'osc_Manufacturers'
    IndexDefs = <>
    Left = 520
    Top = 88
  end
  object ds_osc_Manufacturers: TDADataSource
    DataSet = tbl_osc_Manufacturers.Dataset
    DataTable = tbl_osc_Manufacturers
    Left = 520
    Top = 24
  end
  object tbl_osc_Orders: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'orders_id'
        DataType = datAutoInc
        Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
        ServerAutoRefresh = True
        InPrimaryKey = True
      end
      item
        Name = 'rdx_orders_id_local'
        DataType = datInteger
      end
      item
        Name = 'customers_id'
        DataType = datInteger
        ReadOnly = True
      end
      item
        Name = 'rdx_customers_id_local'
        DataType = datInteger
        ReadOnly = True
      end
      item
        Name = 'delivery_name'
        DataType = datString
        Size = 64
        ReadOnly = True
      end
      item
        Name = 'delivery_company'
        DataType = datString
        Size = 32
        ReadOnly = True
      end
      item
        Name = 'delivery_street_address'
        DataType = datString
        Size = 64
        ReadOnly = True
      end
      item
        Name = 'delivery_suburb'
        DataType = datString
        Size = 32
        ReadOnly = True
      end
      item
        Name = 'delivery_city'
        DataType = datString
        Size = 32
        ReadOnly = True
      end
      item
        Name = 'delivery_postcode'
        DataType = datString
        Size = 10
        ReadOnly = True
      end
      item
        Name = 'delivery_state'
        DataType = datString
        Size = 32
        ReadOnly = True
      end
      item
        Name = 'delivery_country'
        DataType = datString
        Size = 32
        ReadOnly = True
      end
      item
        Name = 'delivery_telephone'
        DataType = datString
        Size = 32
        ReadOnly = True
      end
      item
        Name = 'last_modified'
        DataType = datDateTime
      end
      item
        Name = 'date_purchased'
        DataType = datDateTime
      end
      item
        Name = 'orders_status'
        DataType = datInteger
      end
      item
        Name = 'orders_date_finished'
        DataType = datDateTime
      end
      item
        Name = 'comments'
        DataType = datMemo
        BlobType = dabtMemo
        ReadOnly = True
      end
      item
        Name = 'rdx_ship_date'
        DataType = datDateTime
      end
      item
        Name = 'rdx_referencia_cliente'
        DataType = datString
        Size = 255
      end>
    Params = <>
    MasterMappingMode = mmDataRequest
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_TiendaWeb
    LogicalName = 'osc_Orders'
    IndexDefs = <>
    Left = 200
    Top = 336
  end
  object ds_osc_Orders: TDADataSource
    DataSet = tbl_osc_Orders.Dataset
    DataTable = tbl_osc_Orders
    Left = 200
    Top = 400
  end
  object tbl_osc_Orders_products: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'orders_products_id'
        DataType = datAutoInc
        Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
        ServerAutoRefresh = True
        InPrimaryKey = True
      end
      item
        Name = 'orders_id'
        DataType = datInteger
        ReadOnly = True
      end
      item
        Name = 'products_id'
        DataType = datInteger
        ReadOnly = True
      end
      item
        Name = 'rdx_products_id_local'
        DataType = datInteger
        ReadOnly = True
      end
      item
        Name = 'products_model'
        DataType = datString
        Size = 12
        ReadOnly = True
      end
      item
        Name = 'products_name'
        DataType = datString
        Size = 64
        ReadOnly = True
      end
      item
        Name = 'products_price'
        DataType = datFloat
        ReadOnly = True
      end
      item
        Name = 'final_price'
        DataType = datFloat
        ReadOnly = True
      end
      item
        Name = 'products_tax'
        DataType = datFloat
        ReadOnly = True
      end
      item
        Name = 'products_quantity'
        DataType = datInteger
        ReadOnly = True
      end>
    Params = <
      item
        Name = 'orders_id'
        DataType = datInteger
        Value = '1'
        ParamType = daptInput
      end>
    MasterParamsMappings.Strings = (
      'orders_id=orders_id')
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_TiendaWeb
    MasterSource = ds_osc_Orders
    MasterFields = 'orders_id'
    DetailFields = 'orders_id'
    LogicalName = 'osc_Orders_products'
    IndexDefs = <>
    Left = 312
    Top = 336
  end
  object ds_osc_Orders_products: TDADataSource
    DataSet = tbl_osc_Orders_products.Dataset
    DataTable = tbl_osc_Orders_products
    Left = 312
    Top = 400
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 64
    Top = 84
  end
  object rda_TiendaWeb: TDARemoteDataAdapter
    DataStreamer = Bin2DataStreamer
    GetSchemaCall.RemoteService = RORemoteService
    GetDataCall.RemoteService = RORemoteService
    UpdateDataCall.RemoteService = RORemoteService
    GetScriptsCall.RemoteService = RORemoteService
    RemoteService = RORemoteService
    Left = 163
    Top = 87
  end
  object tbl_TiendaWeb: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        DictionaryEntry = 'TiendaWeb_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
        DisplayLabel = 'TiendaWeb_ID_EMPRESA'
        DictionaryEntry = 'TiendaWeb_ID_EMPRESA'
      end
      item
        Name = 'TIENDA_ACTIVA'
        DataType = datInteger
        DisplayLabel = 'TiendaWeb_TIENDA_ACTIVA'
        DictionaryEntry = 'TiendaWeb_TIENDA_ACTIVA'
      end
      item
        Name = 'BDSERVER'
        DataType = datString
        Size = 255
        DisplayLabel = 'TiendaWeb_BDSERVER'
        DictionaryEntry = 'TiendaWeb_BDSERVER'
      end
      item
        Name = 'BDPORT'
        DataType = datString
        Size = 20
        DisplayLabel = 'TiendaWeb_BDPORT'
        DictionaryEntry = 'TiendaWeb_BDPORT'
      end
      item
        Name = 'BDNAME'
        DataType = datString
        Size = 255
        DisplayLabel = 'TiendaWeb_BDNAME'
        DictionaryEntry = 'TiendaWeb_BDNAME'
      end
      item
        Name = 'BDUSER'
        DataType = datString
        Size = 255
        DisplayLabel = 'TiendaWeb_BDUSER'
        DictionaryEntry = 'TiendaWeb_BDUSER'
      end
      item
        Name = 'BDPASS'
        DataType = datString
        Size = 255
        DisplayLabel = 'TiendaWeb_BDPASS'
        DictionaryEntry = 'TiendaWeb_BDPASS'
      end
      item
        Name = 'ULTIMA_ACTUALIZACION'
        DataType = datDateTime
        DisplayLabel = 'TiendaWeb_ULTIMA_ACTUALIZACION'
        DictionaryEntry = 'TiendaWeb_ULTIMA_ACTUALIZACION'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_TiendaWeb
    LogicalName = 'TiendaWeb'
    IndexDefs = <>
    Left = 264
    Top = 80
  end
  object ds_TiendaWeb: TDADataSource
    DataSet = tbl_TiendaWeb.Dataset
    DataTable = tbl_TiendaWeb
    Left = 264
    Top = 24
  end
  object tbl_osc_Products: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'products_id'
        DataType = datAutoInc
        Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
        DefaultValue = '0'
        Required = True
        ServerAutoRefresh = True
        InPrimaryKey = True
      end
      item
        Name = 'products_name'
        DataType = datString
        Size = 64
      end
      item
        Name = 'products_description'
        DataType = datMemo
      end
      item
        Name = 'products_model'
        DataType = datString
        Size = 12
      end
      item
        Name = 'products_date_added'
        DataType = datDateTime
        Required = True
      end
      item
        Name = 'products_last_modified'
        DataType = datDateTime
      end
      item
        Name = 'products_status'
        DataType = datInteger
      end
      item
        Name = 'manufacturers_id'
        DataType = datInteger
      end
      item
        Name = 'rdx_products_id_local'
        DataType = datInteger
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_TiendaWeb
    LogicalName = 'osc_Products'
    IndexDefs = <>
    Left = 520
    Top = 232
  end
  object ds_osc_Products: TDADataSource
    DataSet = tbl_osc_Products.Dataset
    DataTable = tbl_osc_Products
    Left = 520
    Top = 176
  end
end