A subroutine which can be called from FORTRAN to tell the current byte offset in a file.
The format and arguments for the subroutine are:
SUBROUTINE PBTELL( KUNIT, KRET)
Input parameter is an INTEGER.
| KUNIT | The index of a UNIX FILE pointer held in an internal table obtained from PBOPEN |
The output parameter is an INTEGER.
| KRET | Return code -2 = error in handling file, otherwise = current byte offset from start of file. |