Function:     MTREAD

Purpose:      Reads data from a specified tape device.

Category:     TAPES

File:         mtiodev.c

Author:       K.G. Begeman

Use:          INTEGER MTREAD( MTID,       Input        INTEGER
                              DATA,       Output       INTEGER ARRAY
                              NREQ )      Input        INTEGER

              MTREAD    Returns:
                        >0 : Size of record just read in bytes. This
                             may be larger than NREQ. The DATA array is
                             filled with MIN(MTREAD,NREQ) bytes.
                        -1 : System error.
                        -2 : End of tape encountered.
                        -4 : Tape device not open.
                        -8 : Record longer than 32768 bytes.
                        -9 : Call error.
              MTID      Tape device id returned by MTOPEN.
              DATA      Integer array where data are returned.
              NREQ      Wanted number of bytes to read.

Warning:      Code is System dependant!

Updates:      Jul 20, 1989, KGB, Document created.