Programa - creado desde un Mapa Mental

Insertar Clave Única Busqueda Binaria Burbuja Posicion >= 0 Alta de Registro Baja de Registro Modificación de Registro Consulta de Registro

Alta, Baja, Modificación y Consulta

Procedimientos y Funciones Assign Reset ReWrite Write Seek Read FileSize FilePos

DNI, Apellido, etc

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

Posicion devuelta de la Busqueda Binaria

Es decir que no se ha encontrado ningún Registro con es Clave en el Archivo

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

Seek(Archivo, Posicion); Read(Archivo, Registro); Registro.Activo:=0; Seek(Archivo, Posicion); Write(Archivo, Registro);

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

Seek(Archivo, Posicion); Read(Archivo, Registro); Modificar Campos del Registro Seek(Archivo, Posicion); Write(Archivo, Registro);

Seek(Archivo, Posicion); Read(Archivo, Registro); Mostrar Campos del Registro;

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

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

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

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.

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

Situa el puntero del archivo en el numero de registro.

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

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

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

Programa

Anotaciones