object srvContactos: TsrvContactos OldCreateOrder = True OnCreate = DARemoteServiceCreate RequiresSession = True AcquireConnection = True ConnectionName = 'IBX' ServiceSchema = schContactos ServiceAdapter = BINAdapter OnBeforeAcquireConnection = DARemoteServiceBeforeAcquireConnection OnBeforeGetDatasetData = DARemoteServiceBeforeGetDatasetData Height = 347 Width = 444 object schContactos: TDASchema ConnectionManager = dmServer.ConnectionManager DataDictionary = DataDictionary Diagrams = Diagrams Datasets = < item Params = < item Name = 'ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown Value = '22' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS' SQL = 'SELECT '#10' ID, ID_CATEGORIA, NIF_CIF, NOMBRE, CALLE, POBLACION,' + ' '#10' PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1,' + ' '#10' MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, '#10' FE' + 'CHA_ALTA, FECHA_MODIFICACION, USUARIO, ID_EMPRESA, '#10' REFERENC' + 'IA'#10' FROM'#10' V_CONTACTOS'#10' WHERE'#10' ID_CATEGORIA = :ID_CATEGOR' + 'IA' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'NIF_CIF' TableField = 'NIF_CIF' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end item DatasetField = 'CALLE' TableField = 'CALLE' end item DatasetField = 'POBLACION' TableField = 'POBLACION' end item DatasetField = 'PROVINCIA' TableField = 'PROVINCIA' end item DatasetField = 'CODIGO_POSTAL' TableField = 'CODIGO_POSTAL' end item DatasetField = 'TELEFONO_1' TableField = 'TELEFONO_1' end item DatasetField = 'TELEFONO_2' TableField = 'TELEFONO_2' end item DatasetField = 'MOVIL_1' TableField = 'MOVIL_1' end item DatasetField = 'MOVIL_2' TableField = 'MOVIL_2' end item DatasetField = 'FAX' TableField = 'FAX' end item DatasetField = 'EMAIL_1' TableField = 'EMAIL_1' end item DatasetField = 'EMAIL_2' TableField = 'EMAIL_2' end item DatasetField = 'PAGINA_WEB' TableField = 'PAGINA_WEB' end item DatasetField = 'NOTAS' TableField = 'NOTAS' 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_CATEGORIA' TableField = 'ID_CATEGORIA' SQLOrigin = 'CONTACTOS_CATEGORIAS.ID_CATEGORIA' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' SQLOrigin = 'EMPRESAS_CONTACTOS.ID_EMPRESA' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end> end> Name = 'Contactos' Fields = < item Name = 'ID' DataType = datAutoInc BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID_CATEGORIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NIF_CIF' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'Contactos_NIF_CIF' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_NOMBRE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_CALLE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_POBLACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_PROVINCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown DictionaryEntry = 'Contactos_CODIGO_POSTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO_1' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_TELEFONO_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO_2' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_TELEFONO_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'MOVIL_1' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_MOVIL_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'MOVIL_2' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_MOVIL_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FAX' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_FAX' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'EMAIL_1' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_EMAIL_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'EMAIL_2' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_EMAIL_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PAGINA_WEB' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_PAGINA_WEB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOTAS' DataType = datMemo BlobType = dabtMemo DictionaryEntry = 'Contactos_NOTAS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'Contactos_FECHA_ALTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'Contactos_FECHA_MODIFICACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DictionaryEntry = 'Contactos_USUARIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID_EMPRESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_REFERENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = <> Statements = < item Connection = 'IBX' TargetTable = 'CLIENTES_GRUPOS' SQL = 'SELECT DESCRIPCION'#10'FROM CLIENTES_GRUPOS' StatementType = stSQL ColumnMappings = < item DatasetField = 'DESCRIPCION' TableField = 'DESCRIPCION' end> end> Name = 'GruposCliente' Fields = < item Name = 'DESCRIPCION' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = < item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_DATOS_BANCO' SQL = 'SELECT'#10' ID, ID_CONTACTO, TITULAR, ENTIDAD, SUCURSAL, DC, CUEN' + 'TA'#10' FROM'#10' CONTACTOS_DATOS_BANCO'#10' WHERE ID_CONTACTO = :ID_CO' + 'NTACTO' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_CONTACTO' TableField = 'ID_CONTACTO' end item DatasetField = 'TITULAR' TableField = 'TITULAR' end item DatasetField = 'ENTIDAD' TableField = 'ENTIDAD' end item DatasetField = 'SUCURSAL' TableField = 'SUCURSAL' end item DatasetField = 'DC' TableField = 'DC' end item DatasetField = 'CUENTA' TableField = 'CUENTA' end> end> Name = 'DatosBancarios' Fields = < item Name = 'ID' DataType = datAutoInc BlobType = dabtUnknown DictionaryEntry = 'DatosBancarios_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'DatosBancarios_ID_CONTACTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TITULAR' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'DatosBancarios_TITULAR' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ENTIDAD' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'DatosBancarios_ENTIDAD' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'SUCURSAL' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'DatosBancarios_SUCURSAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DC' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'DatosBancarios_DC' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CUENTA' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'DatosBancarios_CUENTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = < item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '444' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_CATEGORIAS' SQL = 'SELECT '#10' ID_CONTACTO, ID_CATEGORIA'#10' FROM'#10' CONTACTOS_CATEG' + 'ORIAS'#10' WHERE'#10' ID_CONTACTO = :ID_CONTACTO' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID_CONTACTO' TableField = 'ID_CONTACTO' end item DatasetField = 'ID_CATEGORIA' TableField = 'ID_CATEGORIA' end> end> Name = 'ContactosCategorias' Fields = < item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = <> Statements = < item Connection = 'IBX' TargetTable = 'V_CLIENTES' SQL = 'SELECT '#10' ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, CALLE' + ', '#10' POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO' + '_2, '#10' MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, '#10' ' + ' NOTAS, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, ID_EMPRESA, '#10 + ' ID_AGENTE, GRUPO_CLIENTE, NOMBRE_COMERCIAL, VENCIMIENTO_FACT' + 'URAS, '#10' BLOQUEADO, MOTIVO_BLOQUEO, RECARGO_EQUIVALENCIA, REGI' + 'MEN_IVA, '#10' ID_TIPO_IVA, ID_FORMA_PAGO, TIENDA_WEB'#10' FROM'#10' ' + 'V_CLIENTES' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'NIF_CIF' TableField = 'NIF_CIF' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end item DatasetField = 'CALLE' TableField = 'CALLE' end item DatasetField = 'POBLACION' TableField = 'POBLACION' end item DatasetField = 'PROVINCIA' TableField = 'PROVINCIA' end item DatasetField = 'CODIGO_POSTAL' TableField = 'CODIGO_POSTAL' end item DatasetField = 'TELEFONO_1' TableField = 'TELEFONO_1' end item DatasetField = 'TELEFONO_2' TableField = 'TELEFONO_2' end item DatasetField = 'MOVIL_1' TableField = 'MOVIL_1' end item DatasetField = 'MOVIL_2' TableField = 'MOVIL_2' end item DatasetField = 'FAX' TableField = 'FAX' end item DatasetField = 'EMAIL_1' TableField = 'EMAIL_1' end item DatasetField = 'EMAIL_2' TableField = 'EMAIL_2' end item DatasetField = 'PAGINA_WEB' TableField = 'PAGINA_WEB' end item DatasetField = 'NOTAS' TableField = 'NOTAS' 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_CATEGORIA' TableField = 'ID_CATEGORIA' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'ID_AGENTE' TableField = 'ID_AGENTE' end item DatasetField = 'GRUPO_CLIENTE' TableField = 'GRUPO_CLIENTE' end item DatasetField = 'NOMBRE_COMERCIAL' TableField = 'NOMBRE_COMERCIAL' end item DatasetField = 'VENCIMIENTO_FACTURAS' TableField = 'VENCIMIENTO_FACTURAS' end item DatasetField = 'BLOQUEADO' TableField = 'BLOQUEADO' end item DatasetField = 'RECARGO_EQUIVALENCIA' TableField = 'RECARGO_EQUIVALENCIA' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end item DatasetField = 'REGIMEN_IVA' TableField = 'REGIMEN_IVA' end item DatasetField = 'MOTIVO_BLOQUEO' TableField = 'MOTIVO_BLOQUEO' end item DatasetField = 'ID_TIPO_IVA' TableField = 'ID_TIPO_IVA' end item DatasetField = 'ID_FORMA_PAGO' TableField = 'ID_FORMA_PAGO' end item DatasetField = 'TIENDA_WEB' TableField = 'TIENDA_WEB' end> end> Name = 'Clientes' Fields = < item Name = 'ID' DataType = datAutoInc BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID_CATEGORIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NIF_CIF' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'Contactos_NIF_CIF' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_NOMBRE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_CALLE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_POBLACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_PROVINCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown DictionaryEntry = 'Contactos_CODIGO_POSTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO_1' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_TELEFONO_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO_2' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_TELEFONO_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'MOVIL_1' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_MOVIL_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'MOVIL_2' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_MOVIL_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FAX' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_FAX' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'EMAIL_1' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_EMAIL_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'EMAIL_2' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_EMAIL_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PAGINA_WEB' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_PAGINA_WEB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOTAS' DataType = datMemo BlobType = dabtMemo DictionaryEntry = 'Contactos_NOTAS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'Contactos_FECHA_ALTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'Contactos_FECHA_MODIFICACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DictionaryEntry = 'Contactos_USUARIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID_EMPRESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Clientes_REFERENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_AGENTE' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Clientes_ID_AGENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'GRUPO_CLIENTE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Clientes_GRUPO_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE_COMERCIAL' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Clientes_NOMBRE_COMERCIAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'VENCIMIENTO_FACTURAS' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Clientes_VENCIMIENTO_FACTURAS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'BLOQUEADO' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Clientes_BLOQUEADO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'MOTIVO_BLOQUEO' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Clientes_MOTIVO_BLOQUEO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'RECARGO_EQUIVALENCIA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Clientes_RECARGO_EQUIVALENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REGIMEN_IVA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Clientes_REGIMEN_IVA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_TIPO_IVA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Clientes_ID_TIPO_IVA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_FORMA_PAGO' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Clientes_ID_FORMA_PAGO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TIENDA_WEB' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = <> Statements = < item Connection = 'IBX' TargetTable = 'V_PROVEEDORES' SQL = 'SELECT '#10' ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, CALLE' + ', '#10' POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO' + '_2, '#10' MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, '#10' ' + ' NOTAS, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, ID_EMPRESA, '#10 + ' REGIMEN_IVA, DESCUENTO, ID_TIPO_IVA, ID_FORMA_PAGO, TIENDA_W' + 'EB'#10' FROM'#10' V_PROVEEDORES' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'NIF_CIF' TableField = 'NIF_CIF' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end item DatasetField = 'CALLE' TableField = 'CALLE' end item DatasetField = 'POBLACION' TableField = 'POBLACION' end item DatasetField = 'PROVINCIA' TableField = 'PROVINCIA' end item DatasetField = 'CODIGO_POSTAL' TableField = 'CODIGO_POSTAL' end item DatasetField = 'TELEFONO_1' TableField = 'TELEFONO_1' end item DatasetField = 'TELEFONO_2' TableField = 'TELEFONO_2' end item DatasetField = 'MOVIL_1' TableField = 'MOVIL_1' end item DatasetField = 'MOVIL_2' TableField = 'MOVIL_2' end item DatasetField = 'FAX' TableField = 'FAX' end item DatasetField = 'EMAIL_1' TableField = 'EMAIL_1' end item DatasetField = 'EMAIL_2' TableField = 'EMAIL_2' end item DatasetField = 'PAGINA_WEB' TableField = 'PAGINA_WEB' end item DatasetField = 'NOTAS' TableField = 'NOTAS' 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_CATEGORIA' TableField = 'ID_CATEGORIA' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'DESCUENTO' TableField = 'DESCUENTO' end item DatasetField = 'REGIMEN_IVA' TableField = 'REGIMEN_IVA' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end item DatasetField = 'ID_TIPO_IVA' TableField = 'ID_TIPO_IVA' end item DatasetField = 'ID_FORMA_PAGO' TableField = 'ID_FORMA_PAGO' end> end> Name = 'Proveedores' Fields = < item Name = 'ID' DataType = datAutoInc BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID_CATEGORIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NIF_CIF' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'Contactos_NIF_CIF' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_NOMBRE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_CALLE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_POBLACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_PROVINCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown DictionaryEntry = 'Contactos_CODIGO_POSTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO_1' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_TELEFONO_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO_2' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_TELEFONO_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'MOVIL_1' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_MOVIL_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'MOVIL_2' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_MOVIL_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FAX' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_FAX' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'EMAIL_1' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_EMAIL_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'EMAIL_2' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_EMAIL_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PAGINA_WEB' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_PAGINA_WEB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOTAS' DataType = datMemo BlobType = dabtMemo DictionaryEntry = 'Contactos_NOTAS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'Contactos_FECHA_ALTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'Contactos_FECHA_MODIFICACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DictionaryEntry = 'Contactos_USUARIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID_EMPRESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REGIMEN_IVA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Proveedores_REGIMEN_IVA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DESCUENTO' DataType = datFloat BlobType = dabtUnknown DictionaryEntry = 'Proveedores_DESCUENTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Proveedores_REFERENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_TIPO_IVA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Proveedores_ID_TIPO_IVA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_FORMA_PAGO' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Proveedores_ID_FORMA_PAGO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TIENDA_WEB' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = <> Statements = < item Connection = 'IBX' TargetTable = 'V_AGENTES' SQL = 'SELECT '#10' ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, CALLE' + ', '#10' POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO' + '_2, '#10' MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, '#10' ' + ' NOTAS, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, ID_EMPRESA'#10' ' + 'FROM'#10' V_AGENTES' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'NIF_CIF' TableField = 'NIF_CIF' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end item DatasetField = 'CALLE' TableField = 'CALLE' end item DatasetField = 'POBLACION' TableField = 'POBLACION' end item DatasetField = 'PROVINCIA' TableField = 'PROVINCIA' end item DatasetField = 'CODIGO_POSTAL' TableField = 'CODIGO_POSTAL' end item DatasetField = 'TELEFONO_1' TableField = 'TELEFONO_1' end item DatasetField = 'TELEFONO_2' TableField = 'TELEFONO_2' end item DatasetField = 'MOVIL_1' TableField = 'MOVIL_1' end item DatasetField = 'MOVIL_2' TableField = 'MOVIL_2' end item DatasetField = 'FAX' TableField = 'FAX' end item DatasetField = 'EMAIL_1' TableField = 'EMAIL_1' end item DatasetField = 'EMAIL_2' TableField = 'EMAIL_2' end item DatasetField = 'PAGINA_WEB' TableField = 'PAGINA_WEB' end item DatasetField = 'NOTAS' TableField = 'NOTAS' 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_CATEGORIA' TableField = 'ID_CATEGORIA' end item DatasetField = 'ID_EMPRESA' TableField = 'ID_EMPRESA' end item DatasetField = 'REFERENCIA' TableField = 'REFERENCIA' end> end> Name = 'Agentes' Fields = < item Name = 'ID' DataType = datAutoInc BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID_CATEGORIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NIF_CIF' DataType = datString Size = 15 BlobType = dabtUnknown DictionaryEntry = 'Contactos_NIF_CIF' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_NOMBRE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_CALLE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_POBLACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_PROVINCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown DictionaryEntry = 'Contactos_CODIGO_POSTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO_1' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_TELEFONO_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO_2' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_TELEFONO_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'MOVIL_1' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_MOVIL_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'MOVIL_2' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_MOVIL_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FAX' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'Contactos_FAX' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'EMAIL_1' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_EMAIL_1' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'EMAIL_2' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_EMAIL_2' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PAGINA_WEB' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Contactos_PAGINA_WEB' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOTAS' DataType = datMemo BlobType = dabtMemo DictionaryEntry = 'Contactos_NOTAS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'Contactos_FECHA_ALTA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DictionaryEntry = 'Contactos_FECHA_MODIFICACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DictionaryEntry = 'Contactos_USUARIO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'Contactos_ID_EMPRESA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'Agentes_REFERENCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = < item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '9' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_DIRECCIONES' SQL = 'SELECT'#10' ID, ID_CONTACTO, NOMBRE, CALLE, POBLACION, PROVINCIA,' + ' CODIGO_POSTAL, PERSONA_CONTACTO,'#10' TELEFONO, EMAIL, NOTAS, PO' + 'RTE, FECHA_ALTA, FECHA_MODIFICACION'#10' FROM'#10' CONTACTOS_DIRECCI' + 'ONES'#10' WHERE ID_CONTACTO = :ID_CONTACTO' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_CONTACTO' TableField = 'ID_CONTACTO' end item DatasetField = 'CALLE' TableField = 'CALLE' end item DatasetField = 'POBLACION' TableField = 'POBLACION' end item DatasetField = 'PROVINCIA' TableField = 'PROVINCIA' end item DatasetField = 'CODIGO_POSTAL' TableField = 'CODIGO_POSTAL' end item DatasetField = 'PERSONA_CONTACTO' TableField = 'PERSONA_CONTACTO' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end item DatasetField = 'TELEFONO' TableField = 'TELEFONO' end item DatasetField = 'EMAIL' TableField = 'EMAIL' end item DatasetField = 'NOTAS' TableField = 'NOTAS' end item DatasetField = 'PORTE' TableField = 'PORTE' end item DatasetField = 'FECHA_ALTA' TableField = 'FECHA_ALTA' end item DatasetField = 'FECHA_MODIFICACION' TableField = 'FECHA_MODIFICACION' end> end> Name = 'DireccionesContacto' Fields = < item Name = 'ID' DataType = datAutoInc BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_ID_CONTACTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_NOMBRE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_CALLE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_POBLACION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_PROVINCIA' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_CODIGO_POSTAL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_PERSONA_CONTACTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'TELEFONO' DataType = datString Size = 25 BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_TELEFONO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'EMAIL' DataType = datString Size = 255 BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_EMAIL' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOTAS' DataType = datMemo BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_NOTAS' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'PORTE' DataType = datFloat BlobType = dabtUnknown DictionaryEntry = 'DireccionesContacto_PORTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = < item Name = 'ID_AGENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'AGENTES_COMISIONES' SQL = 'SELECT '#10' AGENTES_COMISIONES.ID, AGENTES_COMISIONES.ID_AGENTE,' + #10' AGENTES_COMISIONES.ID_PROVEEDOR, CONTACTOS.NOMBRE,'#10' AGEN' + 'TES_COMISIONES.COMISION'#10' FROM'#10' AGENTES_COMISIONES'#10' LEFT JOI' + 'N CONTACTOS ON (CONTACTOS.ID = AGENTES_COMISIONES.ID_PROVEEDOR)'#10 + 'WHERE AGENTES_COMISIONES.ID_AGENTE = :ID_AGENTE' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_AGENTE' TableField = 'ID_AGENTE' end item DatasetField = 'ID_PROVEEDOR' TableField = 'ID_PROVEEDOR' end item DatasetField = 'COMISION' TableField = 'COMISION' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end> end> Name = 'AgentesComisiones' Fields = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'AgentesComisiones_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_AGENTE' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'AgentesComisiones_ID_AGENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'AgentesComisiones_ID_PROVEEDOR' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Nombre' Alignment = taLeftJustify ServerAutoRefresh = True InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'COMISION' DataType = datFloat BlobType = dabtUnknown DictionaryEntry = 'AgentesComisiones_COMISION' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end item Params = < item Name = 'ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CLIENTES_DTOS_PROVEEDORES' SQL = 'SELECT '#10' CLIENTES_DTOS_PROVEEDORES.ID,'#10' CLIENTES_DTOS_PROV' + 'EEDORES.ID_CLIENTE,'#10' CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR,'#10 + ' CONTACTOS.NOMBRE,'#10' CLIENTES_DTOS_PROVEEDORES.DESCUENTO'#10' ' + 'FROM'#10' CLIENTES_DTOS_PROVEEDORES'#10' LEFT JOIN CONTACTOS ON (CON' + 'TACTOS.ID = CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR)'#10'WHERE CLIENT' + 'ES_DTOS_PROVEEDORES.ID_CLIENTE = :ID_CLIENTE' StatementType = stSQL ColumnMappings = < item DatasetField = 'ID' TableField = 'ID' end item DatasetField = 'ID_CLIENTE' TableField = 'ID_CLIENTE' end item DatasetField = 'ID_PROVEEDOR' TableField = 'ID_PROVEEDOR' end item DatasetField = 'DESCUENTO' TableField = 'DESCUENTO' end item DatasetField = 'NOMBRE' TableField = 'NOMBRE' end> end> Name = 'ClientesDescuentos' Fields = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'ClientesDescuentos_ID' InPrimaryKey = True Calculated = False Lookup = False LookupCache = False end item Name = 'ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'ClientesDescuentos_ID_CLIENTE' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown DictionaryEntry = 'ClientesDescuentos_ID_PROVEEDOR' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ClientesDescuentos_NOMBRE' Alignment = taLeftJustify ServerAutoRefresh = True InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end item Name = 'DESCUENTO' DataType = datFloat BlobType = dabtUnknown DictionaryEntry = 'ClientesDescuentos_DESCUENTO' InPrimaryKey = False Calculated = False Lookup = False LookupCache = False end> BusinessRulesClient.ScriptLanguage = rslPascalScript BusinessRulesServer.ScriptLanguage = rslPascalScript end> Commands = < item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NIF_CIF' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TELEFONO_1' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TELEFONO_2' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'MOVIL_1' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'MOVIL_2' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FAX' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'EMAIL_1' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'EMAIL_2' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PAGINA_WEB' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOTAS' DataType = datMemo BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS' SQL = 'INSERT'#10' INTO CONTACTOS'#10' (ID, NIF_CIF, NOMBRE, CALLE, POBLACI' + 'ON, PROVINCIA, CODIGO_POSTAL,'#10' TELEFONO_1, TELEFONO_2, MOVIL' + '_1, MOVIL_2, FAX, EMAIL_1, '#10' EMAIL_2, PAGINA_WEB, NOTAS, FEC' + 'HA_ALTA, FECHA_MODIFICACION, '#10' USUARIO, REFERENCIA)'#10' VALUES' + #10' (:ID, :NIF_CIF, :NOMBRE, :CALLE, :POBLACION, :PROVINCIA,'#10' ' + ' :CODIGO_POSTAL, :TELEFONO_1, :TELEFONO_2, :MOVIL_1, '#10' :MO' + 'VIL_2, :FAX, :EMAIL_1, :EMAIL_2, :PAGINA_WEB, :NOTAS, '#10' :FEC' + 'HA_ALTA, :FECHA_MODIFICACION, :USUARIO, :REFERENCIA)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_Contactos' end item Params = < item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS' SQL = 'DELETE '#10' FROM'#10' CONTACTOS'#10' WHERE'#10' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_Contactos' end item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NIF_CIF' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TELEFONO_1' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TELEFONO_2' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'MOVIL_1' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'MOVIL_2' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FAX' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'EMAIL_1' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'EMAIL_2' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PAGINA_WEB' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOTAS' DataType = datMemo BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS' SQL = 'UPDATE CONTACTOS'#10' SET '#10' ID = :ID,'#10' NIF_CIF = :NIF_CIF, '#10' ' + ' NOMBRE = :NOMBRE, '#10' CALLE = :CALLE, '#10' POBLACION = :POBL' + 'ACION, '#10' PROVINCIA = :PROVINCIA, '#10' CODIGO_POSTAL = :CODIGO' + '_POSTAL, '#10' TELEFONO_1 = :TELEFONO_1, '#10' TELEFONO_2 = :TELEF' + 'ONO_2, '#10' MOVIL_1 = :MOVIL_1, '#10' MOVIL_2 = :MOVIL_2, '#10' FA' + 'X = :FAX, '#10' EMAIL_1 = :EMAIL_1, '#10' EMAIL_2 = :EMAIL_2, '#10' ' + ' PAGINA_WEB = :PAGINA_WEB, '#10' NOTAS = :NOTAS, '#10' FECHA_ALTA ' + '= :FECHA_ALTA, '#10' FECHA_MODIFICACION = :FECHA_MODIFICACION, '#10' ' + ' USUARIO = :USUARIO,'#10' REFERENCIA = :REFERENCIA'#10' WHERE'#10' ' + '(ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_Contactos' end item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TITULAR' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ENTIDAD' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'SUCURSAL' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DC' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CUENTA' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_DATOS_BANCO' SQL = 'INSERT'#10' INTO CONTACTOS_DATOS_BANCO'#10' (ID, ID_CONTACTO, TITULA' + 'R, ENTIDAD, SUCURSAL, DC, CUENTA)'#10' VALUES'#10' (:ID, :ID_CONTACT' + 'O, :TITULAR, :ENTIDAD, :SUCURSAL, :DC, :CUENTA)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_DatosBancarios' end item Params = < item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_DATOS_BANCO' SQL = 'DELETE '#10' FROM'#10' CONTACTOS_DATOS_BANCO'#10' WHERE'#10' (ID = :OLD_' + 'ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_DatosBancarios' end item Params = < item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TITULAR' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ENTIDAD' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'SUCURSAL' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DC' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CUENTA' DataType = datString Size = 15 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_DATOS_BANCO' SQL = 'UPDATE CONTACTOS_DATOS_BANCO'#10' SET '#10' ID_CONTACTO = :ID_CONTAC' + 'TO, '#10' TITULAR = :TITULAR, '#10' ENTIDAD = :ENTIDAD, '#10' SUCUR' + 'SAL = :SUCURSAL, '#10' DC = :DC, '#10' CUENTA = :CUENTA'#10' WHERE'#10' ' + ' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_DatosBancarios' end item Params = < item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_CATEGORIAS' SQL = 'INSERT'#10' INTO CONTACTOS_CATEGORIAS'#10' (ID_CONTACTO, ID_CATEGORI' + 'A)'#10' VALUES'#10' (:ID_CONTACTO, :ID_CATEGORIA)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_ContactosCategorias' end item Params = < item Name = 'OLD_ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_CATEGORIAS' SQL = 'DELETE '#10' FROM'#10' CONTACTOS_CATEGORIAS'#10' WHERE'#10' (ID_CONTACTO' + ' = :OLD_ID_CONTACTO) AND '#10' (ID_CATEGORIA = :OLD_ID_CATEGORIA)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_ContactosCategorias' end item Params = < item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_CATEGORIAS' SQL = 'UPDATE CONTACTOS_CATEGORIAS'#10' SET '#10' ID_CONTACTO = :ID_CONTACT' + 'O, '#10' ID_CATEGORIA = :ID_CATEGORIA'#10' WHERE'#10' (ID_CONTACTO = ' + ':OLD_ID_CONTACTO) AND '#10' (ID_CATEGORIA = :OLD_ID_CATEGORIA)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_ContactosCategorias' end item Params = < item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'EMPRESAS_CONTACTOS' SQL = 'INSERT'#10' INTO EMPRESAS_CONTACTOS'#10' (ID_EMPRESA, ID_CONTACTO)'#10' ' + ' VALUES'#10' (:ID_EMPRESA, :ID_CONTACTO)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_ContactosEmpresas' end item Params = < item Name = 'OLD_ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'EMPRESAS_CONTACTOS' SQL = 'DELETE '#10' FROM'#10' EMPRESAS_CONTACTOS'#10' WHERE'#10' (ID_EMPRESA = ' + ':OLD_ID_EMPRESA) AND '#10' (ID_CONTACTO = :OLD_ID_CONTACTO)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_ContactosEmpresas' end item Params = < item Name = 'ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'EMPRESAS_CONTACTOS' SQL = 'UPDATE EMPRESAS_CONTACTOS'#10' SET '#10' ID_EMPRESA = :ID_EMPRESA, '#10 + ' ID_CONTACTO = :ID_CONTACTO'#10' WHERE'#10' (ID_EMPRESA = :OLD_ID' + '_EMPRESA) AND '#10' (ID_CONTACTO = :OLD_ID_CONTACTO)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_ContactosEmpresas' end item Params = < item Name = 'ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_AGENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'GRUPO_CLIENTE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'RECARGO_EQUIVALENCIA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOMBRE_COMERCIAL' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'VENCIMIENTO_FACTURAS' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'BLOQUEADO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'MOTIVO_BLOQUEO' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'REGIMEN_IVA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_TIPO_IVA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_FORMA_PAGO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TIENDA_WEB' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CLIENTES_DATOS' SQL = 'INSERT'#10' INTO CLIENTES_DATOS'#10' (ID_CLIENTE, ID_AGENTE, GRUPO_C' + 'LIENTE, RECARGO_EQUIVALENCIA,'#10' NOMBRE_COMERCIAL, VENCIMIENTO' + '_FACTURAS, BLOQUEADO, MOTIVO_BLOQUEO,'#10' REGIMEN_IVA, ID_TIPO_' + 'IVA, ID_FORMA_PAGO, TIENDA_WEB)'#10' VALUES'#10' (:ID_CLIENTE, :ID_A' + 'GENTE, :GRUPO_CLIENTE, :RECARGO_EQUIVALENCIA,'#10' :NOMBRE_COMER' + 'CIAL, :VENCIMIENTO_FACTURAS,'#10' :BLOQUEADO, :MOTIVO_BLOQUEO, :' + 'REGIMEN_IVA,'#10' :ID_TIPO_IVA, :ID_FORMA_PAGO, :TIENDA_WEB)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_ClientesDatos' end item Params = < item Name = 'OLD_ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CLIENTES_DATOS' SQL = 'DELETE '#10' FROM'#10' CLIENTES_DATOS'#10' WHERE'#10' (ID_CLIENTE = :OLD' + '_ID_CLIENTE)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_ClientesDatos' end item Params = < item Name = 'ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_AGENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'GRUPO_CLIENTE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'MOTIVO_BLOQUEO' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'RECARGO_EQUIVALENCIA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOMBRE_COMERCIAL' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'VENCIMIENTO_FACTURAS' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'BLOQUEADO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'REGIMEN_IVA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_TIPO_IVA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_FORMA_PAGO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TIENDA_WEB' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CLIENTES_DATOS' SQL = 'UPDATE CLIENTES_DATOS'#10' SET '#10' ID_CLIENTE = :ID_CLIENTE, '#10' ' + 'ID_AGENTE = :ID_AGENTE,'#10' GRUPO_CLIENTE = :GRUPO_CLIENTE,'#10' ' + 'MOTIVO_BLOQUEO = :MOTIVO_BLOQUEO,'#10' RECARGO_EQUIVALENCIA = :RE' + 'CARGO_EQUIVALENCIA,'#10' NOMBRE_COMERCIAL = :NOMBRE_COMERCIAL,'#10' ' + ' VENCIMIENTO_FACTURAS = :VENCIMIENTO_FACTURAS,'#10' BLOQUEADO = ' + ':BLOQUEADO,'#10' REGIMEN_IVA = :REGIMEN_IVA,'#10' ID_TIPO_IVA = :I' + 'D_TIPO_IVA,'#10' ID_FORMA_PAGO = :ID_FORMA_PAGO,'#10' TIENDA_WEB =' + ' :TIENDA_WEB'#10' WHERE'#10' (ID_CLIENTE = :OLD_ID_CLIENTE)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_ClientesDatos' end item Params = < item Name = 'ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'REGIMEN_IVA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DESCUENTO' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_TIPO_IVA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_FORMA_PAGO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TIENDA_WEB' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'PROVEEDORES_DATOS' SQL = 'INSERT'#10' INTO PROVEEDORES_DATOS'#10' (ID_PROVEEDOR, REGIMEN_IVA, ' + 'DESCUENTO, ID_TIPO_IVA,'#10' ID_FORMA_PAGO, TIENDA_WEB)'#10' VALUES'#10 + ' (:ID_PROVEEDOR, :REGIMEN_IVA, :DESCUENTO, :ID_TIPO_IVA,'#10' ' + ':ID_FORMA_PAGO, :TIENDA_WEB)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_ProveedoresDatos' end item Params = < item Name = 'OLD_ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'PROVEEDORES_DATOS' SQL = 'DELETE '#10' FROM'#10' PROVEEDORES_DATOS'#10' WHERE'#10' (ID_PROVEEDOR =' + ' :OLD_ID_PROVEEDOR)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_ProveedoresDatos' end item Params = < item Name = 'ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'REGIMEN_IVA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DESCUENTO' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_TIPO_IVA' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_FORMA_PAGO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TIENDA_WEB' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'PROVEEDORES_DATOS' SQL = 'UPDATE PROVEEDORES_DATOS'#10' SET '#10' ID_PROVEEDOR = :ID_PROVEEDOR' + ', '#10' REGIMEN_IVA = :REGIMEN_IVA,'#10' DESCUENTO = :DESCUENTO,'#10' ' + ' ID_TIPO_IVA = :ID_TIPO_IVA,'#10' ID_FORMA_PAGO = :ID_FORMA_PAG' + 'O,'#10' TIENDA_WEB = :TIENDA_WEB'#10' WHERE'#10' (ID_PROVEEDOR = :OLD' + '_ID_PROVEEDOR)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_ProveedoresDatos' end item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TELEFONO' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'EMAIL' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOTAS' DataType = datMemo BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PORTE' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_DIRECCIONES' SQL = 'INSERT'#10' INTO CONTACTOS_DIRECCIONES'#10' (ID, ID_CONTACTO, NOMBRE' + ', CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL,'#10' PERSONA_CONTA' + 'CTO, TELEFONO, EMAIL, NOTAS, PORTE, FECHA_ALTA, FECHA_MODIFICACI' + 'ON)'#10' VALUES'#10' (:ID, :ID_CONTACTO, :NOMBRE, :CALLE, :POBLACION' + ', :PROVINCIA, :CODIGO_POSTAL,'#10' :PERSONA_CONTACTO, :TELEFONO,' + ' :EMAIL, :NOTAS, :PORTE, :FECHA_ALTA, :FECHA_MODIFICACION)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_DireccionesContacto' end item Params = < item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_DIRECCIONES' SQL = 'DELETE '#10' FROM'#10' CONTACTOS_DIRECCIONES'#10' WHERE'#10' (ID = :OLD_' + 'ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_DireccionesContacto' end item Params = < item Name = 'ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CALLE' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PERSONA_CONTACTO' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'TELEFONO' DataType = datString Size = 25 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'EMAIL' DataType = datString Size = 255 BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'NOTAS' DataType = datMemo BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'PORTE' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CONTACTOS_DIRECCIONES' SQL = 'UPDATE CONTACTOS_DIRECCIONES'#10' SET '#10' ID_CONTACTO = :ID_CONTAC' + 'TO, '#10' NOMBRE = :NOMBRE,'#10' CALLE = :CALLE,'#10' POBLACION = :' + 'POBLACION, '#10' PROVINCIA = :PROVINCIA, '#10' CODIGO_POSTAL = :CO' + 'DIGO_POSTAL, '#10' PERSONA_CONTACTO = :PERSONA_CONTACTO,'#10' TELE' + 'FONO = :TELEFONO,'#10' EMAIL = :EMAIL,'#10' NOTAS = :NOTAS,'#10' PO' + 'RTE = :PORTE,'#10' FECHA_MODIFICACION = :FECHA_MODIFICACION'#10' WHE' + 'RE'#10' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_DireccionesContacto' end item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_AGENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'COMISION' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'AGENTES_COMISIONES' SQL = 'INSERT'#10' INTO AGENTES_COMISIONES'#10' (ID, ID_AGENTE, ID_PROVEEDO' + 'R, COMISION)'#10' VALUES'#10' (:ID, :ID_AGENTE, :ID_PROVEEDOR, :COMI' + 'SION)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_AgentesComisiones' end item Params = < item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'AGENTES_COMISIONES' SQL = 'DELETE '#10' FROM'#10' AGENTES_COMISIONES'#10' WHERE'#10' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_AgentesComisiones' end item Params = < item Name = 'ID_AGENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'COMISION' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'AGENTES_COMISIONES' SQL = 'UPDATE AGENTES_COMISIONES'#10' SET '#10' ID_AGENTE = :ID_AGENTE,'#10' ' + ' ID_PROVEEDOR = :ID_PROVEEDOR, '#10' COMISION = :COMISION'#10' WHERE' + #10' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_AgentesComisiones' end item Params = < item Name = 'ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DESCUENTO' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CLIENTES_DTOS_PROVEEDORES' SQL = 'INSERT'#10' INTO CLIENTES_DTOS_PROVEEDORES'#10' (ID, ID_CLIENTE, ID_' + 'PROVEEDOR, DESCUENTO)'#10' VALUES'#10' (:ID, :ID_CLIENTE, :ID_PROVEE' + 'DOR, :DESCUENTO)' StatementType = stSQL ColumnMappings = <> end> Name = 'Insert_ClientesDescuentos' end item Params = < item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CLIENTES_DTOS_PROVEEDORES' SQL = 'DELETE '#10' FROM'#10' CLIENTES_DTOS_PROVEEDORES'#10' WHERE'#10' (ID = :' + 'OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Delete_ClientesDescuentos' end item Params = < item Name = 'ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'DESCUENTO' DataType = datFloat BlobType = dabtUnknown Value = '' ParamType = daptInput end item Name = 'OLD_ID' DataType = datInteger BlobType = dabtUnknown Value = '' ParamType = daptInput end> Statements = < item Connection = 'IBX' TargetTable = 'CLIENTES_DTOS_PROVEEDORES' SQL = 'UPDATE CLIENTES_DTOS_PROVEEDORES'#10' SET '#10' ID_CLIENTE = :ID_CLI' + 'ENTE,'#10' ID_PROVEEDOR = :ID_PROVEEDOR, '#10' DESCUENTO = :DESCUE' + 'NTO'#10' WHERE'#10' (ID = :OLD_ID)' StatementType = stSQL ColumnMappings = <> end> Name = 'Update_ClientesDescuentos' end> RelationShips = <> UpdateRules = < item Name = 'Insert Contactos' DoUpdate = False DoInsert = True DoDelete = False DatasetName = 'Contactos' FailureBehaviour = fbRaiseException end item Name = 'Update Contactos' DoUpdate = True DoInsert = False DoDelete = False DatasetName = 'Contactos' FailureBehaviour = fbRaiseException end item Name = 'Insert DatosBancarios' DoUpdate = False DoInsert = True DoDelete = False DatasetName = 'DatosBancarios' FailureBehaviour = fbRaiseException end item Name = 'Update DatosBancarios' DoUpdate = True DoInsert = False DoDelete = False DatasetName = 'DatosBancarios' FailureBehaviour = fbRaiseException end item Name = 'Insert DireccionesContacto' DoUpdate = False DoInsert = True DoDelete = False DatasetName = 'DireccionesContacto' FailureBehaviour = fbRaiseException end item Name = 'Update DireccionesContacto' DoUpdate = True DoInsert = False DoDelete = False DatasetName = 'DireccionesContacto' FailureBehaviour = fbRaiseException end item Name = 'Insert ContactosCategorias' DoUpdate = False DoInsert = True DoDelete = False DatasetName = 'ContactosCategorias' FailureBehaviour = fbRaiseException end item Name = 'Update ContactosCategorias' DoUpdate = True DoInsert = False DoDelete = False DatasetName = 'ContactosCategorias' FailureBehaviour = fbRaiseException end item Name = 'Insert AgentesComisiones' DoUpdate = False DoInsert = True DoDelete = False DatasetName = 'AgentesComisiones' FailureBehaviour = fbRaiseException end item Name = 'Update AgentesComisiones' DoUpdate = True DoInsert = False DoDelete = False DatasetName = 'AgentesComisiones' FailureBehaviour = fbRaiseException end item Name = 'Insert ClientesDescuentos' DoUpdate = False DoInsert = True DoDelete = False DatasetName = 'ClientesDescuentos' FailureBehaviour = fbRaiseException end item Name = 'Update ClientesDescuentos' DoUpdate = True DoInsert = False DoDelete = False DatasetName = 'ClientesDescuentos' FailureBehaviour = fbRaiseException end item Name = 'Delete DatosBancarios' DoUpdate = False DoInsert = False DoDelete = True DatasetName = 'DatosBancarios' FailureBehaviour = fbRaiseException end item Name = 'Delete ClientesDescuentos' DoUpdate = False DoInsert = False DoDelete = True DatasetName = 'ClientesDescuentos' FailureBehaviour = fbRaiseException end item Name = 'Delete AgentesComisiones' DoUpdate = False DoInsert = False DoDelete = True DatasetName = 'AgentesComisiones' FailureBehaviour = fbRaiseException end item Name = 'Delete DireccionesContacto' DoUpdate = False DoInsert = False DoDelete = True DatasetName = 'DireccionesContacto' FailureBehaviour = fbRaiseException end item Name = 'Delete ContactosCategorias' DoUpdate = False DoInsert = False DoDelete = True DatasetName = 'ContactosCategorias' FailureBehaviour = fbRaiseException end item Name = 'Delete Contactos' DoUpdate = False DoInsert = False DoDelete = True DatasetName = 'Contactos' FailureBehaviour = fbRaiseException end> Left = 30 Top = 14 end object BINAdapter: TDABINAdapter Left = 30 Top = 82 end object DataDictionary: TDADataDictionary Fields = < item Name = 'DatosBancarios_ID' DataType = datAutoInc BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID' Alignment = taLeftJustify end item Name = 'DatosBancarios_ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_CONTACTO' Alignment = taLeftJustify end item Name = 'DatosBancarios_TITULAR' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Titular' Alignment = taLeftJustify end item Name = 'DatosBancarios_ENTIDAD' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'C'#243'digo de entidad' Alignment = taLeftJustify end item Name = 'DatosBancarios_SUCURSAL' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'C'#243'digo de sucursal' Alignment = taLeftJustify end item Name = 'DatosBancarios_DC' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'D'#237'gito de control' Alignment = taLeftJustify end item Name = 'DatosBancarios_CUENTA' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'C'#243'digo de cuenta' Alignment = taLeftJustify end item Name = 'Contactos_ID' DataType = datAutoInc BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID' Alignment = taLeftJustify end item Name = 'Contactos_NIF_CIF' DataType = datString Size = 15 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'NIF/CIF' Alignment = taLeftJustify end item Name = 'Contactos_NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Nombre' Alignment = taLeftJustify end item Name = 'Contactos_CALLE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Direcci'#243'n' Alignment = taLeftJustify end item Name = 'Contactos_POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Poblaci'#243'n' Alignment = taLeftJustify end item Name = 'Contactos_PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Provincia' Alignment = taLeftJustify end item Name = 'Contactos_CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'C'#243'digo postal' Alignment = taLeftJustify end item Name = 'Contactos_TELEFONO_1' DataType = datString Size = 25 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Tlf. trabajo' Alignment = taLeftJustify end item Name = 'Contactos_TELEFONO_2' DataType = datString Size = 25 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Tlf. particular' Alignment = taLeftJustify end item Name = 'Contactos_MOVIL_1' DataType = datString Size = 25 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'M'#243'vil' Alignment = taLeftJustify end item Name = 'Contactos_MOVIL_2' DataType = datString Size = 25 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'MOVIL_2' Alignment = taLeftJustify end item Name = 'Contactos_FAX' DataType = datString Size = 25 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Fax' Alignment = taLeftJustify end item Name = 'Contactos_EMAIL_1' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'E-mail trabajo' Alignment = taLeftJustify end item Name = 'Contactos_EMAIL_2' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'E-mail particular' Alignment = taLeftJustify end item Name = 'Contactos_PAGINA_WEB' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Web' Alignment = taLeftJustify end item Name = 'Contactos_NOTAS' DataType = datMemo BlobType = dabtMemo DisplayWidth = 0 DisplayLabel = 'Observaciones' Alignment = taLeftJustify end item Name = 'Contactos_FECHA_ALTA' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Fecha de alta' Alignment = taLeftJustify end item Name = 'Contactos_FECHA_MODIFICACION' DataType = datDateTime BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Fecha de modificaci'#243'n' Alignment = taLeftJustify end item Name = 'Contactos_USUARIO' DataType = datString Size = 20 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Usuario' Alignment = taLeftJustify end item Name = 'Contactos_ID_CATEGORIA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'Contactos_ID_EMPRESA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_EMPRESA' Alignment = taLeftJustify end item Name = 'Proveedores_DISTRIBUYE' DataType = datString Size = 2000 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Distribuye' Alignment = taLeftJustify end item Name = 'Proveedores_DESCUENTO' DataType = datFloat BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Descuento (%)' Alignment = taLeftJustify end item Name = 'Clientes_ID_AGENTE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_AGENTE' Alignment = taLeftJustify end item Name = 'Clientes_GRUPO_CLIENTE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Grupo de cliente' Alignment = taLeftJustify end item Name = 'DatosBancarios_PERSONA_CONTACTO' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'DireccionesContacto_CALLE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Calle' Alignment = taLeftJustify end item Name = 'DireccionesContacto_POBLACION' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Poblaci'#243'n' Alignment = taLeftJustify end item Name = 'DireccionesContacto_PROVINCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Provincia' Alignment = taLeftJustify end item Name = 'DireccionesContacto_CODIGO_POSTAL' DataType = datString Size = 10 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'C'#243'digo postal' Alignment = taLeftJustify end item Name = 'DireccionesContacto_PERSONA_CONTACTO' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Persona de contacto' Alignment = taLeftJustify end item Name = 'DireccionesContacto_ID' DataType = datAutoInc BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID' Alignment = taLeftJustify end item Name = 'DireccionesContacto_ID_CONTACTO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_CONTACTO' Alignment = taLeftJustify end item Name = 'Clientes_NOMBRE_COMERCIAL' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Nombre comercial' Alignment = taLeftJustify end item Name = 'Clientes_VENCIMIENTO_FACTURAS' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Vencimiento' Alignment = taLeftJustify end item Name = 'Clientes_BLOQUEADO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = #191'Bloqueado?' Alignment = taLeftJustify end item Name = 'Contactos_REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Referencia' Alignment = taLeftJustify end item Name = 'Proveedores_REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Referencia' Alignment = taLeftJustify end item Name = 'Agentes_REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Referencia' Alignment = taLeftJustify end item Name = 'AgentesComisiones_ID' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'AgentesComisiones_ID_AGENTE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'AgentesComisiones_ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'AgentesComisiones_COMISION' DataType = datFloat BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Comisi'#243'n (%)' Alignment = taRightJustify end item Name = 'ClientesDescuentos_ID' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID' Alignment = taLeftJustify end item Name = 'ClientesDescuentos_ID_CLIENTE' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'ClientesDescuentos_ID_PROVEEDOR' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'ClientesDescuentos_DESCUENTO' DataType = datFloat BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Descuento (%)' Alignment = taRightJustify end item Name = 'Clientes_REFERENCIA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'REFERENCIA' Alignment = taLeftJustify end item Name = 'Clientes_MOTIVO_BLOQUEO' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Motivo del bloqueo' Alignment = taLeftJustify end item Name = 'DireccionesContacto_NOMBRE' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 Alignment = taLeftJustify end item Name = 'DireccionesContacto_TELEFONO' DataType = datString Size = 25 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Tel'#233'fono' Alignment = taLeftJustify end item Name = 'DireccionesContacto_EMAIL' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'E-mail' Alignment = taLeftJustify end item Name = 'DireccionesContacto_NOTAS' DataType = datMemo BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Notas' Alignment = taLeftJustify end item Name = 'DireccionesContacto_PORTE' DataType = datFloat BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Coste del porte' Alignment = taLeftJustify end item Name = 'Clientes_RECARGO_EQUIVALENCIA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'Rec. equiv.' Alignment = taLeftJustify end item Name = 'Clientes_REGIMEN_IVA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'R'#233'gimen de IVA' Alignment = taLeftJustify end item Name = 'Clientes_ID_TIPO_IVA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_TIPO_IVA' Alignment = taLeftJustify end item Name = 'Clientes_ID_FORMA_PAGO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_FORMA_PAGO' Alignment = taLeftJustify end item Name = 'Proveedores_REGIMEN_IVA' DataType = datString Size = 255 BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'R'#233'gimen de IVA' Alignment = taLeftJustify end item Name = 'Proveedores_ID_TIPO_IVA' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_TIPO_IVA' Alignment = taLeftJustify end item Name = 'Proveedores_ID_FORMA_PAGO' DataType = datInteger BlobType = dabtUnknown DisplayWidth = 0 DisplayLabel = 'ID_FORMA_PAGO' Alignment = taLeftJustify end> Left = 126 Top = 14 end object Diagrams: TDADiagrams Left = 126 Top = 82 DiagramData = ''#13#10' '#13#10' '#13#10' '#13#10' '#13#10' '#13#10''#13#10 end object bpContactos: TDABusinessProcessor Schema = schContactos InsertCommandName = 'Insert_Contactos' DeleteCommandName = 'Delete_Contactos' UpdateCommandName = 'Update_Contactos' ReferencedDataset = 'Contactos' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 224 Top = 15 end object bpDatosBancarios: TDABusinessProcessor Schema = schContactos InsertCommandName = 'Insert_DatosBancarios' DeleteCommandName = 'Delete_DatosBancarios' UpdateCommandName = 'Update_DatosBancarios' ReferencedDataset = 'DatosBancarios' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 224 Top = 79 end object bpCategoriasContactos: TDABusinessProcessor Schema = schContactos InsertCommandName = 'Insert_ContactosCategorias' DeleteCommandName = 'Delete_ContactosCategorias' UpdateCommandName = 'Update_ContactosCategorias' ReferencedDataset = 'ContactosCategorias' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 224 Top = 143 end object bpAgentes: TDABusinessProcessor Schema = schContactos InsertCommandName = 'Insert_Contactos' DeleteCommandName = 'Delete_Contactos' UpdateCommandName = 'Update_Contactos' ReferencedDataset = 'Agentes' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 344 Top = 15 end object bpClientes: TDABusinessProcessor Schema = schContactos InsertCommandName = 'Insert_Contactos' DeleteCommandName = 'Delete_Contactos' UpdateCommandName = 'Update_Contactos' ReferencedDataset = 'Clientes' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 344 Top = 143 end object bpProveedores: TDABusinessProcessor Schema = schContactos InsertCommandName = 'Insert_Contactos' DeleteCommandName = 'Delete_Contactos' UpdateCommandName = 'Update_Contactos' ReferencedDataset = 'Proveedores' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 344 Top = 79 end object bpDireccionesContacto: TDABusinessProcessor Schema = schContactos InsertCommandName = 'Insert_DireccionesContacto' DeleteCommandName = 'Delete_DireccionesContacto' UpdateCommandName = 'Update_DireccionesContacto' ReferencedDataset = 'DireccionesContacto' ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 224 Top = 207 end object bpAgentesComisiones: TDABusinessProcessor Schema = schContactos InsertCommandName = 'Insert_AgentesComisiones' DeleteCommandName = 'Delete_AgentesComisiones' UpdateCommandName = 'Update_AgentesComisiones' ReferencedDataset = 'AgentesComisiones' ProcessorOptions = [poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 344 Top = 207 end object bpClientesDescuentos: TDABusinessProcessor Schema = schContactos InsertCommandName = 'Insert_ClientesDescuentos' DeleteCommandName = 'Delete_ClientesDescuentos' UpdateCommandName = 'Update_ClientesDescuentos' ReferencedDataset = 'ClientesDescuentos' ProcessorOptions = [poPrepareCommands] UpdateMode = updWhereKeyOnly Left = 344 Top = 271 end end