Specify a new Logical Unit for Input

This Subprogram modifies the Logical Unit Number to be used to accept User Input.

Short Name Calling Sequence

STATUS = UIINLU(LUN[,OLDLUN])

Long Name Calling Sequence

STATUS = UI_INPUT_LUN(...)

Input Arguments

LUN (Integer) Logical Unit No.

Output Arguments

OLDLUN (Integer) Old Logical Unit No. (Optional)

Function Value

UI__SUCCESS ) Success UISUCC )

UI__NOT_INITIALIZED ) Package not Initialized UININI )

UI__ILLEGAL_UNIT ) Illegal Logical Unit No. UIILLU )

UI__RESERVED_UNIT ) Unit already reserved UIRELU )

Note:

1. The OLDLUN Argument is optional and, if present, will be set to the previous Input Logical Unit prior to this call.
2. The old Input Logical Unit is not closed by this call. It is the Application Programmer's responsibility to do this.
3. No check is made for validity of LUN other than to mark it as reserved if it lies in the range 1-99 and is not already reserved.