SUBROUTINE FBUFFIN(IU,BUFFER,MAXX,K,LEN)
C
C     * FEB 03/92 - E.CHAN
C     * FBUFFIN CALLS THE C ROUTINE BUFFIN TO READ STANDARD UNFORMATTED
C     * RECORDS FROM A SEQUENTIAL FILE. THE CALL TO BUFFIN REQUIRES
C     * THE USE OF A POINTER ARRAY PASSED THROUGH FROM SUBROUTINE 
C     * JCLPNT. THE I'TH ELEMENT OF THE POINTER ARRAY FD CONTAINS THE
C     * C FILE DESCRIPTOR CORRESPONDING TO THE FORTRAN UNIT NUMBER I.
C     *
C     * THE SOURCE CODE FOR BUFFIN CONTAINS FURTHER DETAILS.
C     *
C     * NOTE: A STANDARD FORTRAN SEQUENTIAL ACCESS UNFORMATTED RECORD
C     * CONTAINS A 4-BYTE HEADER AND TRAILER WHICH INDICATES THE BYTE
C     * LENGTH OF THE RECORD. SINCE BUFFIN READS THE LEADING 4 BYTES
C     * TO ASCERTAIN THIS INFORMATION, NON-STANDARD RECORD FORMATS 
C     * WILL NOT BE READ PROPERLY. THE TWO ROUTINES AVAILABLE TO 
C     * GENERATE STANDARD RECORDS (IN LIEU OF A FORTRAN UNFORMATTED
C     * WRITE) ARE: FBUFOUT AND THE C ROUTINE BUFFOUT.
C   
      INTEGER BUFFER(MAXX), FD(100)
C
      COMMON /JCLPNTC/ FD
C
C ---------------------------------------------------------------------
C
C   
      LEN=MAXX
      CALL BUFFIN(FD(IU),BUFFER,LEN,K)
C
      RETURN
      END