11.3 x/zlgetlabel—(Obsolete) Read labels into local memory

call xlgetlabel (unit,buf,bufsize,status) 
status = zvlgetlabel (unit,buf,bufsize,status) 

Replace with explicit calls to the other label routines to retrieve only the labels of interest. Reading the entire label buffer and searching through it for a key word (the common usage of xlgetlabel) is prone to error as the given key word might exist as part of some other, unrelated label. It is permissible (if the label contents are set up this way) to read a set of labels into a buffer and search that buffer, but do not use xlgetlabel for this.
x/zlgetlabel returns the entire VICAR label in a single buffer as it exists in the file, except that the LBLSIZE key word for the part of the label which exists at the end of the file (if the label is in two parts) is not written into the buffer.
The BUFSIZE argument puts a ceiling on the number of bytes returned. That is, the actual number of bytes written into the buffer is the smaller of the entire label size and BUFSIZE. If BUFSIZE is zero on input, then nothing is copied into the buffer, but the en tire label size will be return ed in BUFSIZE (instead of 0).
The user can thus use a BUFSIZE of zero to find out how much space is needed before calling to get the actual label.

Arguments:

• UNIT: input, integer
  Unit of associated file. A valid VICAR unit number (returned from x/zvunit) of an open file.
• BUF: output, byte array
  Buffer to contain labels. The buffer in which the VICAR label is to be returned. Should be large enough to hold the entire label, although BUFSIZE may be used to inhibit too large a transfer. Type HELP ARGUMENTS BUFSIZE for further information.
• BUFSIZ: input/output, integer
  The size of the internal buffer being used for the I/O operations. If the file is a tape, BUFSIZ will be equivalent to the block size of the tape in bytes.
  On input, BUFSIZE specifies the maximum number of bytes to be returned in the buffer. On output, it gives the actual number of bytes returned.
  If BUFSIZE is zero on input, then nothing is copied into BUFFER, and the total size of the label is returned (instead of zero).
• STATUS: output, integer
  Error status code. A value of one indicates success. The error codes are listed in 10 Appendix B: Error Messages .