Tecsitel_FactuGES2/Source/Modulos/Facturas de proveedor/Data/uDataModuleFacturasProveedor.dfm

366 lines
11 KiB
Plaintext
Raw Normal View History

inherited DataModuleFacturasProveedor: TDataModuleFacturasProveedor
OnCreate = DAClientDataModuleCreate
Height = 246
Width = 518
object RORemoteService: TRORemoteService
ServiceName = 'srvFacturasProveedor'
Left = 48
Top = 24
end
object tbl_FacturasProveedor: TDACDSDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datAutoInc
Required = True
DictionaryEntry = 'FacturasCliente_ID'
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'FacturasCliente_ID_EMPRESA'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 20
DisplayLabel = 'Referencia'
DictionaryEntry = 'FacturasCliente_REFERENCIA'
end
item
Name = 'TIPO'
DataType = datString
Size = 1
DisplayLabel = 'Tipo'
DictionaryEntry = 'FacturasProveedor_TIPO'
end
item
Name = 'REFERENCIA_PROVEEDOR'
DataType = datString
Size = 255
DictionaryEntry = 'FacturasProveedor_REFERENCIA_PROVEEDOR'
end
item
Name = 'FECHA_FACTURA'
DataType = datDateTime
DisplayLabel = 'Fecha de las factura'
DictionaryEntry = 'FacturasCliente_FECHA_FACTURA'
end
item
Name = 'SITUACION'
DataType = datString
Size = 255
DisplayLabel = 'Situaci'#243'n'
DictionaryEntry = 'FacturasCliente_SITUACION'
end
item
Name = 'BASE_IMPONIBLE'
DataType = datCurrency
DisplayLabel = 'Base imponible'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_BASE_IMPONIBLE'
end
item
Name = 'DESCUENTO'
DataType = datFloat
DisplayLabel = 'Dto.'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_DESCUENTO'
end
item
Name = 'IMPORTE_DESCUENTO'
DataType = datCurrency
DisplayLabel = 'Importe dto.'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_DESCUENTO'
end
item
Name = 'IVA'
DataType = datFloat
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IVA'
end
item
Name = 'IMPORTE_IVA'
DataType = datCurrency
DisplayLabel = 'Importe IVA'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_IVA'
end
item
Name = 'RE'
DataType = datFloat
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_RE'
end
item
Name = 'IMPORTE_RE'
DataType = datCurrency
DisplayLabel = 'Importe RE'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_RE'
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe total'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_TOTAL'
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
DisplayLabel = 'Observaciones'
DictionaryEntry = 'FacturasCliente_OBSERVACIONES'
end
item
Name = 'ID_PROVEEDOR'
DataType = datInteger
DisplayLabel = 'FacturasProveedor_ID_PROVEEDOR'
DictionaryEntry = 'FacturasProveedor_ID_PROVEEDOR'
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
DisplayLabel = 'NIF/CIF'
DictionaryEntry = 'FacturasCliente_NIF_CIF'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 100
DisplayLabel = 'Cliente'
DictionaryEntry = 'FacturasCliente_NOMBRE'
end
item
Name = 'CALLE'
DataType = datString
Size = 150
DisplayLabel = 'Direcci'#243'n'
DictionaryEntry = 'FacturasCliente_CALLE'
end
item
Name = 'POBLACION'
DataType = datString
Size = 150
DisplayLabel = 'Poblaci'#243'n'
DictionaryEntry = 'FacturasCliente_POBLACION'
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 30
DisplayLabel = 'Provincia'
DictionaryEntry = 'FacturasCliente_PROVINCIA'
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
DisplayLabel = 'C'#243'd. postal'
DictionaryEntry = 'FacturasCliente_CODIGO_POSTAL'
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
DictionaryEntry = 'FacturasCliente_FECHA_ALTA'
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
DictionaryEntry = 'FacturasCliente_FECHA_MODIFICACION'
end
item
Name = 'USUARIO'
DataType = datString
Size = 100
DictionaryEntry = 'FacturasCliente_USUARIO'
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
DisplayLabel = 'FacturasCliente_ID_FORMA_PAGO'
DictionaryEntry = 'FacturasCliente_ID_FORMA_PAGO'
end
item
Name = 'RECARGO_EQUIVALENCIA'
DataType = datInteger
DisplayLabel = #191'Con R.E.?'
DictionaryEntry = 'FacturasCliente_RECARGO_EQUIVALENCIA'
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
DictionaryEntry = 'FacturasProveedor_ID_TIPO_IVA'
end
item
Name = 'IMPORTE_NETO'
DataType = datCurrency
DisplayLabel = 'Importe neto'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_NETO'
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
DisplayLabel = 'Importe del porte'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_IMPORTE_PORTE'
end
item
Name = 'FECHA_VENCIMIENTO'
DataType = datDateTime
LogChanges = False
DisplayLabel = 'Fecha de vencimiento'
DictionaryEntry = 'FacturasCliente_FECHA_VENCIMIENTO'
Calculated = True
end>
Params = <>
MasterMappingMode = mmDataRequest
StreamingOptions = [soDisableEventsWhileStreaming]
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'FacturasProveedor'
IndexDefs = <>
Left = 224
Top = 160
end
object ds_FacturasProveedor: TDADataSource
DataSet = tbl_FacturasProveedor.Dataset
DataTable = tbl_FacturasProveedor
Left = 224
Top = 104
end
object tbl_FacturasProveedor_Detalles: TDACDSDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datAutoInc
Required = True
DictionaryEntry = 'FacturasCliente_Detalles_ID'
InPrimaryKey = True
end
item
Name = 'ID_FACTURA'
DataType = datInteger
DictionaryEntry = 'FacturasCliente_Detalles_ID_FACTURA'
end
item
Name = 'POSICION'
DataType = datInteger
DisplayLabel = 'Posici'#243'n'
DictionaryEntry = 'FacturasCliente_Detalles_POSICION'
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
DisplayLabel = 'Tipo detalle'
DictionaryEntry = 'FacturasCliente_Detalles_TIPO_DETALLE'
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 2000
DisplayLabel = 'Concepto'
DictionaryEntry = 'FacturasCliente_Detalles_CONCEPTO'
end
item
Name = 'CANTIDAD'
DataType = datInteger
DisplayLabel = 'Cantidad'
DictionaryEntry = 'FacturasCliente_Detalles_CANTIDAD'
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datCurrency
DisplayLabel = 'Importe unidad'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_Detalles_IMPORTE_UNIDAD'
end
item
Name = 'DESCUENTO'
DataType = datFloat
DictionaryEntry = 'FacturasProveedor_Detalles_DESCUENTO'
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe total'
Alignment = taRightJustify
DictionaryEntry = 'FacturasCliente_Detalles_IMPORTE_TOTAL'
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
DictionaryEntry = 'FacturasProveedor_Detalles_ID_ARTICULO'
end
item
Name = 'VISIBLE'
DataType = datInteger
DisplayLabel = #191'Visible?'
DictionaryEntry = 'FacturasCliente_Detalles_VISIBLE'
end
item
Name = 'IMPORTE_PORTE'
DataType = datFloat
DictionaryEntry = 'FacturasProveedor_Detalles_IMPORTE_PORTE'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DictionaryEntry = 'FacturasProveedor_Detalles_REFERENCIA'
end
item
Name = 'REFERENCIA_PROVEEDOR'
DataType = datString
Size = 255
DictionaryEntry = 'FacturasProveedor_Detalles_REFERENCIA_PROVEEDOR'
end>
Params = <
item
Name = 'ID_FACTURA'
DataType = datInteger
Value = ''
ParamType = daptInput
end>
MasterParamsMappings.Strings = (
'ID_FACTURA=ID')
StreamingOptions = [soDisableEventsWhileStreaming]
MasterSource = ds_FacturasProveedor
MasterFields = 'ID'
DetailFields = 'ID_FACTURA'
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'FacturasProveedor_Detalles'
IndexDefs = <>
Left = 400
Top = 160
end
object ds_FacturasProveedor_Detalles: TDADataSource
DataSet = tbl_FacturasProveedor_Detalles.Dataset
DataTable = tbl_FacturasProveedor_Detalles
Left = 400
Top = 104
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 48
Top = 84
end
object rda_FacturasProveedor: TDARemoteDataAdapter
GetSchemaCall.RemoteService = RORemoteService
GetDataCall.RemoteService = RORemoteService
UpdateDataCall.RemoteService = RORemoteService
GetScriptsCall.RemoteService = RORemoteService
RemoteService = RORemoteService
DataStreamer = Bin2DataStreamer
Left = 51
Top = 151
end
end