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.
Noviseda_FactuGES2/Source/Modulos/Inventario/Data/uDataModuleInventario.dfm

444 lines
12 KiB
Plaintext

inherited DataModuleInventario: TDataModuleInventario
OnCreate = DAClientDataModuleCreate
Height = 315
Width = 599
object RORemoteService: TRORemoteService
Message = dmConexion.ROMessage
Channel = dmConexion.ROChannel
ServiceName = 'srvInventario'
Left = 48
Top = 24
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 48
Top = 84
end
object rda_Inventario: TDARemoteDataAdapter
GetSchemaCall.RemoteService = RORemoteService
GetDataCall.RemoteService = RORemoteService
UpdateDataCall.RemoteService = RORemoteService
GetScriptsCall.RemoteService = RORemoteService
RemoteService = RORemoteService
DataStreamer = Bin2DataStreamer
Left = 51
Top = 151
end
object tbl_DetalleReservas: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datInteger
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
end
item
Name = 'ID_ALMACEN'
DataType = datInteger
end
item
Name = 'NOMBRE_ALMACEN'
DataType = datString
Size = 255
end
item
Name = 'FECHA_RESERVA'
DataType = datDateTime
end
item
Name = 'CAUSA_RESERVA'
DataType = datString
Size = 2000
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
end
item
Name = 'FAMILIA'
DataType = datString
Size = 255
end
item
Name = 'UNIDAD_MEDIDA'
DataType = datString
Size = 255
end
item
Name = 'FABRICANTE'
DataType = datString
Size = 255
end
item
Name = 'REFERENCIA_FABR'
DataType = datString
Size = 255
end
item
Name = 'CANTIDAD'
DataType = datCurrency
end
item
Name = 'ID_ALMACEN_RESERVA'
DataType = datInteger
end
item
Name = 'NOMBRE_ALMACEN_RESERVA'
DataType = datString
Size = 255
end
item
Name = 'ID_EMPRESA_ALMACEN_RESERVA'
DataType = datInteger
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_Inventario
LogicalName = 'DetalleReservas'
IndexDefs = <>
Left = 440
Top = 72
end
object ds_DetalleReservas: TDADataSource
DataSet = tbl_DetalleReservas.Dataset
DataTable = tbl_DetalleReservas
Left = 440
Top = 16
end
object tbl_Inventario: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID_ALMACEN'
DataType = datInteger
DictionaryEntry = 'INVENTARIO_ID_ALMACEN'
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
DictionaryEntry = 'INVENTARIO_ID_ARTICULO'
end
item
Name = 'ALMACEN'
DataType = datString
Size = 255
DictionaryEntry = 'INVENTARIO_ALMACEN'
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'INVENTARIO_ID_EMPRESA'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DisplayLabel = 'INVENTARIO_REFERENCIA'
DictionaryEntry = 'INVENTARIO_REFERENCIA'
end
item
Name = 'FAMILIA'
DataType = datString
Size = 255
DictionaryEntry = 'INVENTARIO_FAMILIA'
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
DictionaryEntry = 'INVENTARIO_DESCRIPCION'
end
item
Name = 'UNIDAD_MEDIDA'
DataType = datString
Size = 255
end
item
Name = 'CAMPOTECNICO'
DataType = datString
Size = 200
end
item
Name = 'CODIGOTECNICO'
DataType = datString
Size = 15
end
item
Name = 'DISENOTECNICO'
DataType = datString
Size = 6
end
item
Name = 'STOCK'
DataType = datFloat
DisplayLabel = 'Stock disponible'
DictionaryEntry = 'INVENTARIO_STOCK'
end
item
Name = 'UNIDADES_ALMACEN'
DataType = datFloat
DisplayLabel = 'U. Almac'#233'n'
DictionaryEntry = 'INVENTARIO_UNIDADES_ALMACEN'
end
item
Name = 'RESERVA'
DataType = datFloat
DisplayLabel = 'Reservado'
DictionaryEntry = 'INVENTARIO_RESERVA'
end
item
Name = 'PENDIENTE_RECEPCION'
DataType = datFloat
DisplayLabel = 'Pendiente de recibir'
DictionaryEntry = 'INVENTARIO_PENDIENTE_RECEPCION'
end
item
Name = 'TIPO_ALMACEN'
DataType = datString
Size = 10
end
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_MOVIMIENTOS_ID'
DisplayLabel = 'INVENTARIO_ID'
DictionaryEntry = 'INVENTARIO_ID'
InPrimaryKey = True
end
item
Name = 'CANTIDAD'
DataType = datFloat
DisplayLabel = 'INVENTARIO_CANTIDAD'
DictionaryEntry = 'INVENTARIO_CANTIDAD'
end
item
Name = 'FECHA_MOVIMIENTO'
DataType = datDateTime
DisplayLabel = 'INVENTARIO_FECHA_MOVIMIENTO'
DictionaryEntry = 'INVENTARIO_FECHA_MOVIMIENTO'
end
item
Name = 'CAUSA'
DataType = datString
Size = 255
DisplayLabel = 'INVENTARIO_CAUSA'
DictionaryEntry = 'INVENTARIO_CAUSA'
end
item
Name = 'TIPO'
DataType = datString
Size = 1
DisplayLabel = 'INVENTARIO_TIPO'
DictionaryEntry = 'INVENTARIO_TIPO'
end
item
Name = 'ID_ALMACEN_RESERVA'
DataType = datInteger
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_Inventario
LogicalName = 'Inventario'
IndexDefs = <>
Left = 184
Top = 128
end
object ds_Inventario: TDADataSource
DataSet = tbl_Inventario.Dataset
DataTable = tbl_Inventario
Left = 184
Top = 72
end
object tbl_Movimientos_Detalle_Color: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_MOVIMIENTOS_DET_COLOR_ID'
DictionaryEntry = 'Movimientos_Detalle_Color_ID'
InPrimaryKey = True
end
item
Name = 'ID_MOVIMIENTO'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_ID_MOVIMIENTO'
DictionaryEntry = 'Movimientos_Detalle_Color_ID_MOVIMIENTO'
end
item
Name = 'COLOR1'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR1'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR1'
end
item
Name = 'COLOR2'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR2'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR2'
end
item
Name = 'COLOR3'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR3'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR3'
end
item
Name = 'COLOR4'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR4'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR4'
end
item
Name = 'COLOR5'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR5'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR5'
end
item
Name = 'COLOR6'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR6'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR6'
end
item
Name = 'COLOR7'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR7'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR7'
end
item
Name = 'COLOR8'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR8'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR8'
end
item
Name = 'COLOR9'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR9'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR9'
end
item
Name = 'COLOR10'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR10'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR10'
end
item
Name = 'COLOR11'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR11'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR11'
end
item
Name = 'COLOR12'
DataType = datInteger
DisplayLabel = 'Movimientos_Detalle_Color_COLOR12'
DictionaryEntry = 'Movimientos_Detalle_Color_COLOR12'
end>
Params = <>
MasterMappingMode = mmWhere
StreamingOptions = [soDisableEventsWhileStreaming, soDisableFiltering]
RemoteDataAdapter = rda_Inventario
MasterSource = ds_Inventario
MasterFields = 'ID'
DetailFields = 'ID_MOVIMIENTO'
LogicalName = 'Movimientos_Detalle_Color'
IndexDefs = <>
Left = 304
Top = 128
end
object ds_Movimientos_Detalle_Color: TDADataSource
DataSet = tbl_Movimientos_Detalle_Color.Dataset
DataTable = tbl_Movimientos_Detalle_Color
Left = 304
Top = 72
end
object tbl_Inventario_Color: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID_ALMACEN'
DataType = datInteger
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
end
item
Name = 'COLOR1'
DataType = datLargeInt
end
item
Name = 'COLOR2'
DataType = datLargeInt
end
item
Name = 'COLOR3'
DataType = datLargeInt
end
item
Name = 'COLOR4'
DataType = datLargeInt
end
item
Name = 'COLOR5'
DataType = datLargeInt
end
item
Name = 'COLOR6'
DataType = datLargeInt
end
item
Name = 'COLOR7'
DataType = datLargeInt
end
item
Name = 'COLOR8'
DataType = datLargeInt
end
item
Name = 'COLOR9'
DataType = datLargeInt
end
item
Name = 'COLOR10'
DataType = datLargeInt
end
item
Name = 'COLOR11'
DataType = datLargeInt
end
item
Name = 'COLOR12'
DataType = datLargeInt
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming, soDisableFiltering]
RemoteDataAdapter = rda_Inventario
LogicalName = 'Inventario_Color'
IndexDefs = <>
Left = 440
Top = 208
end
object ds_Inventario_Color: TDADataSource
DataSet = tbl_Inventario_Color.Dataset
DataTable = tbl_Inventario_Color
Left = 440
Top = 152
end
end