867 lines
24 KiB
Plaintext
867 lines
24 KiB
Plaintext
|
object DataModuleComisiones: TDataModuleComisiones
|
||
|
|
OldCreateOrder = True
|
||
|
|
OnCreate = DAClientDataModuleCreate
|
||
|
|
RemoteService = RORemoteService
|
||
|
|
Adapter = DABinAdapter
|
||
|
|
SchemaCall.MethodName = 'GetSchemaAsXML'
|
||
|
|
SchemaCall.Params = <
|
||
|
|
item
|
||
|
|
Name = 'Result'
|
||
|
|
ParamType = fResult
|
||
|
|
DataType = rtString
|
||
|
|
end>
|
||
|
|
Height = 414
|
||
|
|
Width = 518
|
||
|
|
object RORemoteService: TRORemoteService
|
||
|
|
ServiceName = 'srvComisiones'
|
||
|
|
Message = ROBinMessage1
|
||
|
|
Channel = ROWinInetHTTPChannel1
|
||
|
|
Left = 48
|
||
|
|
Top = 24
|
||
|
|
end
|
||
|
|
object DABinAdapter: TDABINAdapter
|
||
|
|
Left = 48
|
||
|
|
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 = 'Administrador'
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'Password'
|
||
|
|
ParamType = fIn
|
||
|
|
DataType = rtString
|
||
|
|
Value = '1'
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'LoginInfo'
|
||
|
|
ParamType = fOut
|
||
|
|
DataType = rtUserDefined
|
||
|
|
UserClassName = 'TRdxLoginInfo'
|
||
|
|
end>
|
||
|
|
RemoteService = LoginRemoteService
|
||
|
|
Left = 48
|
||
|
|
Top = 160
|
||
|
|
end
|
||
|
|
object LoginRemoteService: TRORemoteService
|
||
|
|
ServiceName = 'srvLogin'
|
||
|
|
Message = ROBinMessage1
|
||
|
|
Channel = ROWinInetHTTPChannel1
|
||
|
|
Left = 48
|
||
|
|
Top = 216
|
||
|
|
end
|
||
|
|
object ROWinInetHTTPChannel1: TROWinInetHTTPChannel
|
||
|
|
ServerLocators = <>
|
||
|
|
DispatchOptions = []
|
||
|
|
ProbeServers = False
|
||
|
|
ProbeFrequency = 60000
|
||
|
|
UserAgent = 'RemObjects SDK'
|
||
|
|
TargetURL = 'http://localhost:8099/bin'
|
||
|
|
Left = 48
|
||
|
|
Top = 272
|
||
|
|
end
|
||
|
|
object ROBinMessage1: TROBinMessage
|
||
|
|
Left = 48
|
||
|
|
Top = 324
|
||
|
|
end
|
||
|
|
object tbl_Comisiones: TDACDSDataTable
|
||
|
|
RemoteUpdatesOptions = []
|
||
|
|
Fields = <
|
||
|
|
item
|
||
|
|
Name = 'ID'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_ID'
|
||
|
|
InPrimaryKey = True
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_EMPRESA'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_ID_EMPRESA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'REFERENCIA'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
DisplayLabel = 'Comisiones_REFERENCIA'
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_REFERENCIA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_AGENTE'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'DESCRIPCION'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_DESCRIPCION'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'FECHA'
|
||
|
|
DataType = datDateTime
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_FECHA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'IMPORTE_TOTAL'
|
||
|
|
DataType = datFloat
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'USUARIO'
|
||
|
|
DataType = datString
|
||
|
|
Size = 20
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_USUARIO'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'NOMBRE'
|
||
|
|
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 = 'GetDatasetSchema'
|
||
|
|
SchemaCall.Params = <
|
||
|
|
item
|
||
|
|
Name = 'Result'
|
||
|
|
ParamType = fResult
|
||
|
|
DataType = rtBinary
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'aDatasetName'
|
||
|
|
ParamType = fIn
|
||
|
|
DataType = rtString
|
||
|
|
Value = 'Comisiones'
|
||
|
|
end>
|
||
|
|
DataRequestCall.MethodName = 'GetDatasetDataEx'
|
||
|
|
DataRequestCall.Params = <
|
||
|
|
item
|
||
|
|
Name = 'Result'
|
||
|
|
ParamType = fResult
|
||
|
|
DataType = rtBinary
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'DatasetName'
|
||
|
|
ParamType = fIn
|
||
|
|
DataType = rtString
|
||
|
|
Value = 'Comisiones'
|
||
|
|
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 = 'Comisiones'
|
||
|
|
end>
|
||
|
|
ReadOnly = False
|
||
|
|
RemoteService = RORemoteService
|
||
|
|
Adapter = DABinAdapter
|
||
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
||
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
||
|
|
LogicalName = 'Comisiones'
|
||
|
|
IndexDefs = <>
|
||
|
|
Left = 216
|
||
|
|
Top = 144
|
||
|
|
end
|
||
|
|
object ds_Comisiones: TDADataSource
|
||
|
|
DataTable = tbl_Comisiones
|
||
|
|
Left = 216
|
||
|
|
Top = 80
|
||
|
|
end
|
||
|
|
object tbl_Facturas_Comision: TDACDSDataTable
|
||
|
|
RemoteUpdatesOptions = []
|
||
|
|
Fields = <
|
||
|
|
item
|
||
|
|
Name = 'ID_EMPRESA'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_ID_EMPRESA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_AGENTE'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_ID_AGENTE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'AGENTE'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_AGENTE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_FACTURA'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Facturas_Comision_ID_FACTURA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_COMISION_LIQUIDADA'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Facturas_Comision_ID_COMISION_LIQUIDADA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'FECHA'
|
||
|
|
DataType = datDateTime
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_FECHA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'REFERENCIA'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_REFERENCIA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'SITUACION'
|
||
|
|
DataType = datString
|
||
|
|
Size = 19
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_SITUACION'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_CLIENTE'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
DisplayLabel = 'Facturas_Comision_ID_CLIENTE'
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Facturas_Comision_ID_CLIENTE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'CLIENTE'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
DisplayLabel = 'Facturas_Comision_CLIENTE'
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Facturas_Comision_CLIENTE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_PROVEEDOR'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_ID_PROVEEDOR'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'PROVEEDOR'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_PROVEEDOR'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'COMISION'
|
||
|
|
DataType = datFloat
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_COMISION'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'IMPORTE_COMISIONABLE'
|
||
|
|
DataType = datCurrency
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
DisplayLabel = 'Facturas_Comision_IMPORTE_COMISIONABLE'
|
||
|
|
Alignment = taRightJustify
|
||
|
|
DictionaryEntry = 'Facturas_Comision_IMPORTE_COMISIONABLE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'IMPORTE_COMISION'
|
||
|
|
DataType = datCurrency
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
DisplayLabel = 'Facturas_Comision_IMPORTE_COMISION'
|
||
|
|
Alignment = taRightJustify
|
||
|
|
DictionaryEntry = 'Facturas_Comision_IMPORTE_COMISION'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end>
|
||
|
|
Params = <
|
||
|
|
item
|
||
|
|
Name = 'ID_COMISION'
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
Value = 18
|
||
|
|
ParamType = daptInput
|
||
|
|
end>
|
||
|
|
MasterMappingMode = mmParams
|
||
|
|
MasterParamsMappings.Strings = (
|
||
|
|
'ID_COMISION=ID')
|
||
|
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
||
|
|
SchemaCall.MethodName = 'GetDatasetSchema'
|
||
|
|
SchemaCall.Params = <
|
||
|
|
item
|
||
|
|
Name = 'Result'
|
||
|
|
ParamType = fResult
|
||
|
|
DataType = rtBinary
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'aDatasetName'
|
||
|
|
ParamType = fIn
|
||
|
|
DataType = rtString
|
||
|
|
Value = 'Facturas_Comision'
|
||
|
|
end>
|
||
|
|
DataRequestCall.MethodName = 'GetDatasetDataEx'
|
||
|
|
DataRequestCall.Params = <
|
||
|
|
item
|
||
|
|
Name = 'Result'
|
||
|
|
ParamType = fResult
|
||
|
|
DataType = rtBinary
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'DatasetName'
|
||
|
|
ParamType = fIn
|
||
|
|
DataType = rtString
|
||
|
|
Value = 'Facturas_Comision'
|
||
|
|
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 = 'Facturas_Comision'
|
||
|
|
end>
|
||
|
|
ReadOnly = False
|
||
|
|
RemoteService = RORemoteService
|
||
|
|
Adapter = DABinAdapter
|
||
|
|
MasterSource = ds_Comisiones
|
||
|
|
MasterFields = 'ID'
|
||
|
|
DetailFields = 'ID_COMISION_LIQUIDADA'
|
||
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
||
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
||
|
|
LogicalName = 'Facturas_Comision'
|
||
|
|
IndexDefs = <>
|
||
|
|
Left = 368
|
||
|
|
Top = 144
|
||
|
|
end
|
||
|
|
object ds_Facturas_Comision: TDADataSource
|
||
|
|
DataTable = tbl_Facturas_Comision
|
||
|
|
Left = 368
|
||
|
|
Top = 80
|
||
|
|
end
|
||
|
|
object tbl_V_Detalles_Facturas_Comision: TDACDSDataTable
|
||
|
|
RemoteUpdatesOptions = []
|
||
|
|
Fields = <
|
||
|
|
item
|
||
|
|
Name = 'ID_EMPRESA'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_ID_EMPRESA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_AGENTE'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_ID_AGENTE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'AGENTE'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_AGENTE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_FACTURA'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_COMISION_LIQUIDADA'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'V_Detalles_Facturas_Comision_ID_COMISION_LIQUIDADA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'FECHA'
|
||
|
|
DataType = datDateTime
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_FECHA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'REFERENCIA'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_REFERENCIA'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'SITUACION'
|
||
|
|
DataType = datString
|
||
|
|
Size = 19
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_SITUACION'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_CLIENTE'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
DisplayLabel = 'Facturas_Comision_ID_CLIENTE'
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Facturas_Comision_ID_CLIENTE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'CLIENTE'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
DisplayLabel = 'Facturas_Comision_CLIENTE'
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Facturas_Comision_CLIENTE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'ID_PROVEEDOR'
|
||
|
|
DataType = datInteger
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_ID_PROVEEDOR'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'PROVEEDOR'
|
||
|
|
DataType = datString
|
||
|
|
Size = 255
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_PROVEEDOR'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'COMISION'
|
||
|
|
DataType = datFloat
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
Alignment = taLeftJustify
|
||
|
|
DictionaryEntry = 'Comisiones_Detalles_COMISION'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'IMPORTE_COMISIONABLE'
|
||
|
|
DataType = datCurrency
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
DisplayLabel = 'V_Detalles_Facturas_Comision_IMPORTE_COMISIONABLE'
|
||
|
|
Alignment = taRightJustify
|
||
|
|
DictionaryEntry = 'V_Detalles_Facturas_Comision_IMPORTE_COMISIONABLE'
|
||
|
|
InPrimaryKey = False
|
||
|
|
Calculated = False
|
||
|
|
Lookup = False
|
||
|
|
LookupCache = False
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'IMPORTE_COMISION'
|
||
|
|
DataType = datCurrency
|
||
|
|
BlobType = dabtUnknown
|
||
|
|
DisplayWidth = 0
|
||
|
|
DisplayLabel = 'V_Detalles_Facturas_Comision_IMPORTE_COMISION'
|
||
|
|
Alignment = taRightJustify
|
||
|
|
DictionaryEntry = 'V_Detalles_Facturas_Comision_IMPORTE_COMISION'
|
||
|
|
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 = 'V_Detalles_Facturas_Comision'
|
||
|
|
end>
|
||
|
|
DataRequestCall.MethodName = 'GetDatasetDataEx'
|
||
|
|
DataRequestCall.Params = <
|
||
|
|
item
|
||
|
|
Name = 'Result'
|
||
|
|
ParamType = fResult
|
||
|
|
DataType = rtBinary
|
||
|
|
end
|
||
|
|
item
|
||
|
|
Name = 'DatasetName'
|
||
|
|
ParamType = fIn
|
||
|
|
DataType = rtString
|
||
|
|
Value = 'V_Detalles_Facturas_Comision'
|
||
|
|
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 = 'V_Detalles_Facturas_Comision'
|
||
|
|
end>
|
||
|
|
ReadOnly = False
|
||
|
|
RemoteService = RORemoteService
|
||
|
|
Adapter = DABinAdapter
|
||
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
||
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
||
|
|
LogicalName = 'V_Detalles_Facturas_Comision'
|
||
|
|
IndexDefs = <>
|
||
|
|
Left = 312
|
||
|
|
Top = 312
|
||
|
|
end
|
||
|
|
object ds_V_Detalles_Facturas_Comision: TDADataSource
|
||
|
|
DataTable = tbl_V_Detalles_Facturas_Comision
|
||
|
|
Left = 312
|
||
|
|
Top = 256
|
||
|
|
end
|
||
|
|
end
|