{
{   The use of this request is discouraged.  FSP$CLOSE_FILE should be used
{ instead.
{   The purpose of this request is to terminate file access. The}
{ file_identifier is invalidated by this request.
{   For a file associated with tape, the file and volume are terminated}
{ according to convention, if the preceding operation was an output to the}
{ tape. If the label_type is amc$labelled(*), the standard ANSI EOF label}
{ and two tapemarks are written; then the tape volume is positioned by close}
{ between the two tapemarks. For an amc$unlabelled file, two}
{ tapemarks are written to terminate the file and volume; then the volume}
{ is positioned by close prior to the two tapemarks.}
{   If a label_exit_procedure(*) has been specified, control will be passed}
{ to this procedure whenever a standard ANSI label matching the label_options}
{ attribute is processed.}
{
{       AMP$CLOSE (FILE_IDENTIFIER, STATUS)
{
{ FILE_IDENTIFIER: (input) This parameter specifies the file access
{       identifier established when the file was opened.
{
{
{ STATUS: (output) This parameter specifies the request status
{       CONDITION:  ame$ring_validation_error,
{                   ame$improper_file_id,
{                   ame$unrecovered_write_error.}
{       IDENTIFIER: amc$access_method_id.
{}
