inherited DataModuleAlbaranesCliente: TDataModuleAlbaranesCliente OnCreate = DAClientDataModuleCreate Height = 234 Width = 484 object RORemoteService: TRORemoteService Message = dmConexion.ROMessage Channel = dmConexion.ROChannel ServiceName = 'srvAlbaranesCliente' Left = 40 Top = 16 end object rda_AlbaranesCliente: TDARemoteDataAdapter GetSchemaCall.RemoteService = RORemoteService GetDataCall.RemoteService = RORemoteService UpdateDataCall.RemoteService = RORemoteService GetScriptsCall.RemoteService = RORemoteService RemoteService = RORemoteService DataStreamer = Bin2DataStreamer Left = 43 Top = 151 end object Bin2DataStreamer: TDABin2DataStreamer Left = 40 Top = 84 end object tbl_AlbaranesCliente: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_ID' Required = True ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_ID' InPrimaryKey = True end item Name = 'ID_EMPRESA' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_EMPRESA' end item Name = 'ID_CLIENTE' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_CLIENTE' end item Name = 'ID_DIRECCION' DataType = datInteger end item Name = 'NOMBRE' DataType = datString Size = 255 DisplayLabel = 'Nombre del cliente' ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_NOMBRE' end item Name = 'FECHA_ALBARAN' DataType = datDateTime DisplayLabel = 'Fecha albar'#225'n' DictionaryEntry = 'AlbaranesCliente_FECHA_ALBARAN' end item Name = 'REFERENCIA' DataType = datString Size = 255 DisplayLabel = 'Referencia' ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_REFERENCIA' end item Name = 'REFERENCIA_CLIENTE' DataType = datString Size = 255 DisplayLabel = 'AlbaranesCliente_REFERENCIA_CLIENTE' ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_REFERENCIA_CLIENTE' end item Name = 'TIPO' DataType = datString Size = 1 DisplayLabel = 'Tipo' DictionaryEntry = 'AlbaranesCliente_TIPO' end item Name = 'SITUACION' DataType = datString Size = 255 DisplayLabel = 'Situaci'#243'n' DictionaryEntry = 'AlbaranesCliente_SITUACION' end item Name = 'ID_ALMACEN' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_ALMACEN' end item Name = 'NOMBRE_ALMACEN' DataType = datString Size = 255 DisplayLabel = 'Almac'#233'n' ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_NOMBRE_ALMACEN' end item Name = 'ID_PEDIDO' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_PEDIDO' end item Name = 'REF_PEDIDO' DataType = datString Size = 255 DisplayLabel = 'Ref. pedido cliente' ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_REF_PEDIDO' end item Name = 'ID_FACTURA' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_FACTURA' end item Name = 'REF_FACTURA' DataType = datString Size = 255 DisplayLabel = 'Ref. factura cliente' ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_REF_FACTURA' end item Name = 'CALLE' DataType = datString Size = 255 DisplayLabel = 'Calle' DictionaryEntry = 'AlbaranesCliente_CALLE' end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 DisplayLabel = 'C'#243'd. postal' DictionaryEntry = 'AlbaranesCliente_CODIGO_POSTAL' end item Name = 'POBLACION' DataType = datString Size = 255 DisplayLabel = 'Poblaci'#243'n' DictionaryEntry = 'AlbaranesCliente_POBLACION' end item Name = 'PROVINCIA' DataType = datString Size = 255 DisplayLabel = 'Provincia' DictionaryEntry = 'AlbaranesCliente_PROVINCIA' end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 DisplayLabel = 'Persona de contacto' DictionaryEntry = 'AlbaranesCliente_PERSONA_CONTACTO' end item Name = 'TELEFONO' DataType = datString Size = 25 DisplayLabel = 'Tel'#233'fono' DictionaryEntry = 'AlbaranesCliente_TELEFONO' end item Name = 'IMPORTE_NETO' DataType = datCurrency DisplayLabel = 'Importe neto' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_IMPORTE_NETO' end item Name = 'IMPORTE_PORTE' DataType = datCurrency DisplayLabel = 'Importe del porte' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_IMPORTE_PORTE' end item Name = 'DESCUENTO' DataType = datFloat DisplayLabel = 'Descuento' DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_DESCUENTO' end item Name = 'IMPORTE_DESCUENTO' DataType = datCurrency DisplayLabel = 'Importe dto.' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_IMPORTE_DESCUENTO' end item Name = 'BASE_IMPONIBLE' DataType = datCurrency DisplayLabel = 'Base imponible' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_BASE_IMPONIBLE' end item Name = 'IVA' DataType = datFloat DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_IVA' end item Name = 'IMPORTE_IVA' DataType = datCurrency DisplayLabel = 'Importe IVA' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_IMPORTE_IVA' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_IMPORTE_TOTAL' end item Name = 'OBSERVACIONES' DataType = datMemo DisplayLabel = 'Observaciones' DictionaryEntry = 'AlbaranesCliente_OBSERVACIONES' end item Name = 'INCIDENCIAS' DataType = datMemo DictionaryEntry = 'AlbaranesCliente_INCIDENCIAS' end item Name = 'INCIDENCIAS_ACTIVAS' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_INCIDENCIAS_ACTIVAS' end item Name = 'FECHA_ALTA' DataType = datDateTime DictionaryEntry = 'AlbaranesCliente_FECHA_ALTA' end item Name = 'FECHA_MODIFICACION' DataType = datDateTime DictionaryEntry = 'AlbaranesCliente_FECHA_MODIFICACION' end item Name = 'USUARIO' DataType = datString Size = 20 DictionaryEntry = 'AlbaranesCliente_USUARIO' end item Name = 'ID_FORMA_PAGO' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_FORMA_PAGO' end item Name = 'FECHA_PREVISTA_ENVIO' DataType = datDateTime DisplayLabel = 'Fecha prevista de envio' DictionaryEntry = 'AlbaranesCliente_FECHA_PREVISTA_ENVIO' end item Name = 'FECHA_ENVIO' DataType = datDateTime DisplayLabel = 'Fecha de env'#237'o' DictionaryEntry = 'AlbaranesCliente_FECHA_ENVIO' end item Name = 'FECHA_RECEPCION' DataType = datDateTime DisplayLabel = 'Fecha de recepci'#243'n' DictionaryEntry = 'AlbaranesCliente_FECHA_RECEPCION' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_AlbaranesCliente DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'AlbaranesCliente' IndexDefs = <> Left = 232 Top = 128 end object ds_AlbaranesCliente: TDADataSource DataSet = tbl_AlbaranesCliente.Dataset DataTable = tbl_AlbaranesCliente Left = 232 Top = 56 end object tbl_AlbaranesCliente_Detalles: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_DETALLES_ID' Required = True DictionaryEntry = 'AlbaranesCliente_Detalles_ID' InPrimaryKey = True end item Name = 'ID_ALBARAN' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_Detalles_ID_ALBARAN' end item Name = 'POSICION' DataType = datInteger DictionaryEntry = 'POSICIONCONCEPTO' end item Name = 'TIPO_DETALLE' DataType = datString Size = 25 DictionaryEntry = 'AlbaranesCliente_Detalles_TIPO_DETALLE' end item Name = 'CONCEPTO' DataType = datString Size = 2000 DictionaryEntry = 'AlbaranesCliente_Detalles_CONCEPTO' end item Name = 'CANTIDAD' DataType = datInteger Alignment = taRightJustify DictionaryEntry = 'CANTIDAD' end item Name = 'UNIDAD_MEDIDA' DataType = datString Size = 255 end item Name = 'IMPORTE_UNIDAD' DataType = datCurrency DisplayLabel = 'Importe unidad' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_Detalles_IMPORTE_UNIDAD' end item Name = 'DESCUENTO' DataType = datFloat DisplayLabel = 'Descuento' DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_Detalles_DESCUENTO' end item Name = 'IMPORTE_PORTE' DataType = datCurrency DisplayLabel = 'Importe porte' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_Detalles_IMPORTE_PORTE' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' Alignment = taRightJustify DictionaryEntry = 'AlbaranesCliente_Detalles_IMPORTE_TOTAL' end item Name = 'VISIBLE' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_Detalles_VISIBLE' end item Name = 'ID_ARTICULO' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_Detalles_ID_ARTICULO' end item Name = 'REFERENCIA' DataType = datString Size = 255 end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 DisplayLabel = 'Ref. proveedor' DictionaryEntry = 'AlbaranesCliente_Detalles_REFERENCIA_PROVEEDOR' end item Name = 'ID_PEDIDO' DataType = datInteger end> Params = <> MasterMappingMode = mmWhere StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_AlbaranesCliente MasterSource = ds_AlbaranesCliente MasterFields = 'ID' DetailFields = 'ID_ALBARAN' DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch] MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates] LogicalName = 'AlbaranesCliente_Detalles' IndexDefs = <> Left = 384 Top = 128 end object ds_AlbaranesCliente_Detalles: TDADataSource DataSet = tbl_AlbaranesCliente_Detalles.Dataset DataTable = tbl_AlbaranesCliente_Detalles Left = 384 Top = 56 end end