FactuGES2/Source/Modulos/Pedidos a proveedor/Data/uDataModulePedidosProveedor.dfm

314 lines
7.3 KiB
Plaintext

inherited DataModulePedidosProveedor: TDataModulePedidosProveedor
OnCreate = DAClientDataModuleCreate
Height = 261
Width = 781
object RORemoteService: TRORemoteService
Message = dmConexion.ROMessage
Channel = dmConexion.ROChannel
ServiceName = 'srvPedidosProveedor'
Left = 40
Top = 32
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 40
Top = 84
end
object rda_PedidosProveedor: TDARemoteDataAdapter
DataStreamer = Bin2DataStreamer
GetSchemaCall.RemoteService = RORemoteService
GetDataCall.RemoteService = RORemoteService
UpdateDataCall.RemoteService = RORemoteService
GetScriptsCall.RemoteService = RORemoteService
RemoteService = RORemoteService
Left = 43
Top = 151
end
object tbl_PedidosProveedor: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PEDIDOS_PROV_ID'
Required = True
ServerAutoRefresh = True
DictionaryEntry = 'PedidosProveedor_ID'
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'PedidosProveedor_ID_EMPRESA'
end
item
Name = 'ID_PROVEEDOR'
DataType = datInteger
DisplayLabel = 'PedidosProveedor_ID_PROVEEDOR'
DictionaryEntry = 'PedidosProveedor_ID_PROVEEDOR'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
DisplayLabel = 'Nombre del proveedor'
ServerAutoRefresh = True
DictionaryEntry = 'PedidosProveedor_NOMBRE'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
ServerAutoRefresh = True
end
item
Name = 'SITUACION'
DataType = datString
Size = 9
end
item
Name = 'FECHA_ENVIO'
DataType = datDateTime
end
item
Name = 'FECHA_PEDIDO'
DataType = datDateTime
end
item
Name = 'FECHA_CONFIRMACION'
DataType = datDateTime
end
item
Name = 'FECHA_ENTREGA'
DataType = datDateTime
end
item
Name = 'ID_ALMACEN'
DataType = datInteger
end
item
Name = 'NOMBRE_ALMACEN'
DataType = datString
Size = 255
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'INCIDENCIAS'
DataType = datMemo
end
item
Name = 'INCIDENCIAS_ACTIVAS'
DataType = datSmallInt
end
item
Name = 'CALLE'
DataType = datString
Size = 255
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
end
item
Name = 'TELEFONO'
DataType = datString
Size = 25
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
end
item
Name = 'ID_CONTRATO_CLIENTE'
DataType = datInteger
end
item
Name = 'REF_CON_CLIENTE'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE_CLIENTE'
DataType = datString
Size = 255
end
item
Name = 'IMPORTE_NETO'
DataType = datCurrency
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
end
item
Name = 'DESCUENTO'
DataType = datFloat
end
item
Name = 'IMPORTE_DESCUENTO'
DataType = datCurrency
end
item
Name = 'BASE_IMPONIBLE'
DataType = datCurrency
end
item
Name = 'IVA'
DataType = datFloat
end
item
Name = 'IMPORTE_IVA'
DataType = datCurrency
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
end
item
Name = 'ID_TIENDA'
DataType = datInteger
end
item
Name = 'TIENDA'
DataType = datString
Size = 255
end
item
Name = 'ID_VENDEDOR'
DataType = datInteger
end
item
Name = 'VENDEDOR'
DataType = datString
Size = 255
end
item
Name = 'DESCRIPCION_GENERAL'
DataType = datString
Size = 255
end
item
Name = 'ID_DIRECCION_CLIENTE'
DataType = datInteger
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_PedidosProveedor
LogicalName = 'PedidosProveedor'
IndexDefs = <>
Left = 160
Top = 88
end
object ds_PedidosProveedor: TDADataSource
DataSet = tbl_PedidosProveedor.Dataset
DataTable = tbl_PedidosProveedor
Left = 160
Top = 32
end
object tbl_PedidosProveedor_Detalles: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PEDIDOS_PROV_DETALLES_ID'
ServerAutoRefresh = True
InPrimaryKey = True
end
item
Name = 'ID_PEDIDO'
DataType = datInteger
end
item
Name = 'POSICION'
DataType = datInteger
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 2000
end
item
Name = 'CANTIDAD'
DataType = datCurrency
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datCurrency
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'VISIBLE'
DataType = datSmallInt
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
end
item
Name = 'DESCUENTO'
DataType = datFloat
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
end>
Params = <>
MasterMappingMode = mmWhere
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_PedidosProveedor
MasterSource = ds_PedidosProveedor
MasterFields = 'ID'
DetailFields = 'ID_PEDIDO'
LogicalName = 'PedidosProveedor_Detalles'
IndexDefs = <>
Left = 296
Top = 88
end
object ds_PedidosProveedor_Detalles: TDADataSource
DataSet = tbl_PedidosProveedor_Detalles.Dataset
DataTable = tbl_PedidosProveedor_Detalles
Left = 296
Top = 32
end
end