Warning, /include/fatmen/fatinfo.inc is written in an unsupported language. File is not indexed.
0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1 1996/03/07 15:17:54 mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_FATMEN_FATINFO_INC
0010 #define CERNLIB_FATMEN_FATINFO_INC
0011 *
0012 *
0013 * fatinfo.inc
0014 *
0015 *
0016 * Common to store FATMEN information per LUN
0017 * Access method (disk, stage, setup) and filemode (CMS only)
0018 * Virtual address for tape drive
0019 * This information is set by FMOPEN/FIND/MAKE and subsequently
0020 * used by FMCLOS.
0021 *
0022 * IFMODE: 0: FZin, 1: FZout, 2: RZ
0023 * JFMODE: ICFOP from FMOPEN (Fortran, C, package I/O)
0024 * LFMODE: 1=disk, 2=stage, 3=tape
0025 *
0026 COMMON/FATINF/IVADDR(99),IDEV(99), IFMODE(99),
0027 + JFMODE(99),LFMODE(99),IFPNTR(99),CHMODE(99)
0028 CHARACTER*1 CHMODE
0029
0030 #endif
