UNIDAD 5: PASCAL REGISTROS Y ARCHIVOS SECUENCIALES

TEMA 10: OPERACIONES CON CAMPOS PASCAL

En este tema se analiza la manera de poder realizar operaciones o procesos con los campos de los registros en el archivo secuencial, lo unico importante a considerar es que los campos del registro son en cierta medida igual que variables normales y por tanto se pueden procesar de manera normal como lo muestra el ejemplo.

prog23.cpp

program prog23;

uses crt;

type

alumnos = RECORD

clave:integer;

nombre:string[30];

estatura:real;

end;

var

alumno:alumnos;

archivo: file of alumnos;

temporal: file of alumnos;

BEGIN

(* creando y abriendo los dos archivos *)

assign(archivo,'c:\prog\alumnos.dat');

reset(archivo);

assign(temporal,'c:\prog\temporal.dat');

rewrite(temporal);

clrscr;

(* iniciando ciclo de lectura de registros en archivo original *)

while not(EOF(archivo)) do

begin

READ(archivo,alumno);

(* realizando operacion ejemplo aumentar 15 cms a cada estatura *)

alumno.estatura := alumno.estatura + 0.15 ;

(* grabando a temporal *)

WRITE(temporal,alumno);

end;

(* cerrando archivos *)

close(archivo);

close(temporal);

(* borrando y eliminando archivos *)

erase(archivo);

rename(temporal,'c:\prog\alumnos.dat');

(* avisando *)

write('ESTATURAS AUMENTADAS <enter> para continuar');

readln;

END.

corrida:

como se observa la solucion es muy sencilla solo se ocupa el registro original y los dos archivos el original y el temporal, se va leyendo registro a registro de archivo original al registro en memoria correspondiente, se realiza la operacion u proceso deseado con el registro y se graba el registro modificado en el archivo temporal, al final se elimina archivo original y se renombra el archivo temporal.

PROGRAMACION TAREAS PASCAL :

CONSTRUIR PROCEDIMEINTOS QUE PROCESEN ALGUNOS CAMPOS DE LOS ARCHIVOS EJEMPLOS QUE YA TIENEN CONSTRUIDOS.