roberto
422cad76fe
git-svn-id: https://192.168.0.254/svn/Proyectos.AlonsoYSal_FactuGES/trunk@12 9a1d36f3-7752-2d40-8ccb-50eb49674c68
793 lines
21 KiB
Plaintext
793 lines
21 KiB
Plaintext
object dmFacturasCliente: TdmFacturasCliente
|
|
OldCreateOrder = True
|
|
OnCreate = DAClientDataModuleCreate
|
|
RemoteService = RORemoteService
|
|
Adapter = dmBase.DABINAdapter
|
|
SchemaCall.MethodName = 'GetSchemaAsXML'
|
|
SchemaCall.Params = <
|
|
item
|
|
Name = 'Result'
|
|
ParamType = fResult
|
|
DataType = rtString
|
|
end>
|
|
Left = 444
|
|
Top = 330
|
|
Height = 443
|
|
Width = 638
|
|
object RORemoteService: TRORemoteService
|
|
ServiceName = 'srvFacturasCliente'
|
|
Message = dmBase.ROMessage
|
|
Channel = dmBase.ROChannel
|
|
Left = 48
|
|
Top = 32
|
|
end
|
|
object tbl_FacturasCliente: TDACDSDataTable
|
|
RemoteUpdatesOptions = []
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGOEMPRESA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Required = True
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'C'#243'd. empresa'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'CODIGOEMPRESA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'CODIGOFACTURACLIENTE'
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAALTA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
Required = True
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Fecha de alta'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'FECHAALTA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
Required = True
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Usuario de alta'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'USUARIO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHAFACTURA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
Required = True
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Fecha'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'FECHAFACTURA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Referencia'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'REFERENCIA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'BASEIMPONIBLE'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Base imponible'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'BASEIMPONIBLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'DESCUENTO'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Descuento'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'DESCUENTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEDESCUENTO'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Importe dto.'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'IMPORTEDESCUENTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'IVA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEIVA'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Importe IVA'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'IMPORTEIVA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Importe total'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'IMPORTETOTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'OBSERVACIONES'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Observaciones'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'OBSERVACIONES'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FORMAPAGO'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Forma de pago'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'FORMAPAGO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOCONTACTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Required = True
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'C'#243'd. contacto'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'CODIGOCONTACTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NIFCIF'
|
|
DataType = datString
|
|
Size = 10
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'NIF/CIF'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'NIFCIF'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
Required = True
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Nombre'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'NOMBRE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CALLE'
|
|
DataType = datString
|
|
Size = 150
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Calle'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'CALLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'PROVINCIA'
|
|
DataType = datString
|
|
Size = 30
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Provincia'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'PROVINCIA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOPOSTAL'
|
|
DataType = datString
|
|
Size = 5
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'C'#243'd. postal'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'CODIGOPOSTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'POBLACION'
|
|
DataType = datString
|
|
Size = 40
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Poblaci'#243'n'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'POBLACION'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGOALBARAN'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
Params = <>
|
|
MasterMappingMode = mmDataRequest
|
|
LogChanges = False
|
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
|
SchemaCall.MethodName = 'GetDatasetSchema'
|
|
SchemaCall.Params = <
|
|
item
|
|
Name = 'Result'
|
|
ParamType = fResult
|
|
DataType = rtBinary
|
|
end
|
|
item
|
|
Name = 'aDatasetName'
|
|
ParamType = fIn
|
|
DataType = rtString
|
|
Value = 'FacturasCliente'
|
|
end>
|
|
DataRequestCall.MethodName = 'GetDatasetDataEx'
|
|
DataRequestCall.Params = <
|
|
item
|
|
Name = 'Result'
|
|
ParamType = fResult
|
|
DataType = rtBinary
|
|
end
|
|
item
|
|
Name = 'DatasetName'
|
|
ParamType = fIn
|
|
DataType = rtString
|
|
Value = 'FacturasCliente'
|
|
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 = 'FacturasCliente'
|
|
end>
|
|
ReadOnly = False
|
|
RemoteService = RORemoteService
|
|
Adapter = dmBase.DABINAdapter
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
LogicalName = 'FacturasCliente'
|
|
IndexDefs = <>
|
|
Left = 144
|
|
Top = 32
|
|
end
|
|
object ds_FacturasCliente: TDADataSource
|
|
DataTable = tbl_FacturasCliente
|
|
Left = 240
|
|
Top = 32
|
|
end
|
|
object tbl_DetallesFacturasCliente: TDACDSDataTable
|
|
RemoteUpdatesOptions = []
|
|
Fields = <
|
|
item
|
|
Name = 'CODIGOFACTURA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'CODIGOFACTURACLIENTE'
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NUMCONCEPTO'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Required = True
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Num. concepto'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'NUMCONCEPTO'
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'POSICION'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Posici'#243'n'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'POSICIONCONCEPTO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'TIPO'
|
|
DataType = datString
|
|
Size = 1
|
|
Description = 'Cap'#237'tulo, etc'
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'TIPODETALLESFACTURACLIENTE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'DESCRIPCION'
|
|
DataType = datString
|
|
Size = 100
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Descripci'#243'n'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'DESCRIPCION'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CANTIDAD'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Cantidad'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'CANTIDAD'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTEUNIDAD'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Importe unitario'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'IMPORTEUNIDAD'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IMPORTETOTAL'
|
|
DataType = datCurrency
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Importe total'
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'IMPORTETOTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'VISIBLE'
|
|
DataType = datString
|
|
Size = 1
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
DictionaryEntry = 'DetallesFacturasCliente_VISIBLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
Params = <
|
|
item
|
|
Name = 'CODIGOFACTURA'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
MasterMappingMode = mmParams
|
|
MasterParamsMappings.Strings = (
|
|
'CODIGOFACTURA=CODIGO')
|
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
|
SchemaCall.MethodName = 'GetDatasetSchema'
|
|
SchemaCall.Params = <
|
|
item
|
|
Name = 'Result'
|
|
ParamType = fResult
|
|
DataType = rtBinary
|
|
end
|
|
item
|
|
Name = 'aDatasetName'
|
|
ParamType = fIn
|
|
DataType = rtString
|
|
Value = 'DetallesFacturasCliente'
|
|
end>
|
|
DataRequestCall.MethodName = 'GetDatasetDataEx'
|
|
DataRequestCall.Params = <
|
|
item
|
|
Name = 'Result'
|
|
ParamType = fResult
|
|
DataType = rtBinary
|
|
end
|
|
item
|
|
Name = 'DatasetName'
|
|
ParamType = fIn
|
|
DataType = rtString
|
|
Value = 'DetallesFacturasCliente'
|
|
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 = 'DetallesFacturasCliente'
|
|
end>
|
|
ReadOnly = False
|
|
RemoteService = RORemoteService
|
|
Adapter = dmBase.DABINAdapter
|
|
MasterSource = ds_FacturasCliente
|
|
MasterFields = 'CODIGO'
|
|
DetailFields = 'CODIGOFACTURA'
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtIncludeInAllInOneFetch]
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
LogicalName = 'DetallesFacturasCliente'
|
|
IndexDefs = <>
|
|
Left = 144
|
|
Top = 88
|
|
end
|
|
object ds_DetallesFacturasCliente: TDADataSource
|
|
DataTable = tbl_DetallesFacturasCliente
|
|
Left = 240
|
|
Top = 88
|
|
end
|
|
object DADesigntimeCall1: TDADesigntimeCall
|
|
RemoteRequest.MethodName = 'Login'
|
|
RemoteRequest.Params = <
|
|
item
|
|
Name = 'Result'
|
|
ParamType = fResult
|
|
DataType = rtBoolean
|
|
end
|
|
item
|
|
Name = 'UserID'
|
|
ParamType = fIn
|
|
DataType = rtString
|
|
Value = '1'
|
|
end
|
|
item
|
|
Name = 'Password'
|
|
ParamType = fIn
|
|
DataType = rtString
|
|
Value = '1'
|
|
end
|
|
item
|
|
Name = 'LoginInfo'
|
|
ParamType = fOut
|
|
DataType = rtUserDefined
|
|
UserClassName = 'TLoginInfo'
|
|
end>
|
|
RemoteService = RORemoteService2
|
|
Left = 48
|
|
Top = 88
|
|
end
|
|
object RORemoteService2: TRORemoteService
|
|
ServiceName = 'srvLogin'
|
|
Message = dmBase.ROMessage
|
|
Channel = dmBase.ROChannel
|
|
Left = 48
|
|
Top = 152
|
|
end
|
|
object tbl_ListaAnosFacturas: TDACDSDataTable
|
|
RemoteUpdatesOptions = []
|
|
Fields = <
|
|
item
|
|
Name = 'ANO'
|
|
DataType = datString
|
|
Size = 254
|
|
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 = 'ListaAnosFacturas'
|
|
end>
|
|
DataRequestCall.MethodName = 'GetDatasetDataEx'
|
|
DataRequestCall.Params = <
|
|
item
|
|
Name = 'Result'
|
|
ParamType = fResult
|
|
DataType = rtBinary
|
|
end
|
|
item
|
|
Name = 'DatasetName'
|
|
ParamType = fIn
|
|
DataType = rtString
|
|
Value = 'ListaAnosFacturas'
|
|
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 = 'ListaAnosFacturas'
|
|
end>
|
|
ReadOnly = False
|
|
RemoteService = RORemoteService
|
|
Adapter = dmBase.DABINAdapter
|
|
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
|
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
LogicalName = 'ListaAnosFacturas'
|
|
IndexDefs = <>
|
|
Left = 168
|
|
Top = 216
|
|
end
|
|
object ds_ListaAnosFacturas: TDADataSource
|
|
DataTable = tbl_ListaAnosFacturas
|
|
Left = 168
|
|
Top = 160
|
|
end
|
|
end
|