ICL 1900 Series George 3 Operating System Macros

FILEIN

Function

Copies subfiles from a magnetic tape into files in the filestore.

Format

FILEIN Rterminator, Tterminator, *CR or *TRfile description, ERlabel, SFlabel

Forbidden contexts

NO USER, BREAK-IN

Execution

After this command has been implemented no trace of the named file will be found anywhere in the system. The directory entry will be removed and all space occupied by the file will be freed. An open file will not be erased until it has been closed by the activity that is currently using it. After an ERASE command has been issued an attempt to set up a file with the same name as the one that is to be erased will result in a wait for the erasure to take place. An attempt to use a file that is in the process of being erased will result in the message 'ENTRANT z DOES NOT EXIST'.

If the file description starts with '!' the workfile stack is pulled up and the workfile is erased if it has been set up.

If the workfile stack has not been pushed down to the depth indicated, an error is reported.

If the named file is a directory, the directory and all files inferior to it are erased, and all magnetic tapes inferior to it are RETURNed, provided the following conditions are satisfied:

When a user's proper directory is erased, the user is removed from the Dictionary and any outstanding budgets are transferred to the user who gave the ERASE command.

Note

The user traps are not checked by the ERASE command.

Examples

ERASE A1-023-12(/PROG) File A1-023-12(/PROG) will be erased.
ERASE :Z.MYFILE :Z is a pseudo user, whose directory belongs to the proper user. Therefore, :Z.MYFILE belongs to the proper user and my be erased.
ERASE MYFILE,TESTDATA,RESULTS Files MYFILE, TESTDATA and RESULTS will be erased.

Error Messages

JOB IN PROGRESS IN DIRECTORYz
z HAS A USER'S DIRECTORY INFERIOR TO IT