HP 3000 Manuals

MPE Segmenter Reference Manual

CLEANUSL 

Copies only the active entries of the currently-managed User Segmented
Library (USL) file into a new, "clean" USL file.

This intrinsic requires 2900 words of user stack space.

CLEANUSL creates the new USL file as a job temporary file.  To make the
file permanent, you must call the FCLOSE intrinsic.

SYNTAX 

        I                IV     BA
     filenum:=CLEANUSL(uslfnum,filename);

FUNCTIONAL RETURN 

This intrinsic returns the new file number.  If an error occurs, the
error number is returned instead of the new file number.  The condition
code therefore must be tested immediately on return from this intrinsic.
If an error number were to be used as a file number, unpredictable
results would occur.

PARAMETERS 

uslfnum          integer by value. 

                 A word identifier supplying the file number of the file.

filename         byte array. 

                 The name to be given to the new USL file.  It may be
                 fully qualified.

CONDITION CODES 

CCE              Request granted.  The new file number is returned.

CCG              Not returned by this intrinsic.

CCL              Request denied.  CLEANUSL returns one of the following
                 error numbers in filenum:

                 Error No.        Meaning

                 0                Unexpected end of file 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.

MPE/iX 5.0 Documentation