AIRES library reference: getcrorectype.


c
c     Routine directly callable from C/C++ (it could be necessary to
c     append an underscore, "_", to its name depending on the C/C++
c     compiler used).
c
c
      function getcrorectype(fileid, vrb, infield1, rectype)
c
c     Getting the record type of the next record in the cio file.
c
c     Written by: S. J. Sciutto, La Plata 1997, 2003, 2010.
c
c
c     Arguments:
c     =========
c
c     fileid.......... (input, integer) Compressed file number. This
c                      parameter identifies the file to be used for
c                      reading, and is set by the file opening
c                      routine.
c     vrb............. (input, integer) Verbosity control. If vrb is
c                      zero or negative then no error/informative
c                      messages are printed; error conditions are
c                      communicated to the calling program via the
c                      return code. If vrb is positive error messages
c                      will be printed: vrb = 1 means that messages
c                      will be printed even with successful operations.
c                      vrb = 2,3 means that only error messages will
c                      be printed. vrb > 3 is similar to vrb = 3, but
c                      with the additional action of stopping the
c                      program if a fatal error takes place.
c     infield1........ (output, integer) If rectype is zero, this
c                      variable contains the current value of the first
c                      (nonscaled) integer field of the record.
c                      Otherwise it is set to zero.
c     rectype......... (output, integer) Record type and return code.
c                      0 means that a default record was successfully
c                      read. i (i > 0) means that an alternative
c                      record of type i was successfully read. -1
c                      means that an end-of-file condition was get
c                      from the corresponding file.  Any other value
c                      indicates a reading error (rectype equals the
c                      system return code plus 10000).
c
c     Return value: (logical) True if a record was successfully read.
c     ============  False othwerise (EOF or I/O error).
c
c
c<--->


These pages are maintained by
Sergio J. Sciutto
Back to AIRES library index
Back to AIRES home [HOME]