LuisLeon_FactuGES/Source/Modulos/Empresas/Servidor/srvEmpresas_Impl.dfm

object srvEmpresas: TsrvEmpresas
  OldCreateOrder = True
  OnCreate = DARemoteServiceCreate
  RequiresSession = True
  AcquireConnection = True
  ConnectionName = 'IBX'
  ServiceSchema = schEmpresas
  ServiceAdapter = BINAdapter
  OnBeforeAcquireConnection = DARemoteServiceBeforeAcquireConnection
  OnBeforeGetDatasetData = DARemoteServiceBeforeGetDatasetData
  Height = 157
  Width = 351
  object schEmpresas: TDASchema
    ConnectionManager = dmServer.ConnectionManager
    DataDictionary = DataDictionary
    Diagrams = Diagrams
    Datasets = <
      item
        Params = <>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS'
            SQL = 
              'SELECT'#10'    ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, ' +
              #10'    PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, ' +
              #10'    MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, '#10'    FEC' +
              'HA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTIPO,'#10'    REGISTRO_MER' +
              'CANTIL, IVA'#10'  FROM'#10'    EMPRESAS'
            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 = 'RAZON_SOCIAL'
                TableField = 'RAZON_SOCIAL'
              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 = 'LOGOTIPO'
                TableField = 'LOGOTIPO'
              end
              item
                DatasetField = 'REGISTRO_MERCANTIL'
                TableField = 'REGISTRO_MERCANTIL'
              end
              item
                DatasetField = 'IVA'
                TableField = 'IVA'
              end>
          end>
        Name = 'Empresas'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_ID'
            InPrimaryKey = True
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_NIF_CIF'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_NOMBRE'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'RAZON_SOCIAL'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_RAZON_SOCIAL'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_CALLE'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_POBLACION'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_PROVINCIA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_CODIGO_POSTAL'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'TELEFONO_1'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_TELEFONO_1'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'TELEFONO_2'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_TELEFONO_2'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'MOVIL_1'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_MOVIL_1'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'MOVIL_2'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_MOVIL_2'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'FAX'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_FAX'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'EMAIL_1'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_EMAIL_1'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'EMAIL_2'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_EMAIL_2'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'PAGINA_WEB'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_PAGINA_WEB'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'NOTAS'
            DataType = datMemo
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_NOTAS'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'FECHA_ALTA'
            DataType = datDateTime
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_FECHA_ALTA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'FECHA_MODIFICACION'
            DataType = datDateTime
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_FECHA_MODIFICACION'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 20
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_USUARIO'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'LOGOTIPO'
            DataType = datBlob
            BlobType = dabtBlob
            DictionaryEntry = 'Empresas_LOGOTIPO'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'REGISTRO_MERCANTIL'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_REGISTRO_MERCANTIL'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'IVA'
            DataType = datFloat
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_IVA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end>
        BusinessRulesClient.ScriptLanguage = rslPascalScript
        BusinessRulesServer.ScriptLanguage = rslPascalScript
      end
      item
        Params = <
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS_DATOS_BANCO'
            SQL = 
              'SELECT '#10'    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENT' +
              'A, '#10'    SUFIJO_N19, SUFIJO_N58'#10'  FROM'#10'    EMPRESAS_DATOS_BANCO'#10'W' +
              'HERE ID_EMPRESA = :ID_EMPRESA'
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'NOMBRE'
                TableField = 'NOMBRE'
              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
              item
                DatasetField = 'SUFIJO_N19'
                TableField = 'SUFIJO_N19'
              end
              item
                DatasetField = 'SUFIJO_N58'
                TableField = 'SUFIJO_N58'
              end>
          end>
        Name = 'EmpresasDatosBanco'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_ID'
            InPrimaryKey = True
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_ID_EMPRESA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_NOMBRE'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'ENTIDAD'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_ENTIDAD'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'SUCURSAL'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_SUCURSAL'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'DC'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_DC'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'CUENTA'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_CUENTA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'SUFIJO_N19'
            DataType = datString
            Size = 3
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_SUFIJO_N19'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'SUFIJO_N58'
            DataType = datString
            Size = 3
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_SUFIJO_N58'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end>
        BusinessRulesClient.ScriptLanguage = rslPascalScript
        BusinessRulesServer.ScriptLanguage = rslPascalScript
      end
      item
        Params = <
          item
            Name = 'ID'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS'
            SQL = 
              'SELECT'#10'    ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, ' +
              #10'    PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, ' +
              #10'    MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, '#10'    FEC' +
              'HA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTIPO,'#10'    REGISTRO_MER' +
              'CANTIL, IVA'#10'  FROM'#10'    EMPRESAS'#10'WHERE ID = :ID'
            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 = 'RAZON_SOCIAL'
                TableField = 'RAZON_SOCIAL'
              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 = 'LOGOTIPO'
                TableField = 'LOGOTIPO'
              end
              item
                DatasetField = 'REGISTRO_MERCANTIL'
                TableField = 'REGISTRO_MERCANTIL'
              end
              item
                DatasetField = 'IVA'
                TableField = 'IVA'
              end>
          end>
        Name = 'Empresas_Refresh'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_ID'
            InPrimaryKey = True
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'NIF_CIF'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_NIF_CIF'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_NOMBRE'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'RAZON_SOCIAL'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_RAZON_SOCIAL'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'CALLE'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_CALLE'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'POBLACION'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_POBLACION'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'PROVINCIA'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_PROVINCIA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'CODIGO_POSTAL'
            DataType = datString
            Size = 10
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_CODIGO_POSTAL'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'TELEFONO_1'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_TELEFONO_1'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'TELEFONO_2'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_TELEFONO_2'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'MOVIL_1'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_MOVIL_1'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'MOVIL_2'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_MOVIL_2'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'FAX'
            DataType = datString
            Size = 25
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_FAX'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'EMAIL_1'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_EMAIL_1'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'EMAIL_2'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_EMAIL_2'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'PAGINA_WEB'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_PAGINA_WEB'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'NOTAS'
            DataType = datMemo
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_NOTAS'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'FECHA_ALTA'
            DataType = datDateTime
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_FECHA_ALTA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'FECHA_MODIFICACION'
            DataType = datDateTime
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_FECHA_MODIFICACION'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'USUARIO'
            DataType = datString
            Size = 20
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_USUARIO'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'LOGOTIPO'
            DataType = datBlob
            BlobType = dabtBlob
            DictionaryEntry = 'Empresas_LOGOTIPO'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'REGISTRO_MERCANTIL'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_REGISTRO_MERCANTIL'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'IVA'
            DataType = datFloat
            BlobType = dabtUnknown
            DictionaryEntry = 'Empresas_IVA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end>
        BusinessRulesClient.ScriptLanguage = rslPascalScript
        BusinessRulesServer.ScriptLanguage = rslPascalScript
      end
      item
        Params = <
          item
            Name = 'ID'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS_DATOS_BANCO'
            SQL = 
              'SELECT '#10'    ID, ID_EMPRESA, NOMBRE, ENTIDAD, SUCURSAL, DC, CUENT' +
              'A, '#10'    SUFIJO_N19, SUFIJO_N58'#10'  FROM'#10'    EMPRESAS_DATOS_BANCO'#10'W' +
              'HERE ID = :ID'
            StatementType = stSQL
            ColumnMappings = <
              item
                DatasetField = 'ID'
                TableField = 'ID'
              end
              item
                DatasetField = 'ID_EMPRESA'
                TableField = 'ID_EMPRESA'
              end
              item
                DatasetField = 'NOMBRE'
                TableField = 'NOMBRE'
              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
              item
                DatasetField = 'SUFIJO_N19'
                TableField = 'SUFIJO_N19'
              end
              item
                DatasetField = 'SUFIJO_N58'
                TableField = 'SUFIJO_N58'
              end>
          end>
        Name = 'EmpresasDatosBanco_Refresh'
        Fields = <
          item
            Name = 'ID'
            DataType = datInteger
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_ID'
            InPrimaryKey = True
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_ID_EMPRESA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'NOMBRE'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_NOMBRE'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'ENTIDAD'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_ENTIDAD'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'SUCURSAL'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_SUCURSAL'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'DC'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_DC'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'CUENTA'
            DataType = datString
            Size = 15
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_CUENTA'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'SUFIJO_N19'
            DataType = datString
            Size = 3
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_SUFIJO_N19'
            InPrimaryKey = False
            Calculated = False
            Lookup = False
            LookupCache = False
          end
          item
            Name = 'SUFIJO_N58'
            DataType = datString
            Size = 3
            BlobType = dabtUnknown
            DictionaryEntry = 'EmpresasDatosBanco_SUFIJO_N58'
            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 = 'RAZON_SOCIAL'
            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 = 'LOGOTIPO'
            DataType = datBlob
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'REGISTRO_MERCANTIL'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'IVA'
            DataType = datFloat
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS'
            SQL = 
              'INSERT'#10'  INTO EMPRESAS'#10'    (ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, C' +
              'ALLE, POBLACION, '#10'     PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TEL' +
              'EFONO_2, MOVIL_1, '#10'     MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_W' +
              'EB, NOTAS, '#10'     FECHA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTI' +
              'PO, '#10'     REGISTRO_MERCANTIL, IVA)'#10'  VALUES'#10'    (:ID, :NIF_CIF, ' +
              ':NOMBRE, :RAZON_SOCIAL, :CALLE, :POBLACION, '#10'     :PROVINCIA, :C' +
              'ODIGO_POSTAL, :TELEFONO_1, :TELEFONO_2, '#10'     :MOVIL_1, :MOVIL_2' +
              ', :FAX, :EMAIL_1, :EMAIL_2, :PAGINA_WEB, '#10'     :NOTAS, :FECHA_AL' +
              'TA, :FECHA_MODIFICACION, :USUARIO, '#10'     :LOGOTIPO, :REGISTRO_ME' +
              'RCANTIL, :IVA)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Insert_Empresas'
      end
      item
        Params = <
          item
            Name = 'OLD_ID'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS'
            SQL = 'DELETE '#10'  FROM'#10'    EMPRESAS'#10'  WHERE'#10'    (ID = :OLD_ID)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Delete_Empresas'
      end
      item
        Params = <
          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 = 'RAZON_SOCIAL'
            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 = 'LOGOTIPO'
            DataType = datBlob
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'REGISTRO_MERCANTIL'
            DataType = datString
            Size = 255
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'IVA'
            DataType = datFloat
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'OLD_ID'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS'
            SQL = 
              'UPDATE EMPRESAS'#10'  SET '#10'    NIF_CIF = :NIF_CIF,'#10'    NOMBRE = :NOM' +
              'BRE, '#10'    RAZON_SOCIAL = :RAZON_SOCIAL, '#10'    CALLE = :CALLE, '#10'  ' +
              '  POBLACION = :POBLACION, '#10'    PROVINCIA = :PROVINCIA, '#10'    CODI' +
              'GO_POSTAL = :CODIGO_POSTAL, '#10'    TELEFONO_1 = :TELEFONO_1, '#10'    ' +
              'TELEFONO_2 = :TELEFONO_2, '#10'    MOVIL_1 = :MOVIL_1, '#10'    MOVIL_2 ' +
              '= :MOVIL_2, '#10'    FAX = :FAX, '#10'    EMAIL_1 = :EMAIL_1, '#10'    EMAIL' +
              '_2 = :EMAIL_2, '#10'    PAGINA_WEB = :PAGINA_WEB, '#10'    NOTAS = :NOTA' +
              'S, '#10'    FECHA_ALTA = :FECHA_ALTA, '#10'    FECHA_MODIFICACION = :FEC' +
              'HA_MODIFICACION, '#10'    USUARIO = :USUARIO, '#10'    LOGOTIPO = :LOGOT' +
              'IPO, '#10'    REGISTRO_MERCANTIL = :REGISTRO_MERCANTIL, '#10'    IVA = :' +
              'IVA'#10'  WHERE'#10'    (ID = :OLD_ID)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_Empresas'
      end
      item
        Params = <
          item
            Name = 'ID'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'NOMBRE'
            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 = 'SUFIJO_N19'
            DataType = datString
            Size = 3
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'SUFIJO_N58'
            DataType = datString
            Size = 3
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS_DATOS_BANCO'
            SQL = 
              'INSERT'#10'  INTO EMPRESAS_DATOS_BANCO'#10'    (ID, ID_EMPRESA, NOMBRE, ' +
              'ENTIDAD, SUCURSAL, DC, CUENTA, '#10'     SUFIJO_N19, SUFIJO_N58)'#10'  V' +
              'ALUES'#10'    (:ID, :ID_EMPRESA, :NOMBRE, :ENTIDAD, :SUCURSAL, :DC, ' +
              #10'     :CUENTA, :SUFIJO_N19, :SUFIJO_N58)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Insert_EmpresasDatosBanco'
      end
      item
        Params = <
          item
            Name = 'OLD_ID'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS_DATOS_BANCO'
            SQL = 
              'DELETE '#10'  FROM'#10'    EMPRESAS_DATOS_BANCO'#10'  WHERE'#10'    (ID = :OLD_I' +
              'D)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Delete_EmpresasDatosBanco'
      end
      item
        Params = <
          item
            Name = 'ID_EMPRESA'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'NOMBRE'
            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 = 'SUFIJO_N19'
            DataType = datString
            Size = 3
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'SUFIJO_N58'
            DataType = datString
            Size = 3
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end
          item
            Name = 'OLD_ID'
            DataType = datInteger
            BlobType = dabtUnknown
            Value = ''
            ParamType = daptInput
          end>
        Statements = <
          item
            Connection = 'IBX'
            TargetTable = 'EMPRESAS_DATOS_BANCO'
            SQL = 
              'UPDATE EMPRESAS_DATOS_BANCO'#10'  SET '#10'    ID_EMPRESA = :ID_EMPRESA,' +
              #10'    NOMBRE = :NOMBRE, '#10'    ENTIDAD = :ENTIDAD, '#10'    SUCURSAL = ' +
              ':SUCURSAL, '#10'    DC = :DC, '#10'    CUENTA = :CUENTA, '#10'    SUFIJO_N19' +
              ' = :SUFIJO_N19, '#10'    SUFIJO_N58 = :SUFIJO_N58'#10'  WHERE'#10'    (ID = ' +
              ':OLD_ID)'
            StatementType = stSQL
            ColumnMappings = <>
          end>
        Name = 'Update_EmpresasDatosBanco'
      end>
    RelationShips = <>
    UpdateRules = <
      item
        Name = 'Insert Empresas'
        DoUpdate = False
        DoInsert = True
        DoDelete = False
        DatasetName = 'Empresas'
        FailureBehaviour = fbRaiseException
      end
      item
        Name = 'Insert EmpresasDatosBanco'
        DoUpdate = False
        DoInsert = True
        DoDelete = False
        DatasetName = 'EmpresasDatosBanco'
        FailureBehaviour = fbRaiseException
      end
      item
        Name = 'Update Empresas'
        DoUpdate = True
        DoInsert = False
        DoDelete = False
        DatasetName = 'Empresas'
        FailureBehaviour = fbRaiseException
      end
      item
        Name = 'Update EmpresasDatosBanco'
        DoUpdate = True
        DoInsert = False
        DoDelete = False
        DatasetName = 'EmpresasDatosBanco'
        FailureBehaviour = fbRaiseException
      end
      item
        Name = 'Delete EmpresasDatosBanco'
        DoUpdate = False
        DoInsert = False
        DoDelete = True
        DatasetName = 'EmpresasDatosBanco'
        FailureBehaviour = fbRaiseException
      end
      item
        Name = 'Delete Empresas'
        DoUpdate = False
        DoInsert = False
        DoDelete = True
        DatasetName = 'Empresas'
        FailureBehaviour = fbRaiseException
      end>
    Left = 30
    Top = 14
  end
  object BINAdapter: TDABINAdapter
    Left = 30
    Top = 82
  end
  object DataDictionary: TDADataDictionary
    Fields = <
      item
        Name = 'Empresas_ID'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'ID'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_NIF_CIF'
        DataType = datString
        Size = 15
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'CIF'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_NOMBRE'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Nombre'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_RAZON_SOCIAL'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Raz'#243'n Social'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_CALLE'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Calle'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_POBLACION'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Poblaci'#243'n'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_PROVINCIA'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Provincia'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_CODIGO_POSTAL'
        DataType = datString
        Size = 10
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. postal'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_TELEFONO_1'
        DataType = datString
        Size = 25
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Tel'#233'fono 1'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_TELEFONO_2'
        DataType = datString
        Size = 25
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Tel'#233'fono 2'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_MOVIL_1'
        DataType = datString
        Size = 25
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'M'#243'vil 1'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_MOVIL_2'
        DataType = datString
        Size = 25
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'M'#243'vil 2'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_FAX'
        DataType = datString
        Size = 25
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Fax'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_EMAIL_1'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'E-mail 1'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_EMAIL_2'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'E-mail 2'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_PAGINA_WEB'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'P'#225'gina web'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_NOTAS'
        DataType = datMemo
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Notas'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_FECHA_ALTA'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_FECHA_MODIFICACION'
        DataType = datDateTime
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_USUARIO'
        DataType = datString
        Size = 20
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_LOGOTIPO'
        DataType = datBlob
        BlobType = dabtBlob
        DisplayWidth = 0
        DisplayLabel = 'Logotipo'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_REGISTRO_MERCANTIL'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Registro mercantil'
        Alignment = taLeftJustify
      end
      item
        Name = 'Empresas_IVA'
        DataType = datFloat
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'IVA'
        Alignment = taLeftJustify
      end
      item
        Name = 'EmpresasDatosBanco_ID'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'ID'
        Alignment = taLeftJustify
      end
      item
        Name = 'EmpresasDatosBanco_ID_EMPRESA'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
      end
      item
        Name = 'EmpresasDatosBanco_NOMBRE'
        DataType = datString
        Size = 255
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Nombre del banco'
        Alignment = taLeftJustify
      end
      item
        Name = 'EmpresasDatosBanco_ENTIDAD'
        DataType = datString
        Size = 15
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Entidad'
        Alignment = taLeftJustify
      end
      item
        Name = 'EmpresasDatosBanco_SUCURSAL'
        DataType = datString
        Size = 15
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Sucursal'
        Alignment = taLeftJustify
      end
      item
        Name = 'EmpresasDatosBanco_DC'
        DataType = datString
        Size = 15
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'DC'
        Alignment = taLeftJustify
      end
      item
        Name = 'EmpresasDatosBanco_CUENTA'
        DataType = datString
        Size = 15
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Cuenta'
        Alignment = taLeftJustify
      end
      item
        Name = 'EmpresasDatosBanco_SUFIJO_N19'
        DataType = datString
        Size = 3
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Sufijo 19'
        Alignment = taLeftJustify
      end
      item
        Name = 'EmpresasDatosBanco_SUFIJO_N58'
        DataType = datString
        Size = 3
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Sufijo 58'
        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'  </Diagram>'#13#10'</Diagrams>'#13#10
  end
  object bpEmpresas: TDABusinessProcessor
    Schema = schEmpresas
    InsertCommandName = 'Insert_Empresas'
    DeleteCommandName = 'Delete_Empresas'
    UpdateCommandName = 'Update_Empresas'
    ReferencedDataset = 'Empresas'
    ProcessorOptions = [poPrepareCommands]
    UpdateMode = updWhereKeyOnly
    Left = 248
    Top = 16
  end
  object bpEmpresasDatosBanco: TDABusinessProcessor
    Schema = schEmpresas
    InsertCommandName = 'Insert_EmpresasDatosBanco'
    DeleteCommandName = 'Delete_EmpresasDatosBanco'
    UpdateCommandName = 'Update_EmpresasDatosBanco'
    RefreshDatasetName = 'EmpresasDatosBanco_Refresh'
    ReferencedDataset = 'EmpresasDatosBanco'
    ProcessorOptions = [poPrepareCommands]
    UpdateMode = updWhereKeyOnly
    Left = 248
    Top = 80
  end
end