Programa

Annotations:

• DNI, Apellido, etc

1. Busqueda Binaria

   Annotations:

   • Para buscar en el Archivo, esa clave única y devuelva la Posición donde se encuentra o no ese Registro
   1. Posicion

      Annotations:

      • Posicion devuelta de la Busqueda Binaria
      1. < 0

         Annotations:

         • Es decir que no se ha encontrado ningún Registro con es Clave en el Archivo
         1. Alta de Registro

            Annotations:

            • Cargamos Valores en ese Registro Registro.Activo:=1; (Activamos el Registro) Posicion:=filesize(Archivo); Seek(Archivo, Posicion); Write(Archivo, Registro);
      2. >= 0

         Annotations:

         • Existe, por ende se puede realizar Consulta, Modificación y/o Baja de un Registro
         1. Baja de Registro

            Annotations:

            • Seek(Archivo, Posicion); Read(Archivo, Registro); Registro.Activo:=0; Seek(Archivo, Posicion); Write(Archivo, Registro);
         2. Modificación de Registro

            Annotations:

            • Seek(Archivo, Posicion); Read(Archivo, Registro); Modificar Campos del Registro Seek(Archivo, Posicion); Write(Archivo, Registro);
         3. Consulta de Registro

            Annotations:

            • Seek(Archivo, Posicion); Read(Archivo, Registro); Mostrar Campos del Registro;
2. Burbuja

   Annotations:

   • Ordenamos el Archivo, según la Clave, para posteriormente realizar la Busqueda Binaria.

1. Assign

   Annotations:

   • Establece la correspondencia entre variable tipo con un archivo situado en disco.
2. Reset

   Annotations:

   • Abre un archivo existente para una operacion de lectura. Abre un Archivo existente y lo abre para lectura
3. ReWrite

   Annotations:

   • Crea y abre un nuevo archivo. Si el archivo existe, ReWrite borra su contenido en caso contrario el Archivo queda abierto para una operacion de escritura. Crea un nuevo Archivo y lo abre para Escritura.
4. Write

   Annotations:

   • Una vez que se ha abierto un archivo para escritura, sirven para escribir datos en el nuevo archivo.
5. Seek

   Annotations:

   • Situa el puntero del archivo en el numero de registro.
6. Read

   Annotations:

   • Se utilizan para la lectura de los datos situados en un archivo.
7. FileSize

   Annotations:

   • Devuelve el tamaño actual del Archivo (numero de Registros existentes en el Archivo).
8. FilePos

   Annotations:

   • Devuelve la posicion actual del Archivo (numero de Registro), en forma de entero largo (longint).