MPE/iX Intrinsics Reference Manual (32650-90905)

70 Chapter4
Command Definitions (ABORTSESS - FCLOSE)
CLEANUSL
CLEANUSL
NM and CM callable.
Deletes all inactive entries from currently managed USL files and returns the file number
of the new USL file. Therefore, you must test the condition code immediately upon return
from the intrinsic. Unpredictable results occur if an error number is used as a file number.
NOTE A USL contains CM object code and is meaningful in the CM program
development process only.
Syntax
I16 I16V CA
filenum :=CLEANUSL( uslfnum,formaldesig );
Functional Return
filenum 16-bit signed integer (assigned functional return)
Returns the new file number, if no error occurs, or if an error occurs
condition code returns CCL (1) and
filenum returns one of the following:
VaIue Meaning
0 Unexpected end-of-file (EOF) marker on either the old or
the new USL file
1 Unexpected I/O error on either the old or the new USL file
7 Unable to open new USL file
12 Invalid USL file
Parameters
uslfnum 16-bit signed integer by value (required)
Returns the file number of the file.
formaldesig character array (required)
Passes the name to be given to the cleaned file. The array must end with a
blank. If it contains all blanks, it deletes the inactive entries.
Condition Codes
CCE (2) Request granted. The new file number is returned to filenum .
CCG (0) Not returned.
CCL (1) Request denied. An error number is returned to
filenum .