 |
» |
|
|
|
NM and CM callable. Changes length of a USL file by creating a USL file with
the increment length longer or shorter than the USL file
specified by uslfnum. The old USL file is copied to
the new file with the same file name; the old USL file is then
deleted. | | | |  | NOTE: A USL contains CM object code and is meaningful only in the CM
program development process. | | | | |
Syntax | |
I16 I16V I16V
filenum:=EXPANDUSLF(uslfnum,increment);
|
Functional Return | |
- filenum
16-bit signed integer (optional) Returns the new file number. If an error
occurs (condition code returns CCL (1)), an error number is
returned. The condition code must be tested immediately upon
return from this intrinsic. If an error number is used instead of
a file number in the uslfnum parameter, unpredictable
results occur. Following are the possible error numbers
and their meanings: | Value | Meaning |
|---|
| 0 | File specified by uslfnum was empty,
an unexpected end-of-file was encountered when reading the
old USL file, or an unexpected end-of-file was encountered
when writing the new uslfnum | | 1 | Unexpected I/O error occurred; can occur on the old USL file, or the new uslfnum where the information is being copied to | | 7 | Unable to open the new USL file | | 8 | Unable to close (purge) the old USL file | | 9 | Unable to close (save) the new USL file | | 10 | Unable to close $NEWPASS | | 11 | Unable to open $OLDPASS |
Parameters | |
- uslfnum
16-bit signed integer by value (required) Passes the file number of the file.
- increment
16-bit signed integer by value (required) Passes the number of records the length of the USL file
is to be changed: If a positive value, the new USL file is longer than the old USL. If a negative value, the new USL file is shorter than the old USL.
Condition Codes | |
- CCE (2)
Request granted. The new file number is returned. - CCG (0)
Not returned. - CCL (1)
Request denied. An error number was returned to filenum.
Related Information | |
- Intrinsics
ADJUSTUSLF - Commands
None - Manuals
MPE Segmenter Reference Manual (30000-90011)
|
