Close a Command File Prematurely

This Subprogram closes the specified Indirect Command File (and all nested Command Files than might be open) decreases the stack depth one level.

Short Name Calling Sequence

STATUS = UICLFI(FILNAM)

Long Name Calling Sequence

STATUS = UI_CLOSE_FILE(...)

Input Arguments

FILNAM (Character) File Name

Output Arguments

None

Function Value

UI__SUCCESS ) Success UISUCC )

UI__NOT_INITIALIZED ) Package not Initialized UININI )

UI__OPEN_INPUT ) Unable to open File UICIFI )

Note:

1. This Subprogram searches the current Indirect Command File stack for the specified File. If this search is successful, this Command File, and any other nested Command Files lower in the stack, are closed and the stack unwound one level. Thus, if a single Command File is being executed at the time of this call, input will be redirected to the keyboard.
2. This Subprogram is ignored if input is presently being taken directly from the keyboard rather than from an Indirect Command File.
3. On a VAX, the file type defaults to ``.UIC" if it isn't explicitly specified within FILNAM, and the file defaults to ``UIPACK.UIC" if FILNAM is null (all spaces).
4. Error UI__OPEN_INPUT will be reported if the specified file does not exist on the input stack. No further action will be taken in this situation.