{   This procedure is called to advance to the next volume of a tape file.
{
{   If the last operation on the current volume was a write, the volume will
{ be terminated by writing two tape marks before the new volume is assigned.
{
{   Note that for labeled tapes the caller must ensure that all labels have
{ been written before calling this procedure.
{
{   BAP$TAPE_BM_ADVANCE_VOLUME(FILE_IDENTIFIER, FAILURE_MODES, STATUS)
{
{   FILE_IDENTIFIER (Input):  The file identifier for the file.
{
{   ALLOW_SCRATCH_VOLUMES_ON_WRITE (Input): TRUE to allow scratch volumes
{        to be mounted after the VSN list is exausted.  FALSE to inhibit
{        assignment of scratch volumes.
{
{   FAILURE_MODES:  (Output):  Tape failure modes.
{
{   STATUS: (Output) Request status.
