{
{   The purpose of this request is to erase a specified length of tape.  The
{ length of tape to be erased is specifed in bytes which is equivalent to the
{ number of frames on the tape file.
{
{   This request is valid only for a tape file with a FILE_LABEL_TYPE of
{ AMC$UNLABELLED, a BLOCK_TYPE of AMC$USER_SPECIFIED and a RECORD_TYPE of
{ AMC$UNDEFINED.
{
{   This request writes on the tape and therefore unconditionally establishes
{ End of Information (EOI).
{
{       AMP$ERASE_TAPE_BLOCK (FILE_IDENTIFIER, BLOCK_LENGTH, STATUS)
{
{ FILE_IDENTIFIER: (input)  This parameter specifies the file access
{       identifier established when the file was opened.
{
{ BLOCK_LENGTH: (input)  This parameter specifies the length of the block to
{       be erased.  This length is given in bytes.
{
{ STATUS: (output) This parameter specifies the request status.
{
{       CONDITION:  ame$ring_validation_error,
{                   ame$conflicting_access_level,
{                   ame$improper_file_id,
{                   ame$improper_output_attempt,
{                   ame$put_beyond_file_limit,
{                   ame$record_exceeds_mbl,
{                   ame$improper_wsl_value,
{                   ame$unrecovered_write_error,
{                   ame$terminal_disconnected.
{       IDENTIFIER: amc$access_method_id.
