object srvAlbaranesCliente: TsrvAlbaranesCliente OldCreateOrder = True OnCreate = DARemoteServiceCreate ConnectionName = 'IBX' ServiceSchema = schAlbaranesCliente ServiceDataStreamer = Bin2DataStreamer ExportedDataTables = <> BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection Height = 209 Width = 347 object schAlbaranesCliente: TDASchema ConnectionManager = dmServer.ConnectionManager DataDictionary = DADataDictionary Datasets = < item Params = <> Statements = < item Connection = 'IBX' ConnectionType = 'Interbase' Default = True Name = 'IBX' SQL = 'select ANO from'#10'(select distinct(substr(FECHA_ALBARAN, 1,4)) as ' + 'ANO'#10'from albaranes_cliente'#10'order by 1 desc)'#10#10'UNION ALL'#10#10'select d' + 'istinct '#39'Todos'#39' as ANO'#10'from empresas'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'ANO' TableField = 'ANO' end> end> Name = 'ListaAnosAlbaranes' Fields = < item Name = 'ANO' DataType = datString Size = 255 end> end item Params = <> Statements = < item Connection = 'IBX' Default = True TargetTable = 'V_ALBARANES_CLIENTE' StatementType = stAutoSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'ID_CLIENTE' TableField = 'ID_CLIENTE' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end item DatasetField = 'FECHA_ALBARAN' TableField = 'FECHA_ALBARAN' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end item DatasetField = 'REFERENCIA_CLIENTE' TableField = 'REFERENCIA_CLIENTE' end item DatasetField = 'TIPO' TableField = 'TIPO' end item DatasetField = 'SITUACION' TableField = 'SITUACION' end item DatasetField = 'ID_ALMACEN' TableField = 'ID_ALMACEN' end item DatasetField = 'NOMBRE_ALMACEN' TableField = 'NOMBRE_ALMACEN' end item DatasetField = 'ID_PEDIDO' TableField = 'ID_PEDIDO' end item DatasetField = 'REF_PEDIDO' TableField = 'REF_PEDIDO' end item DatasetField = 'ID_FACTURA' TableField = 'ID_FACTURA' end item DatasetField = 'REF_FACTURA' TableField = 'REF_FACTURA' end item DatasetField = 'CALLE' TableField = 'CALLE' end item DatasetField = 'CODIGO_POSTAL' TableField = 'CODIGO_POSTAL' end item DatasetField = 'POBLACION' TableField = 'POBLACION' end item DatasetField = 'PROVINCIA' TableField = 'PROVINCIA' end item DatasetField = 'PERSONA_CONTACTO' TableField = 'PERSONA_CONTACTO' end item DatasetField = 'TELEFONO' TableField = 'TELEFONO' end item DatasetField = 'IMPORTE_NETO' TableField = 'IMPORTE_NETO' end item DatasetField = 'IMPORTE_PORTE' TableField = 'IMPORTE_PORTE' end item DatasetField = 'DESCUENTO' TableField = 'DESCUENTO' end item DatasetField = 'IMPORTE_DESCUENTO' TableField = 'IMPORTE_DESCUENTO' end item DatasetField = 'BASE_IMPONIBLE' TableField = 'BASE_IMPONIBLE' end item DatasetField = 'IVA' TableField = 'IVA' end item DatasetField = 'IMPORTE_IVA' TableField = 'IMPORTE_IVA' end item DatasetField = 'IMPORTE_TOTAL' TableField = 'IMPORTE_TOTAL' end item DatasetField = 'OBSERVACIONES' TableField = 'OBSERVACIONES' end item DatasetField = 'INCIDENCIAS' TableField = 'INCIDENCIAS' end item DatasetField = 'INCIDENCIAS_ACTIVAS' TableField = 'INCIDENCIAS_ACTIVAS' end item DatasetField = 'FECHA_ALTA' TableField = 'FECHA_ALTA' end item DatasetField = 'FECHA_MODIFICACION' TableField = 'FECHA_MODIFICACION' end item DatasetField = 'USUARIO' TableField = 'USUARIO' end item DatasetField = 'ID_FORMA_PAGO' TableField = 'ID_FORMA_PAGO' end item DatasetField = 'FECHA_PREVISTA_ENVIO' TableField = 'FECHA_PREVISTA_ENVIO' end item DatasetField = 'FECHA_ENVIO' TableField = 'FECHA_ENVIO' end item DatasetField = 'FECHA_RECEPCION' TableField = 'FECHA_RECEPCION' end item DatasetField = 'ID_TIENDA' TableField = 'ID_TIENDA' end item DatasetField = 'TIENDA' TableField = 'TIENDA' end item DatasetField = 'ID_DIRECCION' TableField = 'ID_DIRECCION' end item DatasetField = 'ID_TIPO_IVA' TableField = 'ID_TIPO_IVA' end item DatasetField = 'MOVIL' TableField = 'MOVIL' end> end> Name = 'AlbaranesCliente' Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_ID' 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 = 'NOMBRE' DataType = datString Size = 255 ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_NOMBRE' end item Name = 'FECHA_ALBARAN' DataType = datDateTime DictionaryEntry = 'AlbaranesCliente_FECHA_ALBARAN' end item Name = 'REFERENCIA' DataType = datString Size = 255 ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_REFERENCIA' end item Name = 'REFERENCIA_CLIENTE' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_REFERENCIA_CLIENTE' end item Name = 'TIPO' DataType = datString Size = 1 DictionaryEntry = 'AlbaranesCliente_TIPO' end item Name = 'SITUACION' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_SITUACION' end item Name = 'ID_ALMACEN' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_ALMACEN' end item Name = 'NOMBRE_ALMACEN' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_NOMBRE_ALMACEN' end item Name = 'ID_PEDIDO' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_PEDIDO' end item Name = 'REF_PEDIDO' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_REF_PEDIDO' end item Name = 'ID_FACTURA' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_FACTURA' end item Name = 'REF_FACTURA' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_REF_FACTURA' end item Name = 'ID_DIRECCION' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_DIRECCION' end item Name = 'CALLE' DataType = datString Size = 255 ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_CALLE' end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_CODIGO_POSTAL' end item Name = 'POBLACION' DataType = datString Size = 255 ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_POBLACION' end item Name = 'PROVINCIA' DataType = datString Size = 255 ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_PROVINCIA' end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_PERSONA_CONTACTO' end item Name = 'TELEFONO' DataType = datString Size = 25 ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_TELEFONO' end item Name = 'MOVIL' DataType = datString Size = 25 end item Name = 'IMPORTE_NETO' DataType = datCurrency DictionaryEntry = 'AlbaranesCliente_IMPORTE_NETO' end item Name = 'IMPORTE_PORTE' DataType = datCurrency DictionaryEntry = 'AlbaranesCliente_IMPORTE_PORTE' end item Name = 'DESCUENTO' DataType = datFloat DictionaryEntry = 'AlbaranesCliente_DESCUENTO' end item Name = 'IMPORTE_DESCUENTO' DataType = datCurrency DictionaryEntry = 'AlbaranesCliente_IMPORTE_DESCUENTO' end item Name = 'BASE_IMPONIBLE' DataType = datCurrency DictionaryEntry = 'AlbaranesCliente_BASE_IMPONIBLE' end item Name = 'ID_TIPO_IVA' DataType = datInteger end item Name = 'IVA' DataType = datFloat DictionaryEntry = 'AlbaranesCliente_IVA' end item Name = 'IMPORTE_IVA' DataType = datCurrency DictionaryEntry = 'AlbaranesCliente_IMPORTE_IVA' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DictionaryEntry = 'AlbaranesCliente_IMPORTE_TOTAL' end item Name = 'OBSERVACIONES' DataType = datMemo 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 DictionaryEntry = 'AlbaranesCliente_FECHA_PREVISTA_ENVIO' end item Name = 'FECHA_ENVIO' DataType = datDateTime DictionaryEntry = 'AlbaranesCliente_FECHA_ENVIO' end item Name = 'FECHA_RECEPCION' DataType = datDateTime DictionaryEntry = 'AlbaranesCliente_FECHA_RECEPCION' end item Name = 'ID_TIENDA' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_ID_TIENDA' end item Name = 'TIENDA' DataType = datString Size = 255 ServerAutoRefresh = True DictionaryEntry = 'AlbaranesCliente_TIENDA' end> end item Params = <> Statements = < item Connection = 'IBX' TargetTable = 'ALBARANES_CLIENTE_DETALLES' SQL = 'SELECT'#10' ALBARANES_CLIENTE_DETALLES.ID, ALBARANES_CLIENTE_DETA' + 'LLES.ID_ALBARAN,'#10' ALBARANES_CLIENTE_DETALLES.POSICION, ALBARA' + 'NES_CLIENTE_DETALLES.TIPO_DETALLE,'#10' ALBARANES_CLIENTE_DETALLE' + 'S.CONCEPTO, ALBARANES_CLIENTE_DETALLES.CANTIDAD,'#10' ALBARANES_C' + 'LIENTE_DETALLES.IMPORTE_UNIDAD, ALBARANES_CLIENTE_DETALLES.DESCU' + 'ENTO,'#10' ALBARANES_CLIENTE_DETALLES.IMPORTE_PORTE, ALBARANES_CL' + 'IENTE_DETALLES.IMPORTE_TOTAL,'#10' ALBARANES_CLIENTE_DETALLES.VIS' + 'IBLE, ALBARANES_CLIENTE_DETALLES.VALORADO,'#10' ALBARANES_CLIENTE' + '_DETALLES.ID_ARTICULO, ARTICULOS.REFERENCIA, ARTICULOS.REFERENCI' + 'A_PROV as REFERENCIA_PROVEEDOR'#10#10'FROM ALBARANES_CLIENTE_DETALLES'#10 + 'LEFT JOIN ARTICULOS ON ALBARANES_CLIENTE_DETALLES.ID_ARTICULO = ' + 'ARTICULOS.ID'#10'where {where}'#10'ORDER BY POSICION;'#10#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_ALBARAN' TableField = 'ID_ALBARAN' end item DatasetField = 'POSICION' TableField = 'POSICION' end item DatasetField = 'TIPO_DETALLE' TableField = 'TIPO_DETALLE' end item DatasetField = 'CONCEPTO' TableField = 'CONCEPTO' end item DatasetField = 'CANTIDAD' TableField = 'CANTIDAD' end item DatasetField = 'IMPORTE_UNIDAD' TableField = 'IMPORTE_UNIDAD' end item DatasetField = 'DESCUENTO' TableField = 'DESCUENTO' end item DatasetField = 'IMPORTE_PORTE' TableField = 'IMPORTE_PORTE' end item DatasetField = 'IMPORTE_TOTAL' TableField = 'IMPORTE_TOTAL' end item DatasetField = 'VISIBLE' TableField = 'VISIBLE' end item DatasetField = 'ID_ARTICULO' TableField = 'ID_ARTICULO' end item DatasetField = 'REFERENCIA' TableField = '' SQLOrigin = 'REFERENCIA' end item DatasetField = 'REFERENCIA_PROVEEDOR' TableField = '' SQLOrigin = 'REFERENCIA_PROVEEDOR' end item DatasetField = 'VALORADO' TableField = 'VALORADO' end> end> Name = 'AlbaranesCliente_Detalles' Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_DETALLES_ID' 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 = 10 DictionaryEntry = 'AlbaranesCliente_Detalles_TIPO_DETALLE' end item Name = 'CONCEPTO' DataType = datString Size = 2000 DictionaryEntry = 'AlbaranesCliente_Detalles_CONCEPTO' end item Name = 'CANTIDAD' DataType = datFloat DictionaryEntry = 'CANTIDAD' end item Name = 'IMPORTE_UNIDAD' DataType = datCurrency DictionaryEntry = 'AlbaranesCliente_Detalles_IMPORTE_UNIDAD' end item Name = 'DESCUENTO' DataType = datFloat DictionaryEntry = 'AlbaranesCliente_Detalles_DESCUENTO' end item Name = 'IMPORTE_PORTE' DataType = datCurrency DictionaryEntry = 'AlbaranesCliente_Detalles_IMPORTE_PORTE' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency DictionaryEntry = 'AlbaranesCliente_Detalles_IMPORTE_TOTAL' end item Name = 'VISIBLE' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_Detalles_VISIBLE' end item Name = 'VALORADO' DataType = datSmallInt DisplayLabel = #191'Valorado?' end item Name = 'ID_ARTICULO' DataType = datInteger DictionaryEntry = 'AlbaranesCliente_Detalles_ID_ARTICULO' end item Name = 'REFERENCIA' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_Detalles_REFERENCIA' end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_Detalles_REFERENCIA_PROVEEDOR' end> end> JoinDataTables = <> UnionDataTables = <> Commands = < item Params = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_ID' Value = '' end item Name = 'ID_EMPRESA' DataType = datInteger Value = '' end item Name = 'ID_CLIENTE' DataType = datInteger Value = '' end item Name = 'FECHA_ALBARAN' DataType = datDateTime Value = '' end item Name = 'TIPO' DataType = datString Size = 1 Value = '' end item Name = 'REFERENCIA' DataType = datString Size = 255 Value = '' end item Name = 'REFERENCIA_CLIENTE' DataType = datString Size = 255 Value = '' end item Name = 'ID_ALMACEN' DataType = datInteger Value = '' end item Name = 'ID_PEDIDO' DataType = datInteger Value = '' end item Name = 'ID_FACTURA' DataType = datInteger Value = '' end item Name = 'ID_DIRECCION' DataType = datInteger Value = '' end item Name = 'CALLE' DataType = datString Size = 255 Value = '' end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 Value = '' end item Name = 'POBLACION' DataType = datString Size = 255 Value = '' end item Name = 'PROVINCIA' DataType = datString Size = 255 Value = '' end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 Value = '' end item Name = 'TELEFONO' DataType = datString Size = 25 Value = '' end item Name = 'MOVIL' DataType = datString Size = 25 Value = '' end item Name = 'IMPORTE_NETO' DataType = datCurrency Value = '' end item Name = 'IMPORTE_PORTE' DataType = datCurrency Value = '' end item Name = 'DESCUENTO' DataType = datFloat Value = '' end item Name = 'IMPORTE_DESCUENTO' DataType = datCurrency Value = '' end item Name = 'BASE_IMPONIBLE' DataType = datCurrency Value = '' end item Name = 'IVA' DataType = datFloat Value = '' end item Name = 'IMPORTE_IVA' DataType = datCurrency Value = '' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency Value = '' end item Name = 'OBSERVACIONES' DataType = datMemo Value = '' end item Name = 'INCIDENCIAS' DataType = datMemo Value = '' end item Name = 'INCIDENCIAS_ACTIVAS' DataType = datSmallInt Value = '' end item Name = 'FECHA_MODIFICACION' DataType = datDateTime Value = '' end item Name = 'USUARIO' DataType = datString Size = 30 Value = '' end item Name = 'ID_FORMA_PAGO' DataType = datInteger Value = '' end item Name = 'FECHA_PREVISTA_ENVIO' DataType = datDateTime Value = '' end item Name = 'FECHA_ENVIO' DataType = datDateTime Value = '' end item Name = 'FECHA_RECEPCION' DataType = datDateTime Value = '' end item Name = 'ID_TIENDA' DataType = datInteger Value = '' end> Statements = < item Connection = 'IBX' Default = True TargetTable = 'ALBARANES_CLIENTE' SQL = 'INSERT'#10' INTO ALBARANES_CLIENTE'#10' (ID, ID_EMPRESA, ID_CLIENTE,' + ' FECHA_ALBARAN, TIPO, REFERENCIA,'#10' REFERENCIA_CLIENTE, ID_AL' + 'MACEN, ID_PEDIDO, ID_FACTURA, ID_DIRECCION,'#10' CALLE, CODIGO_P' + 'OSTAL, POBLACION, PROVINCIA, PERSONA_CONTACTO,'#10' TELEFONO, MO' + 'VIL, IMPORTE_NETO, IMPORTE_PORTE, DESCUENTO, IMPORTE_DESCUENTO,'#10 + ' BASE_IMPONIBLE, IVA, IMPORTE_IVA, IMPORTE_TOTAL, OBSERVACIO' + 'NES, '#10' INCIDENCIAS, INCIDENCIAS_ACTIVAS, FECHA_ALTA, FECHA_M' + 'ODIFICACION, '#10' USUARIO, ID_FORMA_PAGO, FECHA_PREVISTA_ENVIO,' + ' FECHA_ENVIO, '#10' FECHA_RECEPCION, ID_TIENDA)'#10' VALUES'#10' (:I' + 'D, :ID_EMPRESA, :ID_CLIENTE, :FECHA_ALBARAN, :TIPO, :REFERENCIA,' + #10' :REFERENCIA_CLIENTE, :ID_ALMACEN, :ID_PEDIDO, :ID_FACTURA,' + ' :ID_DIRECCION,'#10' :CALLE, :CODIGO_POSTAL, :POBLACION, :PROVIN' + 'CIA, :PERSONA_CONTACTO,'#10' :TELEFONO, :MOVIL, :IMPORTE_NETO, :' + 'IMPORTE_PORTE, :DESCUENTO, :IMPORTE_DESCUENTO,'#10' :BASE_IMPONI' + 'BLE, :IVA, :IMPORTE_IVA, :IMPORTE_TOTAL, :OBSERVACIONES,'#10' :I' + 'NCIDENCIAS, :INCIDENCIAS_ACTIVAS, CURRENT_TIMESTAMP, :FECHA_MODI' + 'FICACION,'#10' :USUARIO, :ID_FORMA_PAGO, :FECHA_PREVISTA_ENVIO, ' + ':FECHA_ENVIO, :FECHA_RECEPCION,'#10' :ID_TIENDA)'#10' '#10' '#10#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_AlbaranesCliente' end item Params = < item Name = 'OLD_ID' Value = '' end> Statements = < item Connection = 'IBX' Default = True TargetTable = 'ALBARANES_CLIENTE' SQL = 'DELETE '#10' FROM'#10' ALBARANES_CLIENTE'#10' WHERE'#10' (ID = :OLD_ID)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_AlbaranesCliente' end item Params = < item Name = 'ID_EMPRESA' DataType = datInteger Value = '' end item Name = 'ID_CLIENTE' DataType = datInteger Value = '' end item Name = 'FECHA_ALBARAN' DataType = datDateTime Value = '' end item Name = 'TIPO' DataType = datString Size = 1 Value = '' end item Name = 'REFERENCIA' DataType = datString Size = 255 Value = '' end item Name = 'REFERENCIA_CLIENTE' DataType = datString Size = 255 Value = '' end item Name = 'ID_ALMACEN' DataType = datInteger Value = '' end item Name = 'ID_PEDIDO' DataType = datInteger Value = '' end item Name = 'ID_FACTURA' DataType = datInteger Value = '' end item Name = 'ID_DIRECCION' DataType = datInteger Value = '' end item Name = 'CALLE' DataType = datString Size = 255 Value = '' end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 Value = '' end item Name = 'POBLACION' DataType = datString Size = 255 Value = '' end item Name = 'PROVINCIA' DataType = datString Size = 255 Value = '' end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 Value = '' end item Name = 'TELEFONO' DataType = datString Size = 25 Value = '' end item Name = 'MOVIL' DataType = datString Size = 25 Value = '' end item Name = 'IMPORTE_NETO' DataType = datCurrency Value = '' end item Name = 'IMPORTE_PORTE' DataType = datCurrency Value = '' end item Name = 'DESCUENTO' DataType = datFloat Value = '' end item Name = 'IMPORTE_DESCUENTO' DataType = datCurrency Value = '' end item Name = 'BASE_IMPONIBLE' DataType = datCurrency Value = '' end item Name = 'IVA' DataType = datFloat Value = '' end item Name = 'IMPORTE_IVA' DataType = datCurrency Value = '' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency Value = '' end item Name = 'OBSERVACIONES' DataType = datMemo Value = '' end item Name = 'INCIDENCIAS' DataType = datMemo Value = '' end item Name = 'INCIDENCIAS_ACTIVAS' DataType = datSmallInt Value = '' end item Name = 'USUARIO' DataType = datString Size = 30 Value = '' end item Name = 'ID_FORMA_PAGO' DataType = datInteger Value = '' end item Name = 'FECHA_PREVISTA_ENVIO' DataType = datDateTime Value = '' end item Name = 'FECHA_ENVIO' DataType = datDateTime Value = '' end item Name = 'FECHA_RECEPCION' DataType = datDateTime Value = '' end item Name = 'ID_TIENDA' DataType = datInteger Value = '' end item Name = 'OLD_ID' Value = '' end> Statements = < item Connection = 'IBX' Default = True TargetTable = 'ALBARANES_CLIENTE' SQL = 'UPDATE ALBARANES_CLIENTE'#10' SET '#10' ID_EMPRESA = :ID_EMPRESA,'#10' ' + ' ID_CLIENTE = :ID_CLIENTE, '#10' FECHA_ALBARAN = :FECHA_ALBARAN,' + #10' TIPO = :TIPO,'#10' REFERENCIA = :REFERENCIA, '#10' REFERENCIA' + '_CLIENTE = :REFERENCIA_CLIENTE, '#10' ID_ALMACEN = :ID_ALMACEN,'#10' ' + ' ID_PEDIDO = :ID_PEDIDO,'#10' ID_FACTURA = :ID_FACTURA,'#10' ID_' + 'DIRECCION = :ID_DIRECCION,'#10' CALLE = :CALLE,'#10' CODIGO_POSTAL' + ' = :CODIGO_POSTAL, '#10' POBLACION = :POBLACION, '#10' PROVINCIA =' + ' :PROVINCIA, '#10' PERSONA_CONTACTO = :PERSONA_CONTACTO, '#10' TEL' + 'EFONO = :TELEFONO, '#10' MOVIL = :MOVIL,'#10' IMPORTE_NETO = :IMPO' + 'RTE_NETO, '#10' IMPORTE_PORTE = :IMPORTE_PORTE, '#10' DESCUENTO = ' + ':DESCUENTO, '#10' IMPORTE_DESCUENTO = :IMPORTE_DESCUENTO, '#10' BA' + 'SE_IMPONIBLE = :BASE_IMPONIBLE, '#10' IVA = :IVA, '#10' IMPORTE_IV' + 'A = :IMPORTE_IVA, '#10' IMPORTE_TOTAL = :IMPORTE_TOTAL, '#10' OBSE' + 'RVACIONES = :OBSERVACIONES, '#10' INCIDENCIAS = :INCIDENCIAS, '#10' ' + ' INCIDENCIAS_ACTIVAS = :INCIDENCIAS_ACTIVAS, '#10' FECHA_MODIFIC' + 'ACION = CURRENT_TIMESTAMP,'#10' USUARIO = :USUARIO, '#10' ID_FORMA' + '_PAGO = :ID_FORMA_PAGO, '#10' FECHA_PREVISTA_ENVIO = :FECHA_PREVI' + 'STA_ENVIO, '#10' FECHA_ENVIO = :FECHA_ENVIO, '#10' FECHA_RECEPCION' + ' = :FECHA_RECEPCION,'#10' ID_TIENDA = :ID_TIENDA'#10' WHERE'#10' (ID ' + '= :OLD_ID)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Update_AlbaranesCliente' end item Params = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_DETALLES_ID' Value = '' end item Name = 'ID_ALBARAN' DataType = datInteger Value = '' end item Name = 'POSICION' DataType = datInteger Value = '' end item Name = 'TIPO_DETALLE' DataType = datString Size = 10 Value = '' end item Name = 'CONCEPTO' DataType = datString Size = 2000 Value = '' end item Name = 'CANTIDAD' DataType = datCurrency Value = '' end item Name = 'IMPORTE_UNIDAD' DataType = datCurrency Value = '' end item Name = 'DESCUENTO' DataType = datFloat Value = '' end item Name = 'IMPORTE_PORTE' DataType = datCurrency Value = '' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency Value = '' end item Name = 'VISIBLE' DataType = datSmallInt Value = '' end item Name = 'VALORADO' DataType = datSmallInt Value = '' end item Name = 'ID_ARTICULO' DataType = datInteger Value = '' end> Statements = < item Connection = 'IBX' Default = True TargetTable = 'ALBARANES_CLIENTE_DETALLES' SQL = 'INSERT'#10' INTO ALBARANES_CLIENTE_DETALLES'#10' (ID, ID_ALBARAN, PO' + 'SICION, TIPO_DETALLE, CONCEPTO, CANTIDAD,'#10' IMPORTE_UNIDAD, D' + 'ESCUENTO, IMPORTE_PORTE, IMPORTE_TOTAL, '#10' VISIBLE, VALORADO,' + ' ID_ARTICULO)'#10' VALUES'#10' (:ID, :ID_ALBARAN, :POSICION, :TIPO_D' + 'ETALLE, :CONCEPTO, :CANTIDAD,'#10' :IMPORTE_UNIDAD, :DESCUENTO, ' + ':IMPORTE_PORTE, :IMPORTE_TOTAL, '#10' :VISIBLE, :VALORADO, :ID_A' + 'RTICULO)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_AlbaranesCliente_Detalles' end item Params = < item Name = 'OLD_ID' DataType = datAutoInc Value = '0' end> Statements = < item Connection = 'IBX' Default = True TargetTable = 'ALBARANES_CLIENTE_DETALLES' SQL = 'DELETE '#10' FROM'#10' ALBARANES_CLIENTE_DETALLES'#10' WHERE'#10' (ID = ' + ':OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_AlbaranesCliente_Detalles' end item Params = < item Name = 'ID' DataType = datInteger Value = '' end item Name = 'ID_ALBARAN' DataType = datInteger Value = '' end item Name = 'POSICION' DataType = datInteger Value = '' end item Name = 'TIPO_DETALLE' DataType = datString Size = 10 Value = '' end item Name = 'CONCEPTO' DataType = datString Size = 2000 Value = '' end item Name = 'CANTIDAD' DataType = datCurrency Value = '' end item Name = 'IMPORTE_UNIDAD' DataType = datCurrency Value = '' end item Name = 'DESCUENTO' DataType = datFloat Value = '' end item Name = 'IMPORTE_PORTE' DataType = datCurrency Value = '' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency Value = '' end item Name = 'VISIBLE' DataType = datSmallInt Value = '' end item Name = 'VALORADO' DataType = datSmallInt Value = '' end item Name = 'ID_ARTICULO' DataType = datInteger Value = '' end item Name = 'OLD_ID' Value = '' end> Statements = < item Connection = 'IBX' Default = True TargetTable = 'ALBARANES_CLIENTE_DETALLES' SQL = 'UPDATE ALBARANES_CLIENTE_DETALLES'#10' SET '#10' ID = :ID,'#10' ID_AL' + 'BARAN = :ID_ALBARAN, '#10' POSICION = :POSICION, '#10' TIPO_DETALL' + 'E = :TIPO_DETALLE, '#10' CONCEPTO = :CONCEPTO, '#10' CANTIDAD = :C' + 'ANTIDAD, '#10' IMPORTE_UNIDAD = :IMPORTE_UNIDAD, '#10' DESCUENTO =' + ' :DESCUENTO, '#10' IMPORTE_PORTE = :IMPORTE_PORTE, '#10' IMPORTE_T' + 'OTAL = :IMPORTE_TOTAL, '#10' VISIBLE = :VISIBLE, '#10' VALORADO = ' + ':VALORADO,'#10' ID_ARTICULO = :ID_ARTICULO'#10' WHERE'#10' (ID = :OLD' + '_ID)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Update_AlbaranesCliente_Detalles' end> RelationShips = < item Name = 'FK_AlbaranesCliente_Detalles' MasterDatasetName = 'AlbaranesCliente' MasterFields = 'ID' DetailDatasetName = 'AlbaranesCliente_Detalles' DetailFields = 'ID_ALBARAN' RelationshipType = rtForeignKey end> UpdateRules = < item Name = 'Insert AlbaranesCliente' DoUpdate = False DoDelete = False DatasetName = 'AlbaranesCliente' FailureBehavior = fbRaiseException end item Name = 'Insert AlbaranesCliente_Detalles' DoUpdate = False DoDelete = False DatasetName = 'AlbaranesCliente_Detalles' FailureBehavior = fbRaiseException end item Name = 'Update AlbaranesCliente' DoInsert = False DoDelete = False DatasetName = 'AlbaranesCliente' FailureBehavior = fbRaiseException end item Name = 'Update AlbaranesCliente_Detalles' DoInsert = False DoDelete = False DatasetName = 'AlbaranesCliente_Detalles' FailureBehavior = fbRaiseException end item Name = 'Delete AlbaranesCliente_Detalles' DoUpdate = False DoInsert = False DatasetName = 'AlbaranesCliente_Detalles' FailureBehavior = fbRaiseException end item Name = 'Delete AlbaranesCliente' DoUpdate = False DoInsert = False DatasetName = 'AlbaranesCliente' FailureBehavior = fbRaiseException end> Version = 0 Left = 48 Top = 24 end object bpAlbaranesCliente: TDABusinessProcessor Schema = schAlbaranesCliente InsertCommandName = 'Insert_AlbaranesCliente' DeleteCommandName = 'Delete_AlbaranesCliente' UpdateCommandName = 'Update_AlbaranesCliente' ReferencedDataset = 'AlbaranesCliente' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 200 Top = 24 end object bpAlbaranesCliente_Detalles: TDABusinessProcessor Schema = schAlbaranesCliente InsertCommandName = 'Insert_AlbaranesCliente_Detalles' DeleteCommandName = 'Delete_AlbaranesCliente_Detalles' UpdateCommandName = 'Update_AlbaranesCliente_Detalles' ReferencedDataset = 'AlbaranesCliente_Detalles' ProcessorOptions = [poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 200 Top = 88 end object DADataDictionary: TDADataDictionary Fields = < item Name = 'AlbaranesCliente_ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_ID' Required = True DisplayLabel = 'ID' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_ID_EMPRESA' DataType = datInteger DisplayLabel = 'ID_EMPRESA' end item Name = 'AlbaranesCliente_ID_CLIENTE' DataType = datInteger DisplayLabel = 'ID_CLIENTE' end item Name = 'AlbaranesCliente_NOMBRE' DataType = datString Size = 255 DisplayLabel = 'Nombre del cliente' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_SITUACION' DataType = datString Size = 255 DisplayLabel = 'Situaci'#243'n' end item Name = 'AlbaranesCliente_CALLE' DataType = datString Size = 255 DisplayLabel = 'Calle' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_CODIGO_POSTAL' DataType = datString Size = 10 DisplayLabel = 'C'#243'd. postal' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_POBLACION' DataType = datString Size = 255 DisplayLabel = 'Poblaci'#243'n' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_PROVINCIA' DataType = datString Size = 255 DisplayLabel = 'Provincia' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_PERSONA_CONTACTO' DataType = datString Size = 255 DisplayLabel = 'Persona de contacto' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_TELEFONO' DataType = datString Size = 25 DisplayLabel = 'Tel'#233'fono' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_OBSERVACIONES' DataType = datMemo DisplayLabel = 'Observaciones' end item Name = 'AlbaranesCliente_INCIDENCIAS' DataType = datMemo DisplayLabel = 'INCIDENCIAS' end item Name = 'AlbaranesCliente_INCIDENCIAS_ACTIVAS' DataType = datInteger DisplayLabel = 'INCIDENCIAS_ACTIVAS' end item Name = 'AlbaranesCliente_FECHA_ALTA' DataType = datDateTime DisplayLabel = 'FECHA_ALTA' end item Name = 'AlbaranesCliente_FECHA_MODIFICACION' DataType = datDateTime DisplayLabel = 'FECHA_MODIFICACION' end item Name = 'AlbaranesCliente_USUARIO' DataType = datString Size = 20 DisplayLabel = 'USUARIO' end item Name = 'AlbaranesCliente_IMPORTE_NETO' DataType = datCurrency DisplayLabel = 'Importe neto' Alignment = taRightJustify end item Name = 'AlbaranesCliente_IMPORTE_PORTE' DataType = datCurrency DisplayLabel = 'Importe del porte' Alignment = taRightJustify end item Name = 'AlbaranesCliente_DESCUENTO' DataType = datFloat DisplayLabel = 'Descuento' DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify end item Name = 'AlbaranesCliente_IMPORTE_DESCUENTO' DataType = datCurrency DisplayLabel = 'Importe dto.' Alignment = taRightJustify end item Name = 'AlbaranesCliente_BASE_IMPONIBLE' DataType = datCurrency DisplayLabel = 'Base imponible' Alignment = taRightJustify end item Name = 'AlbaranesCliente_IVA' DataType = datFloat DisplayLabel = 'IVA' DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify end item Name = 'AlbaranesCliente_IMPORTE_IVA' DataType = datCurrency DisplayLabel = 'Importe IVA' Alignment = taRightJustify end item Name = 'AlbaranesCliente_IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' Alignment = taRightJustify end item Name = 'AlbaranesCliente_ID_FORMA_PAGO' DataType = datInteger DisplayLabel = 'ID_FORMA_PAGO' end item Name = 'AlbaranesCliente_Detalles_ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_DETALLES_ID' Required = True DisplayLabel = 'ID' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_Detalles_ID_PEDIDO' DataType = datInteger DisplayLabel = 'ID_PEDIDO' end item Name = 'POSICIONCONCEPTO' DataType = datInteger DisplayLabel = 'POSICION' end item Name = 'AlbaranesCliente_Detalles_TIPO_DETALLE' DataType = datString Size = 10 DisplayLabel = 'TIPO_DETALLE' end item Name = 'AlbaranesCliente_Detalles_REFERENCIA' DataType = datString Size = 255 DisplayLabel = 'Referencia' end item Name = 'AlbaranesCliente_Detalles_ID_ARTICULO' DataType = datInteger DisplayLabel = 'ID_ARTICULO' end item Name = 'AlbaranesCliente_Detalles_CONCEPTO' DataType = datString Size = 2000 DisplayLabel = 'CONCEPTO' end item Name = 'CANTIDAD' DataType = datFloat Alignment = taRightJustify end item Name = 'AlbaranesCliente_Detalles_IMPORTE_UNIDAD' DataType = datCurrency DisplayLabel = 'Importe unidad' Alignment = taRightJustify end item Name = 'AlbaranesCliente_Detalles_IMPORTE_TOTAL' DataType = datCurrency DisplayLabel = 'Importe total' Alignment = taRightJustify end item Name = 'AlbaranesCliente_Detalles_DESCUENTO' DataType = datFloat DisplayLabel = 'Descuento' DisplayFormat = ',0.00 %;-,0.00 %' Alignment = taRightJustify end item Name = 'AlbaranesCliente_Detalles_IMPORTE_PORTE' DataType = datCurrency DisplayLabel = 'Importe porte' Alignment = taRightJustify end item Name = 'AlbaranesCliente_Detalles_VISIBLE' DataType = datInteger DisplayLabel = 'VISIBLE' end item Name = 'AlbaranesCliente_Detalles_REFERENCIA_PROVEEDOR' DataType = datString Size = 255 DisplayLabel = 'Ref. proveedor' end item Name = 'AlbaranesCliente_FECHA_ALBARAN' DataType = datDateTime DisplayLabel = 'Fecha albar'#225'n' end item Name = 'AlbaranesCliente_ID_PEDIDO' DataType = datInteger DisplayLabel = 'ID_PEDIDO' end item Name = 'AlbaranesCliente_ID_FACTURA' DataType = datInteger DisplayLabel = 'ID_FACTURA' end item Name = 'AlbaranesCliente_Detalles_ID_ALBARAN' DataType = datInteger DisplayLabel = 'ID_ALBARAN' end item Name = 'AlbaranesCliente_Detalles_Refresh_ID_ALBARAN' DataType = datInteger DisplayLabel = 'ID_ALBARAN' end item Name = 'AlbaranesCliente_Detalles_Refresh_DESCUENTO' DataType = datFloat DisplayLabel = 'DESCUENTO' end item Name = 'AlbaranesCliente_Detalles_Refresh_IMPORTE_PORTE' DataType = datFloat DisplayLabel = 'IMPORTE_PORTE' end item Name = 'AlbaranesCliente_Detalles_Refresh_REFERENCIA_PROVEEDOR' DataType = datString Size = 255 DisplayLabel = 'REFERENCIA_PROVEEDOR' end item Name = 'AlbaranesCliente_ID_ALMACEN' DataType = datInteger DisplayLabel = 'ID_ALMACEN' end item Name = 'AlbaranesCliente_FECHA_ENVIO' DataType = datDateTime DisplayLabel = 'Fecha de env'#237'o' end item Name = 'AlbaranesCliente_FECHA_RECEPCION' DataType = datDateTime DisplayLabel = 'Fecha de recepci'#243'n' end item Name = 'AlbaranesCliente_REF_PEDIDO' DataType = datString Size = 255 DisplayLabel = 'Ref. pedido cliente' end item Name = 'AlbaranesCliente_REF_FACTURA' DataType = datString Size = 255 DisplayLabel = 'Ref. factura cliente' end item Name = 'AlbaranesCliente_REFERENCIA' DataType = datString Size = 255 DisplayLabel = 'Referencia' ServerAutoRefresh = True end item Name = 'AlbaranesCliente_FECHA_PREVISTA_ENVIO' DataType = datDateTime DisplayLabel = 'Fecha prevista de envio' end item Name = 'AlbaranesCliente_NOMBRE_ALMACEN' DataType = datString Size = 255 DisplayLabel = 'Almac'#233'n' end item Name = 'AlbaranesCliente_TIPO' DataType = datString Size = 1 DisplayLabel = 'Tipo' end item Name = 'AlbaranesCliente_REFERENCIA_CLIENTE' DataType = datString Size = 255 end item Name = 'AlbaranesCliente_ID_DIRECCION' DataType = datInteger end item Name = 'AlbaranesCliente_ID_TIENDA' DataType = datInteger end item Name = 'AlbaranesCliente_TIENDA' DataType = datString Size = 255 ServerAutoRefresh = True end item Name = 'AlbaranesCliente_Detalles_VALORADO' DataType = datSmallInt DisplayLabel = 'VALORADO' end> Left = 48 Top = 136 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 80 end end