Pascal/Turbo Pascal - practica de ficheros

Necesito que alguien me ayude con una practica de pascal, que no hago mas que darle vueltas...
en el enunciado nos pide:
insertar un registro
en un fichero, ordenado por nombre
Siempre respetando el orden.
Gracias.

Un ejemplo.

procedure insertarreg(r:reg);
begin
reset(archivo);
read(archivo,buff);
while (buff<r) and not(eof(archivo) do
read(archivo,buff);
seek(archivo,pos(archivo-1);
write(archivo,r);
end;
siendo r el registro a insertar, buff como registro de lectura y archivo el cual hay que ordenar, por supuesto que la expresion (buff>r) del while hay que cambiarla adecuadamente.

Lo del seek está muy bién en freepascal me funciona.
Pero no se por que extraña razón en la universidad tenemos que utilizar el dec-Pascal para UNIX para compilar los programas.
Desgraciadamente en este compilador el procedimiento seek no funciona
y si hay algun procedimiento parecido no nos lo han explicado.
Gracias de todas formas.