object srvAlbaranesCliente: TsrvAlbaranesCliente OldCreateOrder = True OnCreate = DARemoteServiceCreate RequiresSession = True SessionManager = dmServer.SessionManager ConnectionName = 'IBX' ServiceSchema = schAlbaranesCliente ServiceDataStreamer = Bin2DataStreamer ExportedDataTables = <> BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection Height = 209 Width = 347 object schAlbaranesCliente: TDASchema ConnectionManager = dmServer.ConnectionManager DataDictionary = DADataDictionary Datasets = < item Params = < item Name = 'CODIGO' Value = '' ParamType = daptInput end item Name = 'EMPRESA' Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'REFERENCIAS' SQL = 'SELECT'#10' VALOR'#10'FROM'#10' REFERENCIAS'#10'WHERE'#10' CODIGO = :COD' + 'IGO'#10'AND ID_EMPRESA = :EMPRESA'#10 StatementType = stSQL ColumnMappings = < item DatasetField = 'VALOR' TableField = 'VALOR' end> end> Name = 'DarReferencia' Fields = < item Name = 'VALOR' 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> 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 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 = 'CALLE' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_CALLE' end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 DictionaryEntry = 'AlbaranesCliente_CODIGO_POSTAL' end item Name = 'POBLACION' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_POBLACION' end item Name = 'PROVINCIA' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_PROVINCIA' end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 DictionaryEntry = 'AlbaranesCliente_PERSONA_CONTACTO' end item Name = 'TELEFONO' DataType = datString Size = 25 DictionaryEntry = 'AlbaranesCliente_TELEFONO' 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 = '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> 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,'#10' ALBARANES_CLIENTE_DETALLES.ID_ARTICULO, ARTICULOS.REFE' + 'RENCIA, ARTICULOS.REFERENCIA_PROV as REFERENCIA_PROVEEDOR'#10#10'FROM ' + 'ALBARANES_CLIENTE_DETALLES'#10'LEFT JOIN ARTICULOS ON ALBARANES_CLIE' + 'NTE_DETALLES.ID_ARTICULO = ARTICULOS.ID'#10'where {where}'#10'ORDER BY P' + 'OSICION;'#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> 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 = datInteger 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 = '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 end> end> JoinDataTables = <> UnionDataTables = <> Commands = < item Params = < item Name = 'VALOR' Value = '' end item Name = 'CODIGO' Value = '' end item Name = 'EMPRESA' Value = '' end> Statements = < item Connection = 'IBX' TargetTable = 'REFERENCIAS' SQL = 'UPDATE REFERENCIAS SET'#10' VALOR = :VALOR'#10'WHERE CODIGO = :COD' + 'IGO AND'#10' ID_EMPRESA = :EMPRESA'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'ModificarReferencia' end item Params = < item Name = 'OLD_ID' DataType = datInteger Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'ALBARANES_CLIENTE' SQL = 'DELETE '#10' FROM'#10' ALBARANES_CLIENTE'#10' WHERE'#10' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_AlbaranesCliente' end item Params = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_DETALLES_ID' Value = '' ParamType = daptInput end item Name = 'ID_ALBARAN' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'POSICION' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'TIPO_DETALLE' DataType = datString Size = 10 Value = '' ParamType = daptInput end item Name = 'ID_ARTICULO' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'CONCEPTO' DataType = datString Size = 2000 Value = '' ParamType = daptInput end item Name = 'CANTIDAD' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'IMPORTE_UNIDAD' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'DESCUENTO' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'IMPORTE_PORTE' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'IMPORTE_TOTAL' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'VISIBLE' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'FECHA_ALTA' DataType = datDateTime Value = '' ParamType = daptInput end item Name = 'FECHA_MODIFICACION' DataType = datDateTime Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'ALBARANES_CLIENTE_DETALLES' SQL = 'INSERT INTO ALBARANES_CLIENTE_DETALLES ('#10' ID,'#10' ID_ALBARAN,' + #10' POSICION,'#10' TIPO_DETALLE,'#10' ID_ARTICULO,'#10' CONCEPTO,'#10 + ' CANTIDAD,'#10' IMPORTE_UNIDAD,'#10' DESCUENTO,'#10' IMPORTE_POR' + 'TE,'#10' IMPORTE_TOTAL,'#10' VISIBLE,'#10' FECHA_ALTA,'#10' FECHA_MO' + 'DIFICACION)'#10' VALUES ('#10' :ID,'#10' :ID_ALBARAN,'#10' :POSICION,'#10 + ' :TIPO_DETALLE,'#10' :ID_ARTICULO,'#10' :CONCEPTO,'#10' :CANTIDA' + 'D,'#10' :IMPORTE_UNIDAD,'#10' :DESCUENTO,'#10' :IMPORTE_PORTE,'#10' ' + ':IMPORTE_TOTAL,'#10' :VISIBLE,'#10' :FECHA_ALTA,'#10' :FECHA_MODIFI' + 'CACION);' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_AlbaranesCliente_Detalles' end item Params = < item Name = 'OLD_ID' DataType = datInteger Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' 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' Value = '' end item Name = 'ID_ALBARAN' Value = '' end item Name = 'POSICION' Value = '' end item Name = 'TIPO_DETALLE' Value = '' end item Name = 'ID_ARTICULO' Value = '' end item Name = 'CONCEPTO' Value = '' end item Name = 'CANTIDAD' Value = '' end item Name = 'IMPORTE_UNIDAD' Value = '' end item Name = 'DESCUENTO' Value = '' end item Name = 'IMPORTE_PORTE' Value = '' end item Name = 'IMPORTE_TOTAL' Value = '' end item Name = 'VISIBLE' Value = '' end item Name = 'FECHA_MODIFICACION' Value = '' end item Name = 'OLD_ID' Value = '' end> Statements = < item Connection = 'IBX' TargetTable = 'ALBARANES_CLIENTE_DETALLES' SQL = 'UPDATE ALBARANES_CLIENTE_DETALLES'#10' SET'#10' ID = :ID,'#10' ID_ALB' + 'ARAN = :ID_ALBARAN,'#10' POSICION = :POSICION,'#10' TIPO_DETALLE =' + ' :TIPO_DETALLE,'#10' ID_ARTICULO = :ID_ARTICULO,'#10' CONCEPTO = :' + 'CONCEPTO,'#10' CANTIDAD = :CANTIDAD,'#10' IMPORTE_UNIDAD = :IMPORT' + 'E_UNIDAD,'#10' DESCUENTO = :DESCUENTO,'#10' IMPORTE_PORTE = :IMPOR' + 'TE_PORTE,'#10' IMPORTE_TOTAL = :IMPORTE_TOTAL,'#10' VISIBLE = :VIS' + 'IBLE,'#10' FECHA_MODIFICACION = :FECHA_MODIFICACION'#10' WHERE'#10' (ID' + ' = :OLD_ID);'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Update_AlbaranesCliente_Detalles' end item Params = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_ALBARANES_CLI_ID' Value = '' ParamType = daptInput end item Name = 'ID_EMPRESA' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'ID_CLIENTE' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'REFERENCIA' DataType = datString Size = 255 Value = '' ParamType = daptInput end item Name = 'REFERENCIA_CLIENTE' DataType = datString Size = 255 Value = '' ParamType = daptInput end item Name = 'FECHA_ALBARAN' DataType = datDateTime Value = '' ParamType = daptInput end item Name = 'ID_PEDIDO' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'ID_ALMACEN' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'ID_FACTURA' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'CALLE' DataType = datString Size = 255 Value = '' ParamType = daptInput end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 Value = '' ParamType = daptInput end item Name = 'POBLACION' DataType = datString Size = 255 Value = '' ParamType = daptInput end item Name = 'PROVINCIA' DataType = datString Size = 255 Value = '' ParamType = daptInput end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 Value = '' ParamType = daptInput end item Name = 'TELEFONO' DataType = datString Size = 25 Value = '' ParamType = daptInput end item Name = 'BASE_IMPONIBLE' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'IMPORTE_NETO' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'IMPORTE_PORTE' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'DESCUENTO' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'IMPORTE_DESCUENTO' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'IVA' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'IMPORTE_IVA' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'IMPORTE_TOTAL' DataType = datFloat Value = '' ParamType = daptInput end item Name = 'OBSERVACIONES' DataType = datMemo Value = '' ParamType = daptInput end item Name = 'INCIDENCIAS' DataType = datMemo Value = '' ParamType = daptInput end item Name = 'INCIDENCIAS_ACTIVAS' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'FECHA_ALTA' DataType = datDateTime Value = '' ParamType = daptInput end item Name = 'FECHA_MODIFICACION' DataType = datDateTime Value = '' ParamType = daptInput end item Name = 'USUARIO' DataType = datString Size = 20 Value = '' ParamType = daptInput end item Name = 'ID_FORMA_PAGO' DataType = datInteger Value = '' ParamType = daptInput end item Name = 'FECHA_PREVISTA_ENVIO' DataType = datDateTime Value = '' ParamType = daptInput end item Name = 'FECHA_ENVIO' DataType = datDateTime Value = '' ParamType = daptInput end item Name = 'FECHA_RECEPCION' DataType = datDateTime Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'ALBARANES_CLIENTE' SQL = 'INSERT'#10' INTO ALBARANES_CLIENTE'#10' (ID, ID_EMPRESA, ID_CLIENTE,' + ' REFERENCIA, REFERENCIA_CLIENTE,'#10' FECHA_ALBARAN, ID_PEDIDO, ' + 'ID_ALMACEN, ID_FACTURA, CALLE,'#10' CODIGO_POSTAL, POBLACION, PR' + 'OVINCIA, PERSONA_CONTACTO, '#10' TELEFONO, BASE_IMPONIBLE, IMPOR' + 'TE_NETO, IMPORTE_PORTE, '#10' DESCUENTO, IMPORTE_DESCUENTO, IVA,' + ' IMPORTE_IVA, IMPORTE_TOTAL, '#10' OBSERVACIONES, INCIDENCIAS, I' + 'NCIDENCIAS_ACTIVAS, FECHA_ALTA, '#10' FECHA_MODIFICACION, USUARI' + 'O, ID_FORMA_PAGO,'#10' FECHA_PREVISTA_ENVIO, FECHA_ENVIO, FECHA_' + 'RECEPCION)'#10' VALUES'#10' (:ID, :ID_EMPRESA, :ID_CLIENTE, :REFEREN' + 'CIA, :REFERENCIA_CLIENTE,'#10' :FECHA_ALBARAN, :ID_PEDIDO, :ID_A' + 'LMACEN, :ID_FACTURA, :CALLE,'#10' :CODIGO_POSTAL, :POBLACION, :P' + 'ROVINCIA, :PERSONA_CONTACTO, '#10' :TELEFONO, :BASE_IMPONIBLE, :' + 'IMPORTE_NETO, :IMPORTE_PORTE, '#10' :DESCUENTO, :IMPORTE_DESCUEN' + 'TO, :IVA, :IMPORTE_IVA, '#10' :IMPORTE_TOTAL, :OBSERVACIONES, :I' + 'NCIDENCIAS, :INCIDENCIAS_ACTIVAS, '#10' :FECHA_ALTA, :FECHA_MODI' + 'FICACION, :USUARIO,'#10' :ID_FORMA_PAGO, :FECHA_PREVISTA_ENVIO, ' + ':FECHA_ENVIO, :FECHA_RECEPCION)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_AlbaranesCliente' end item Params = < item Name = 'ID' Value = '' end item Name = 'ID_EMPRESA' Value = '' end item Name = 'ID_CLIENTE' Value = '' end item Name = 'REFERENCIA' Value = '' end item Name = 'REFERENCIA_CLIENTE' Value = '' end item Name = 'FECHA_ALBARAN' Value = '' end item Name = 'ID_PEDIDO' Value = '' end item Name = 'ID_ALMACEN' Value = '' end item Name = 'ID_FACTURA' Value = '' end item Name = 'CALLE' Value = '' end item Name = 'CODIGO_POSTAL' Value = '' end item Name = 'POBLACION' Value = '' end item Name = 'PROVINCIA' Value = '' end item Name = 'PERSONA_CONTACTO' Value = '' end item Name = 'TELEFONO' Value = '' end item Name = 'BASE_IMPONIBLE' Value = '' end item Name = 'IMPORTE_NETO' Value = '' end item Name = 'IMPORTE_PORTE' Value = '' end item Name = 'DESCUENTO' Value = '' end item Name = 'IMPORTE_DESCUENTO' Value = '' end item Name = 'IVA' Value = '' end item Name = 'IMPORTE_IVA' Value = '' end item Name = 'IMPORTE_TOTAL' Value = '' end item Name = 'OBSERVACIONES' Value = '' end item Name = 'INCIDENCIAS' Value = '' end item Name = 'INCIDENCIAS_ACTIVAS' Value = '' end item Name = 'FECHA_ALTA' Value = '' end item Name = 'FECHA_MODIFICACION' Value = '' end item Name = 'USUARIO' Value = '' end item Name = 'ID_FORMA_PAGO' Value = '' end item Name = 'FECHA_PREVISTA_ENVIO' Value = '' end item Name = 'FECHA_ENVIO' Value = '' end item Name = 'FECHA_RECEPCION' Value = '' end item Name = 'OLD_ID' Value = '' end> Statements = < item Connection = 'IBX' TargetTable = 'ALBARANES_CLIENTE' SQL = 'UPDATE ALBARANES_CLIENTE'#10' SET '#10' ID = :ID,'#10' ID_EMPRESA = :' + 'ID_EMPRESA, '#10' ID_CLIENTE = :ID_CLIENTE, '#10' REFERENCIA = :RE' + 'FERENCIA, '#10' REFERENCIA_CLIENTE = :REFERENCIA_CLIENTE,'#10' FEC' + 'HA_ALBARAN = :FECHA_ALBARAN, '#10' ID_PEDIDO = :ID_PEDIDO, '#10' I' + 'D_ALMACEN = :ID_ALMACEN,'#10' ID_FACTURA = :ID_FACTURA, '#10' CALL' + 'E = :CALLE, '#10' CODIGO_POSTAL = :CODIGO_POSTAL, '#10' POBLACION ' + '= :POBLACION, '#10' PROVINCIA = :PROVINCIA, '#10' PERSONA_CONTACTO' + ' = :PERSONA_CONTACTO, '#10' TELEFONO = :TELEFONO, '#10' BASE_IMPON' + 'IBLE = :BASE_IMPONIBLE, '#10' IMPORTE_NETO = :IMPORTE_NETO, '#10' ' + 'IMPORTE_PORTE = :IMPORTE_PORTE, '#10' DESCUENTO = :DESCUENTO, '#10' ' + ' IMPORTE_DESCUENTO = :IMPORTE_DESCUENTO, '#10' IVA = :IVA, '#10' ' + 'IMPORTE_IVA = :IMPORTE_IVA, '#10' IMPORTE_TOTAL = :IMPORTE_TOTAL,' + ' '#10' OBSERVACIONES = :OBSERVACIONES, '#10' INCIDENCIAS = :INCIDE' + 'NCIAS, '#10' INCIDENCIAS_ACTIVAS = :INCIDENCIAS_ACTIVAS, '#10' FEC' + 'HA_ALTA = :FECHA_ALTA, '#10' FECHA_MODIFICACION = :FECHA_MODIFICA' + 'CION, '#10' USUARIO = :USUARIO, '#10' ID_FORMA_PAGO = :ID_FORMA_PA' + 'GO,'#10' FECHA_PREVISTA_ENVIO = :FECHA_PREVISTA_ENVIO,'#10' FECHA_' + 'ENVIO = :FECHA_ENVIO, '#10' FECHA_RECEPCION = :FECHA_RECEPCION'#10' ' + 'WHERE'#10' (ID = :OLD_ID)'#10 StatementType = stSQL ColumnMappings = <> end> Name = 'Update_AlbaranesCliente' 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 = [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' end item Name = 'AlbaranesCliente_SITUACION' DataType = datString Size = 255 DisplayLabel = 'Situaci'#243'n' end item Name = 'AlbaranesCliente_CALLE' DataType = datString Size = 255 DisplayLabel = 'Calle' end item Name = 'AlbaranesCliente_CODIGO_POSTAL' DataType = datString Size = 10 DisplayLabel = 'C'#243'd. postal' end item Name = 'AlbaranesCliente_POBLACION' DataType = datString Size = 255 DisplayLabel = 'Poblaci'#243'n' end item Name = 'AlbaranesCliente_PROVINCIA' DataType = datString Size = 255 DisplayLabel = 'Provincia' end item Name = 'AlbaranesCliente_PERSONA_CONTACTO' DataType = datString Size = 255 DisplayLabel = 'Persona de contacto' end item Name = 'AlbaranesCliente_TELEFONO' DataType = datString Size = 25 DisplayLabel = 'Tel'#233'fono' 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 = datInteger 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> Left = 48 Top = 136 end object Bin2DataStreamer: TDABin2DataStreamer Left = 48 Top = 80 end end