CALL EPRWND (LUNIT,*IBUF*,IERR*)
Rewinds to the start of the current file in use on this unit.
Rewinding an output unit triggers writing the last buffer out and writes an end of file. After a rewind operation (and only in that case) the user may switch from reading to writing or vice versa.
The physical header is reset to the standard header after a rewind.