object srvContactos: TsrvContactos
  OldCreateOrder = True
  OnCreate = DARemoteServiceCreate
  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'
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            SQL = 
              'select V_CLIENTES.ID, V_CLIENTES.NOMBRE'#10'from V_CLIENTES'#10'left joi' +
              'n PEDIDOS_CLIENTE on (V_CLIENTES.ID = PEDIDOS_CLIENTE.ID_CLIENTE' +
              ')'#10'left join ALBARANES_CLIENTE on (V_CLIENTES.ID = ALBARANES_CLIE' +
              'NTE.ID_CLIENTE)'#10'left join FACTURAS_CLIENTE on (V_CLIENTES.ID = F' +
              'ACTURAS_CLIENTE.ID_CLIENTE)'#10'where V_CLIENTES.ID = :ID'#10'group by 1' +
              ',2'#10'having ((COUNT(PEDIDOS_CLIENTE.ID) = 0)'#10'and  (COUNT(ALBARANES' +
              '_CLIENTE.ID) = 0)'#10'and  (COUNT(FACTURAS_CLIENTE.ID) = 0))'
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'NOMBRE'
                TableField = 'NOMBRE'
              end>
          end>
        Name = 'ClienteEliminable'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            BlobType = dabtUnknown
            DisplayWidth = 0
            Alignment = taLeftJustify
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'NOMBRE'
            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, AGENTE, RA' +
              'PEL, EMAIL_ADMINISTRACION'#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
              item
                DatasetField = 'AGENTE'
                TableField = 'AGENTE'
              end
              item
                DatasetField = 'RAPEL'
                TableField = 'RAPEL'
              end
              item
                DatasetField = 'EMAIL_ADMINISTRACION'
                TableField = 'EMAIL_ADMINISTRACION'
              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
            DictionaryEntry = 'Clientes_TIENDA_WEB'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'AGENTE'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Clientes_AGENTE'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'RAPEL'
            DataType = datInteger
            BlobType = dabtUnknown
            DictionaryEntry = 'Clientes_RAPEL'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'EMAIL_ADMINISTRACION'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Clientes_EMAIL_ADMINISTRACION'
            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'    EMAIL_ADMINISTRACION'#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
              item
                DatasetField = 'TIENDA_WEB'
                TableField = 'TIENDA_WEB'
              end
              item
                DatasetField = 'EMAIL_ADMINISTRACION'
                TableField = 'EMAIL_ADMINISTRACION'
              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
            DictionaryEntry = 'Proveedores_TIENDA_WEB'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'EMAIL_ADMINISTRACION'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Proveedores_EMAIL_ADMINISTRACION'
            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
          item
            Name = 'RAPEL'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'EMAIL_ADMINISTRACION'
            DataType = datString
            Size = 255
            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, RAPEL,'#10'     EMAIL_ADMINISTRACION' +
              ')'#10'  VALUES'#10'    (:ID_CLIENTE, :ID_AGENTE, :GRUPO_CLIENTE, :RECARG' +
              'O_EQUIVALENCIA,'#10'     :NOMBRE_COMERCIAL, :VENCIMIENTO_FACTURAS,'#10' ' +
              '    :BLOQUEADO, :MOTIVO_BLOQUEO, :REGIMEN_IVA,'#10'     :ID_TIPO_IVA' +
              ', :ID_FORMA_PAGO, :TIENDA_WEB, :RAPEL,'#10'     :EMAIL_ADMINISTRACIO' +
              'N)'
            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 = 'RAPEL'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'EMAIL_ADMINISTRACION'
            DataType = datString
            Size = 255
            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'    RAPEL = :RAPEL,'#10'    EMAIL_ADMINISTRACION = :EM' +
              'AIL_ADMINISTRACION'#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
          item
            Name = 'EMAIL_ADMINISTRACION'
            DataType = datString
            Size = 255
            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, EMAIL_ADM' +
              'INISTRACION)'#10'  VALUES'#10'    (:ID_PROVEEDOR, :REGIMEN_IVA, :DESCUEN' +
              'TO, :ID_TIPO_IVA,'#10'    :ID_FORMA_PAGO, :TIENDA_WEB, :EMAIL_ADMINI' +
              'STRACION)'
            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 = 'EMAIL_ADMINISTRACION'
            DataType = datString
            Size = 255
            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'    EMAIL_ADMINISTRACION = :EMA' +
              'IL_ADMINISTRACION'#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
      item
        Name = 'Clientes_TIENDA_WEB'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'TIENDA_WEB'
        Alignment = taLeftJustify
      end
      item
        Name = 'Clientes_AGENTE'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
      end
      item
        Name = 'Clientes_RAPEL'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Rapel'
        Alignment = taLeftJustify
      end
      item
        Name = 'Clientes_EMAIL_ADMINISTRACION'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'E-mail administrativo'
        Alignment = taLeftJustify
      end
      item
        Name = 'Proveedores_TIENDA_WEB'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'TIENDA_WEB'
        Alignment = taLeftJustify
      end
      item
        Name = 'Proveedores_EMAIL_ADMINISTRACION'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'E-mail administrativo'
        Alignment = taLeftJustify
      end>
    Left = 126
    Top = 14
  end
  object Diagrams: TDADiagrams
    Left = 126
    Top = 82
    DiagramData = 
      '<Diagrams>'#13#10'  <Diagram Name="New Diagram" Left="200" Top="200" W' +
      'idth="400" Height="300">'#13#10'    <Entity Name="DatosBancarios" Left' +
      '="479,77" Top="0,00" />'#13#10'    <Entity Name="ContactosCategorias" ' +
      'Left="0,00" Top="26,50" />'#13#10'    <Entity Name="Contactos" Left="2' +
      '23,77" Top="0,00" />'#13#10'  </Diagram>'#13#10'</Diagrams>'#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
