This repository has been archived on 2024-11-28. You can view files and clone it, but cannot push or open issues or pull requests.
LuisLeon_FactuGES/Source/Modulos/Tienda web/Data/uDataModuleTiendaWeb.dfm

1777 lines
48 KiB
Plaintext
Raw Normal View History

object DataModuleTiendaWeb: TDataModuleTiendaWeb
OldCreateOrder = True
OnCreate = DAClientDataModuleCreate
RemoteService = RORemoteService
Adapter = DABinAdapter
SchemaCall.MethodName = 'GetSchemaAsXML'
SchemaCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtString
end>
Height = 590
Width = 605
object RORemoteService: TRORemoteService
ServiceName = 'srvTiendaWeb'
Message = ROBinMessage1
Channel = ROWinInetHTTPChannel1
Left = 64
Top = 24
end
object DABinAdapter: TDABINAdapter
Left = 64
Top = 80
end
object DADesigntimeCall1: TDADesigntimeCall
RemoteRequest.MethodName = 'Login'
RemoteRequest.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBoolean
end
item
Name = 'User'
ParamType = fIn
DataType = rtString
Value = 'Luis'
end
item
Name = 'Password'
ParamType = fIn
DataType = rtString
Value = '1'
end
item
Name = 'LoginInfo'
ParamType = fOut
DataType = rtUserDefined
UserClassName = 'TRdxLoginInfo'
end>
RemoteService = LoginRemoteService
Left = 64
Top = 160
end
object LoginRemoteService: TRORemoteService
ServiceName = 'srvLogin'
Message = ROBinMessage1
Channel = ROWinInetHTTPChannel1
Left = 64
Top = 216
end
object ROWinInetHTTPChannel1: TROWinInetHTTPChannel
ServerLocators = <>
DispatchOptions = []
ProbeServers = False
ProbeFrequency = 60000
UserAgent = 'RemObjects SDK'
TargetURL = 'http://localhost:8099/bin'
Left = 64
Top = 272
end
object ROBinMessage1: TROBinMessage
Left = 64
Top = 324
end
object tbl_TiendaWeb: TDACDSDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datAutoInc
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'TiendaWeb_ID'
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TiendaWeb_ID_EMPRESA'
Alignment = taLeftJustify
DictionaryEntry = 'TiendaWeb_ID_EMPRESA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TIENDA_ACTIVA'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TiendaWeb_TIENDA_ACTIVA'
Alignment = taLeftJustify
DictionaryEntry = 'TiendaWeb_TIENDA_ACTIVA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'BDSERVER'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TiendaWeb_BDSERVER'
Alignment = taLeftJustify
DictionaryEntry = 'TiendaWeb_BDSERVER'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'BDPORT'
DataType = datString
Size = 20
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TiendaWeb_BDPORT'
Alignment = taLeftJustify
DictionaryEntry = 'TiendaWeb_BDPORT'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'BDNAME'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TiendaWeb_BDNAME'
Alignment = taLeftJustify
DictionaryEntry = 'TiendaWeb_BDNAME'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'BDUSER'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TiendaWeb_BDUSER'
Alignment = taLeftJustify
DictionaryEntry = 'TiendaWeb_BDUSER'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'BDPASS'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TiendaWeb_BDPASS'
Alignment = taLeftJustify
DictionaryEntry = 'TiendaWeb_BDPASS'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ULTIMA_ACTUALIZACION'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TiendaWeb_ULTIMA_ACTUALIZACION'
Alignment = taLeftJustify
DictionaryEntry = 'TiendaWeb_ULTIMA_ACTUALIZACION'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
Params = <>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
SchemaCall.MethodName = 'GetDatasetSchema'
SchemaCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'aDatasetName'
ParamType = fIn
DataType = rtString
Value = 'TiendaWeb'
end>
DataRequestCall.MethodName = 'GetDatasetDataEx'
DataRequestCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'DatasetName'
ParamType = fIn
DataType = rtString
Value = 'TiendaWeb'
end
item
Name = 'Params'
ParamType = fIn
DataType = rtUserDefined
UserClassName = 'TDADatasetParamArray'
end
item
Name = 'UserFilter'
ParamType = fIn
DataType = rtString
Value = ''
end
item
Name = 'IncludeSchema'
ParamType = fIn
DataType = rtBoolean
Value = False
end
item
Name = 'MaxRecords'
ParamType = fIn
DataType = rtInteger
Value = -1
end>
DataUpdateCall.MethodName = 'UpdateData'
DataUpdateCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'Delta'
ParamType = fIn
DataType = rtBinary
end>
ScriptCall.MethodName = 'GetDatasetScripts'
ScriptCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtString
Value = ''
end
item
Name = 'DatasetNames'
ParamType = fIn
DataType = rtString
Value = 'TiendaWeb'
end>
ReadOnly = False
RemoteService = RORemoteService
Adapter = DABinAdapter
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'TiendaWeb'
IndexDefs = <>
Left = 288
Top = 88
end
object ds_TiendaWeb: TDADataSource
DataTable = tbl_TiendaWeb
Left = 288
Top = 24
end
object tbl_osc_AddressBook: TDACDSDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'address_book_id'
DataType = datInteger
Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
ServerAutoRefresh = True
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'customers_id'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_customers_id'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_gender'
DataType = datString
Size = 1
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_gender'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_company'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_company'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_firstname'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_firstname'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_lastname'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_lastname'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_street_address'
DataType = datString
Size = 64
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_street_address'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_suburb'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_suburb'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_postcode'
DataType = datString
Size = 10
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_postcode'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_city'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_city'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_state'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_state'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_country_id'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_country_id'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_zone_id'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_entry_zone_id'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'entry_telephone'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'rdx_address_book_id_local'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_AddressBook_rdx_address_book_id_local'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
Params = <
item
Name = 'customers_id'
DataType = datInteger
BlobType = dabtUnknown
Value = '1'
ParamType = daptInput
end>
MasterMappingMode = mmParams
MasterParamsMappings.Strings = (
'customers_id=customers_id')
StreamingOptions = [soDisableEventsWhileStreaming]
SchemaCall.MethodName = 'GetDatasetSchemaOSC'
SchemaCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'aDatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_AddressBook'
end>
DataRequestCall.MethodName = 'GetDatasetDataExOSC'
DataRequestCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'DatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_AddressBook'
end
item
Name = 'Params'
ParamType = fIn
DataType = rtUserDefined
UserClassName = 'TDADatasetParamArray'
end
item
Name = 'UserFilter'
ParamType = fIn
DataType = rtString
Value = ''
end
item
Name = 'IncludeSchema'
ParamType = fIn
DataType = rtBoolean
Value = False
end
item
Name = 'MaxRecords'
ParamType = fIn
DataType = rtInteger
Value = -1
end>
DataUpdateCall.MethodName = 'UpdateDataOSC'
DataUpdateCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'Delta'
ParamType = fIn
DataType = rtBinary
end>
ScriptCall.MethodName = 'GetDatasetScripts'
ScriptCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtString
Value = ''
end
item
Name = 'DatasetNames'
ParamType = fIn
DataType = rtString
Value = 'osc_AddressBook'
end>
ReadOnly = False
RemoteService = RORemoteService
Adapter = DABinAdapter
MasterSource = ds_osc_Customers
MasterFields = 'customers_id'
DetailFields = 'customers_id'
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'osc_AddressBook'
IndexDefs = <>
Left = 400
Top = 248
end
object ds_osc_AddressBook: TDADataSource
DataTable = tbl_osc_AddressBook
Left = 400
Top = 176
end
object tbl_osc_Customers: TDACDSDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'customers_id'
DataType = datAutoInc
Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'osc_Customers_customers_id'
Alignment = taLeftJustify
ServerAutoRefresh = True
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'customers_firstname'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_Customers_customers_firstname'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'customers_lastname'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_Customers_customers_lastname'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'customers_email_address'
DataType = datString
Size = 96
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_Customers_customers_email_address'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'customers_default_address_id'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_Customers_customers_default_address_id'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'customers_telephone'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_Customers_customers_telephone'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'customers_fax'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_Customers_customers_fax'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'customers_password'
DataType = datString
Size = 40
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_Customers_customers_password'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'rdx_customers_id_local'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
DictionaryEntry = 'osc_Customers_rdx_customers_id_local'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'date_account_created'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'date_account_last_modified'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
Params = <>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
SchemaCall.MethodName = 'GetDatasetSchemaOSC'
SchemaCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'aDatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Customers'
end>
DataRequestCall.MethodName = 'GetDatasetDataExOSC'
DataRequestCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'DatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Customers'
end
item
Name = 'Params'
ParamType = fIn
DataType = rtUserDefined
UserClassName = 'TDADatasetParamArray'
end
item
Name = 'UserFilter'
ParamType = fIn
DataType = rtString
Value = ''
end
item
Name = 'IncludeSchema'
ParamType = fIn
DataType = rtBoolean
Value = False
end
item
Name = 'MaxRecords'
ParamType = fIn
DataType = rtInteger
Value = -1
end>
DataUpdateCall.MethodName = 'UpdateDataOSC'
DataUpdateCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'Delta'
ParamType = fIn
DataType = rtBinary
end>
ScriptCall.MethodName = 'GetDatasetScripts'
ScriptCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtString
Value = ''
end
item
Name = 'DatasetNames'
ParamType = fIn
DataType = rtString
Value = 'osc_Customers'
end>
ReadOnly = False
RemoteService = RORemoteService
Adapter = DABinAdapter
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'osc_Customers'
IndexDefs = <>
Left = 400
Top = 88
end
object ds_osc_Customers: TDADataSource
DataTable = tbl_osc_Customers
Left = 400
Top = 24
end
object tbl_osc_Manufacturers: TDACDSDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'manufacturers_id'
DataType = datAutoInc
Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
BlobType = dabtUnknown
DefaultValue = '0'
Required = True
DisplayWidth = 0
Alignment = taLeftJustify
ServerAutoRefresh = True
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'manufacturers_name'
DataType = datString
Size = 32
BlobType = dabtUnknown
DefaultValue = #39#39
Required = True
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'manufacturers_image'
DataType = datString
Size = 64
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'date_added'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'last_modified'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'rdx_manufacturers_id_local'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
Params = <>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
SchemaCall.MethodName = 'GetDatasetSchemaOSC'
SchemaCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'aDatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Manufacturers'
end>
DataRequestCall.MethodName = 'GetDatasetDataExOSC'
DataRequestCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'DatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Manufacturers'
end
item
Name = 'Params'
ParamType = fIn
DataType = rtUserDefined
UserClassName = 'TDADatasetParamArray'
end
item
Name = 'UserFilter'
ParamType = fIn
DataType = rtString
Value = ''
end
item
Name = 'IncludeSchema'
ParamType = fIn
DataType = rtBoolean
Value = False
end
item
Name = 'MaxRecords'
ParamType = fIn
DataType = rtInteger
Value = -1
end>
DataUpdateCall.MethodName = 'UpdateDataOSC'
DataUpdateCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'Delta'
ParamType = fIn
DataType = rtBinary
end>
ScriptCall.MethodName = 'GetDatasetScripts'
ScriptCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtString
Value = ''
end
item
Name = 'DatasetNames'
ParamType = fIn
DataType = rtString
Value = 'osc_Manufacturers'
end>
ReadOnly = False
RemoteService = RORemoteService
Adapter = DABinAdapter
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'osc_Manufacturers'
IndexDefs = <>
Left = 520
Top = 88
end
object ds_osc_Manufacturers: TDADataSource
DataTable = tbl_osc_Manufacturers
Left = 520
Top = 24
end
object tbl_osc_Products: TDACDSDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'products_id'
DataType = datAutoInc
Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
BlobType = dabtUnknown
DefaultValue = '0'
Required = True
DisplayWidth = 0
Alignment = taLeftJustify
ServerAutoRefresh = True
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_name'
DataType = datString
Size = 64
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_description'
DataType = datMemo
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_model'
DataType = datString
Size = 12
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_date_added'
DataType = datDateTime
BlobType = dabtUnknown
Required = True
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_last_modified'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_status'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'manufacturers_id'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'rdx_products_id_local'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
Params = <>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
SchemaCall.MethodName = 'GetDatasetSchemaOSC'
SchemaCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'aDatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Products'
end>
DataRequestCall.MethodName = 'GetDatasetDataExOSC'
DataRequestCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'DatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Products'
end
item
Name = 'Params'
ParamType = fIn
DataType = rtUserDefined
UserClassName = 'TDADatasetParamArray'
end
item
Name = 'UserFilter'
ParamType = fIn
DataType = rtString
Value = ''
end
item
Name = 'IncludeSchema'
ParamType = fIn
DataType = rtBoolean
Value = False
end
item
Name = 'MaxRecords'
ParamType = fIn
DataType = rtInteger
Value = -1
end>
DataUpdateCall.MethodName = 'UpdateDataOSC'
DataUpdateCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'Delta'
ParamType = fIn
DataType = rtBinary
end>
ScriptCall.MethodName = 'GetDatasetScripts'
ScriptCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtString
Value = ''
end
item
Name = 'DatasetNames'
ParamType = fIn
DataType = rtString
Value = 'osc_Products'
end>
ReadOnly = False
RemoteService = RORemoteService
Adapter = DABinAdapter
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'osc_Products'
IndexDefs = <>
Left = 520
Top = 248
end
object ds_osc_Products: TDADataSource
DataTable = tbl_osc_Products
Left = 520
Top = 176
end
object tbl_osc_Orders: TDACDSDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'orders_id'
DataType = datInteger
Description = #161#161#161#161#161#161' ESTE CAMPO TIENE QUE SER AUTOINC PARA QUE FUNCIONE !!!!!'
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
ServerAutoRefresh = True
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'rdx_orders_id_local'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'customers_id'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'rdx_customers_id_local'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'delivery_name'
DataType = datString
Size = 64
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'delivery_company'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'delivery_street_address'
DataType = datString
Size = 64
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'delivery_suburb'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'delivery_city'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'delivery_postcode'
DataType = datString
Size = 10
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'delivery_state'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'delivery_country'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'delivery_telephone'
DataType = datString
Size = 32
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'last_modified'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'date_purchased'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'orders_status'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'orders_date_finished'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'comments'
DataType = datMemo
BlobType = dabtMemo
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'rdx_ship_date'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'rdx_referencia_cliente'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
Params = <>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
SchemaCall.MethodName = 'GetDatasetSchemaOSC'
SchemaCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'aDatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Orders'
end>
DataRequestCall.MethodName = 'GetDatasetDataExOSC'
DataRequestCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'DatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Orders'
end
item
Name = 'Params'
ParamType = fIn
DataType = rtUserDefined
UserClassName = 'TDADatasetParamArray'
end
item
Name = 'UserFilter'
ParamType = fIn
DataType = rtString
Value = ''
end
item
Name = 'IncludeSchema'
ParamType = fIn
DataType = rtBoolean
Value = False
end
item
Name = 'MaxRecords'
ParamType = fIn
DataType = rtInteger
Value = -1
end>
DataUpdateCall.MethodName = 'UpdateDataOSC'
DataUpdateCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'Delta'
ParamType = fIn
DataType = rtBinary
end>
ScriptCall.MethodName = 'GetDatasetScripts'
ScriptCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtString
Value = ''
end
item
Name = 'DatasetNames'
ParamType = fIn
DataType = rtString
Value = 'osc_Orders'
end>
ReadOnly = False
RemoteService = RORemoteService
Adapter = DABinAdapter
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'osc_Orders'
IndexDefs = <>
Left = 200
Top = 336
end
object ds_osc_Orders: TDADataSource
DataTable = tbl_osc_Orders
Left = 200
Top = 400
end
object tbl_osc_Orders_products: TDACDSDataTable
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 !!!!!'
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
ServerAutoRefresh = True
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'orders_id'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_id'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'rdx_products_id_local'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_model'
DataType = datString
Size = 12
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_name'
DataType = datString
Size = 64
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_price'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'final_price'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_tax'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'products_quantity'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
ReadOnly = True
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
Params = <
item
Name = 'orders_id'
DataType = datInteger
BlobType = dabtUnknown
Value = '1'
ParamType = daptInput
end>
MasterMappingMode = mmParams
MasterParamsMappings.Strings = (
'orders_id=orders_id')
StreamingOptions = [soDisableEventsWhileStreaming]
SchemaCall.MethodName = 'GetDatasetSchemaOSC'
SchemaCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'aDatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Orders_products'
end>
DataRequestCall.MethodName = 'GetDatasetDataExOSC'
DataRequestCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'DatasetName'
ParamType = fIn
DataType = rtString
Value = 'osc_Orders_products'
end
item
Name = 'Params'
ParamType = fIn
DataType = rtUserDefined
UserClassName = 'TDADatasetParamArray'
end
item
Name = 'UserFilter'
ParamType = fIn
DataType = rtString
Value = ''
end
item
Name = 'IncludeSchema'
ParamType = fIn
DataType = rtBoolean
Value = False
end
item
Name = 'MaxRecords'
ParamType = fIn
DataType = rtInteger
Value = -1
end>
DataUpdateCall.MethodName = 'UpdateDataOSC'
DataUpdateCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtBinary
end
item
Name = 'Delta'
ParamType = fIn
DataType = rtBinary
end>
ScriptCall.MethodName = 'GetDatasetScripts'
ScriptCall.Params = <
item
Name = 'Result'
ParamType = fResult
DataType = rtString
Value = ''
end
item
Name = 'DatasetNames'
ParamType = fIn
DataType = rtString
Value = 'osc_Orders_products'
end>
ReadOnly = False
RemoteService = RORemoteService
Adapter = DABinAdapter
MasterSource = ds_osc_Orders
MasterFields = 'orders_id'
DetailFields = 'orders_id'
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'osc_Orders_products'
IndexDefs = <>
Left = 312
Top = 336
end
object ds_osc_Orders_products: TDADataSource
DataTable = tbl_osc_Orders_products
Left = 312
Top = 400
end
end