Function:     MTREADC

Purpose:      Reads data from a specified tape device.

Category:     TAPES

File:         mtiodev.c

Author:       K.G. Begeman

Use:          INTEGER MTREADC( MTID,       Input        INTEGER
                               DATA )      Output       CHARACTER*(*)

              MTREADC   Returns:
                        >0 : Size of record just read in bytes. This
                             may be larger than LEN(DATA). The DATA array
                             is filled with MIN(MTREAD,LEN(DATA)) bytes.
                        -1 : System error.
                        -4 : Tape device not open.
                        -9 : Call error.
              MTID      Tape device id returned by MTOPEN.
              DATA      Character variable. The number of bytes MTREADC
                        tries to read is equal to LEN(DATA).

Warning:      Code is System dependant!

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