In the following example, if FILEA is a disk file, the file is closed and the record pointer is set to the first record of the file. If FILEA is a magnetic tape file, the file is closed and the tape is rewound.

REWIND(FILEA)