object srvContactos: TsrvContactos
  OldCreateOrder = True
  OnCreate = DARemoteServiceCreate
  RequiresSession = True
  AcquireConnection = True
  ConnectionName = 'IBX'
  ServiceSchema = schContactos
  ServiceAdapter = BINAdapter
  OnBeforeAcquireConnection = DARemoteServiceBeforeAcquireConnection
  OnBeforeGetDatasetData = DARemoteServiceBeforeGetDatasetData
  Height = 222
  Width = 415
  object schContactos: TDASchema
    ConnectionManager = dmServer.ConnectionManager
    DataDictionary = DataDictionary
    Diagrams = Diagrams
    Datasets = <
      item
        Params = <
          item
            Name = 'ID_CATEGORIA'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = '1'
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'CONTACTOS'
            SQL = 
              'SELECT'#10'    CONTACTOS.ID, CONTACTOS_CATEGORIAS.ID_CATEGORIA,'#10'    ' +
              'CONTACTOS.NIF_CIF, CONTACTOS.NOMBRE, CONTACTOS.CALLE,'#10'    CONTAC' +
              'TOS.POBLACION, CONTACTOS.PROVINCIA, CONTACTOS.CODIGO_POSTAL,'#10'   ' +
              ' CONTACTOS.TELEFONO_1, CONTACTOS.TELEFONO_2, CONTACTOS.MOVIL_1,'#10 +
              '    CONTACTOS.MOVIL_2, CONTACTOS.FAX, CONTACTOS.EMAIL_1,'#10'    CON' +
              'TACTOS.EMAIL_2, CONTACTOS.PAGINA_WEB, CONTACTOS.NOTAS,'#10'    CONTA' +
              'CTOS.FECHA_ALTA, CONTACTOS.FECHA_MODIFICACION,'#10'    CONTACTOS.USU' +
              'ARIO, EMPRESAS_CONTACTOS.ID_EMPRESA'#10'  FROM'#10'    CONTACTOS'#10'  INNER' +
              ' JOIN CONTACTOS_CATEGORIAS ON'#10'    (CONTACTOS_CATEGORIAS.ID_CONTA' +
              'CTO = CONTACTOS.ID)'#10'  INNER JOIN EMPRESAS_CONTACTOS ON'#10'    (EMPR' +
              'ESAS_CONTACTOS.ID_CONTACTO = CONTACTOS.ID)'#10'  WHERE'#10'    CONTACTOS' +
              '_CATEGORIAS.ID_CATEGORIA = :ID_CATEGORIA'
            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>
          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 = dabtUnknown
            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>
        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_DATOS_BANCO'
            SQL = 
              'SELECT '#10'    ID, ID_CONTACTO, TITULAR, ENTIDAD, SUCURSAL, DC, CUE' +
              'NTA'#10'  FROM'#10'    CONTACTOS_DATOS_BANCO'#10'  WHERE ID_CONTACTO = :ID_C' +
              'ONTACTO'
            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 = 'CONTACTOS'
            SQL = 
              'SELECT'#10'    CONTACTOS.ID, CONTACTOS_CATEGORIAS.ID_CATEGORIA,'#10'    ' +
              'CONTACTOS.NIF_CIF, CONTACTOS.NOMBRE, CONTACTOS.CALLE,'#10'    CONTAC' +
              'TOS.POBLACION, CONTACTOS.PROVINCIA, CONTACTOS.CODIGO_POSTAL,'#10'   ' +
              ' CONTACTOS.TELEFONO_1, CONTACTOS.TELEFONO_2, CONTACTOS.MOVIL_1,'#10 +
              '    CONTACTOS.MOVIL_2, CONTACTOS.FAX, CONTACTOS.EMAIL_1,'#10'    CON' +
              'TACTOS.EMAIL_2, CONTACTOS.PAGINA_WEB, CONTACTOS.NOTAS,'#10'    CONTA' +
              'CTOS.FECHA_ALTA, CONTACTOS.FECHA_MODIFICACION,'#10'    CONTACTOS.USU' +
              'ARIO, EMPRESAS_CONTACTOS.ID_EMPRESA,'#10'    VENDEDORES_DATOS.PORCEN' +
              'TAJE_COMISION'#10'  FROM'#10'    CONTACTOS'#10'  INNER JOIN CONTACTOS_CATEGO' +
              'RIAS ON'#10'    (CONTACTOS_CATEGORIAS.ID_CONTACTO = CONTACTOS.ID)'#10'  ' +
              'INNER JOIN EMPRESAS_CONTACTOS ON'#10'    (EMPRESAS_CONTACTOS.ID_CONT' +
              'ACTO = CONTACTOS.ID)'#10'  LEFT JOIN VENDEDORES_DATOS ON'#10'    (VENDED' +
              'ORES_DATOS.ID_VENDEDOR = CONTACTOS.ID)'#10'  WHERE'#10'    CONTACTOS_CAT' +
              'EGORIAS.ID_CATEGORIA = 3'
            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 = 'PORCENTAJE_COMISION'
                TableField = 'PORCENTAJE_COMISION'
              end>
          end>
        Name = 'Vendedores'
        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 = dabtUnknown
            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 = 'PORCENTAJE_COMISION'
            DataType = datFloat
            BlobType = dabtUnknown
            DictionaryEntry = 'Vendedores_PORCENTAJE_COMISION'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end>
        BusinessRulesClient.ScriptLanguage = rslPascalScript
        BusinessRulesServer.ScriptLanguage = rslPascalScript
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'CONTACTOS'
            SQL = 
              'SELECT'#10'    CONTACTOS.ID, CONTACTOS_CATEGORIAS.ID_CATEGORIA,'#10'    ' +
              'CONTACTOS.NIF_CIF, CONTACTOS.NOMBRE, CONTACTOS.CALLE,'#10'    CONTAC' +
              'TOS.POBLACION, CONTACTOS.PROVINCIA, CONTACTOS.CODIGO_POSTAL,'#10'   ' +
              ' CONTACTOS.TELEFONO_1, CONTACTOS.TELEFONO_2, CONTACTOS.MOVIL_1,'#10 +
              '    CONTACTOS.MOVIL_2, CONTACTOS.FAX, CONTACTOS.EMAIL_1,'#10'    CON' +
              'TACTOS.EMAIL_2, CONTACTOS.PAGINA_WEB, CONTACTOS.NOTAS,'#10'    CONTA' +
              'CTOS.FECHA_ALTA, CONTACTOS.FECHA_MODIFICACION,'#10'    CONTACTOS.USU' +
              'ARIO, EMPRESAS_CONTACTOS.ID_EMPRESA,'#10'    CLIENTES_DATOS.ID_VENDE' +
              'DOR, CLIENTES_DATOS.PROCEDENCIA'#10'  FROM'#10'    CONTACTOS'#10'  INNER JOI' +
              'N CONTACTOS_CATEGORIAS ON'#10'    (CONTACTOS_CATEGORIAS.ID_CONTACTO ' +
              '= CONTACTOS.ID)'#10'  INNER JOIN EMPRESAS_CONTACTOS ON'#10'    (EMPRESAS' +
              '_CONTACTOS.ID_CONTACTO = CONTACTOS.ID)'#10'  LEFT JOIN CLIENTES_DATO' +
              'S ON'#10'    (CLIENTES_DATOS.ID_CLIENTE = CONTACTOS.ID)'#10'  WHERE'#10'    ' +
              'CONTACTOS_CATEGORIAS.ID_CATEGORIA = 1'
            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_VENDEDOR'
                TableField = 'ID_VENDEDOR'
              end
              item
                DatasetField = 'PROCEDENCIA'
                TableField = 'PROCEDENCIA'
              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 = dabtUnknown
            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 = 'ID_VENDEDOR'
            DataType = datInteger
            BlobType = dabtUnknown
            DictionaryEntry = 'Clientes_ID_VENDEDOR'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'PROCEDENCIA'
            DataType = datString
            Size = 2000
            BlobType = dabtUnknown
            DictionaryEntry = 'Clientes_PROCEDENCIA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end>
        BusinessRulesClient.ScriptLanguage = rslPascalScript
        BusinessRulesServer.ScriptLanguage = rslPascalScript
      end
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'CONTACTOS'
            SQL = 
              'SELECT'#10'    CONTACTOS.ID, CONTACTOS_CATEGORIAS.ID_CATEGORIA,'#10'    ' +
              'CONTACTOS.NIF_CIF, CONTACTOS.NOMBRE, CONTACTOS.CALLE,'#10'    CONTAC' +
              'TOS.POBLACION, CONTACTOS.PROVINCIA, CONTACTOS.CODIGO_POSTAL,'#10'   ' +
              ' CONTACTOS.TELEFONO_1, CONTACTOS.TELEFONO_2, CONTACTOS.MOVIL_1,'#10 +
              '    CONTACTOS.MOVIL_2, CONTACTOS.FAX, CONTACTOS.EMAIL_1,'#10'    CON' +
              'TACTOS.EMAIL_2, CONTACTOS.PAGINA_WEB, CONTACTOS.NOTAS,'#10'    CONTA' +
              'CTOS.FECHA_ALTA, CONTACTOS.FECHA_MODIFICACION,'#10'    CONTACTOS.USU' +
              'ARIO, EMPRESAS_CONTACTOS.ID_EMPRESA,'#10'    PROVEEDORES_DATOS.DISTR' +
              'IBUYE, PROVEEDORES_DATOS.DESCUENTO'#10'  FROM'#10'    CONTACTOS'#10'  INNER ' +
              'JOIN CONTACTOS_CATEGORIAS ON'#10'    (CONTACTOS_CATEGORIAS.ID_CONTAC' +
              'TO = CONTACTOS.ID)'#10'  INNER JOIN EMPRESAS_CONTACTOS ON'#10'    (EMPRE' +
              'SAS_CONTACTOS.ID_CONTACTO = CONTACTOS.ID)'#10'  LEFT JOIN PROVEEDORE' +
              'S_DATOS ON'#10'    (PROVEEDORES_DATOS.ID_PROVEEDOR = CONTACTOS.ID)'#10' ' +
              ' WHERE'#10'    CONTACTOS_CATEGORIAS.ID_CATEGORIA = 2'
            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 = 'DISTRIBUYE'
                TableField = 'DISTRIBUYE'
              end
              item
                DatasetField = 'DESCUENTO'
                TableField = 'DESCUENTO'
              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 = dabtUnknown
            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 = 'DISTRIBUYE'
            DataType = datString
            Size = 2000
            BlobType = dabtUnknown
            DictionaryEntry = 'Proveedores_DISTRIBUYE'
            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>
        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>
        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)'#10'  VALUES'#10'    (:ID, :' +
              'NIF_CIF, :NOMBRE, :CALLE, :POBLACION, :PROVINCIA,'#10'     :CODIGO_P' +
              'OSTAL, :TELEFONO_1, :TELEFONO_2, :MOVIL_1, '#10'     :MOVIL_2, :FAX,' +
              ' :EMAIL_1, :EMAIL_2, :PAGINA_WEB, :NOTAS, '#10'     :FECHA_ALTA, :FE' +
              'CHA_MODIFICACION, :USUARIO)'
            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 = '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'  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_VENDEDOR'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'PROCEDENCIA'
            DataType = datString
            Size = 2000
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'CLIENTES_DATOS'
            SQL = 
              'INSERT'#10'  INTO CLIENTES_DATOS'#10'    (ID_CLIENTE, ID_VENDEDOR, PROCE' +
              'DENCIA)'#10'  VALUES'#10'    (:ID_CLIENTE, :ID_VENDEDOR, :PROCEDENCIA)'
            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_VENDEDOR'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'PROCEDENCIA'
            DataType = datString
            Size = 2000
            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_VENDEDOR = :ID_VENDEDOR, '#10'    PROCEDENCIA = :PROCEDENCIA'#10'  WH' +
              'ERE'#10'    (ID_CLIENTE = :OLD_ID_CLIENTE)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_ClientesDatos'
      end
      item
        Params = <
          item
            Name = 'ID_VENDEDOR'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'PORCENTAJE_COMISION'
            DataType = datFloat
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'VENDEDORES_DATOS'
            SQL = 
              'INSERT'#10'  INTO VENDEDORES_DATOS'#10'    (ID_VENDEDOR, PORCENTAJE_COMI' +
              'SION)'#10'  VALUES'#10'    (:ID_VENDEDOR, :PORCENTAJE_COMISION)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Insert_VendedoresDatos'
      end
      item
        Params = <
          item
            Name = 'OLD_ID_VENDEDOR'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'VENDEDORES_DATOS'
            SQL = 
              'DELETE '#10'  FROM'#10'    VENDEDORES_DATOS'#10'  WHERE'#10'    (ID_VENDEDOR = :' +
              'OLD_ID_VENDEDOR)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Delete_VendedoresDatos'
      end
      item
        Params = <
          item
            Name = 'ID_VENDEDOR'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'PORCENTAJE_COMISION'
            DataType = datFloat
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'OLD_ID_VENDEDOR'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'VENDEDORES_DATOS'
            SQL = 
              'UPDATE VENDEDORES_DATOS'#10'  SET '#10'    ID_VENDEDOR = :ID_VENDEDOR, '#10 +
              '    PORCENTAJE_COMISION = :PORCENTAJE_COMISION'#10'  WHERE'#10'    (ID_V' +
              'ENDEDOR = :OLD_ID_VENDEDOR)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_VendedoresDatos'
      end
      item
        Params = <
          item
            Name = 'ID_PROVEEDOR'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'DISTRIBUYE'
            DataType = datString
            Size = 2000
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'DESCUENTO'
            DataType = datFloat
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'PROVEEDORES_DATOS'
            SQL = 
              'INSERT'#10'  INTO PROVEEDORES_DATOS'#10'    (ID_PROVEEDOR, DISTRIBUYE, D' +
              'ESCUENTO)'#10'  VALUES'#10'    (:ID_PROVEEDOR, :DISTRIBUYE, :DESCUENTO)'
            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 = 'DISTRIBUYE'
            DataType = datString
            Size = 2000
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'DESCUENTO'
            DataType = datFloat
            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'    DISTRIBUYE = :DISTRIBUYE, '#10'    DESCUENTO = :DESCUENTO'#10'  W' +
              'HERE'#10'    (ID_PROVEEDOR = :OLD_ID_PROVEEDOR)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_ProveedoresDatos'
      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 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 = 'Delete DatosBancarios'
        DoUpdate = False
        DoInsert = False
        DoDelete = True
        DatasetName = 'DatosBancarios'
        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 = dabtUnknown
        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 = 'Vendedores_PORCENTAJE_COMISION'
        DataType = datFloat
        BlobType = dabtUnknown
        DefaultValue = '0'
        DisplayWidth = 0
        DisplayLabel = 'Comisi'#243'n (%)'
        Alignment = taLeftJustify
      end
      item
        Name = 'Clientes_ID_VENDEDOR'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'ID_VENDEDOR'
        Alignment = taLeftJustify
      end
      item
        Name = 'Clientes_PROCEDENCIA'
        DataType = datString
        Size = 2000
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Procedencia'
        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>
    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="ContactosCategorias"' +
      ' Left="0,00" Top="26,50" />'#13#10'    <Entity Name="DatosBancarios" L' +
      'eft="479,77" Top="0,00" />'#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 bpVendedores: TDABusinessProcessor
    Schema = schContactos
    InsertCommandName = 'Insert_Contactos'
    DeleteCommandName = 'Delete_Contactos'
    UpdateCommandName = 'Update_Contactos'
    ReferencedDataset = 'Vendedores'
    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
end