ID: Q70633
To obtain the application note "Increasing the Number of File Handles in FORTRAN 5.0/5.1 with Large Model Libraries," call Microsoft Product Support Services.
This application note is also available in the Microsoft Software Library.
The following file is available for download from the Microsoft Software Library:
~ hf0304.exe (size: 35423 bytes)
For more information about downloading files from the Microsoft Software
Library, please see the following article in the Microsoft Knowledge Base:
ARTICLE-ID: Q119591
TITLE : How to Obtain Microsoft Support Files from Online Services
This application note eliminates the run-time error F6417 -- too many
open files when opening more than 15 files at a time in a FORTRAN
program. The error message will reappear when opening more than 50 or
120 files at a time, depending on which object module the program is
linked with.
The following is the text of the application note:
Microsoft Product Support Services Application Note (Text File)
HF0304: INCREASING THE NUMBER OF FILE HANDLES IN
FORTRAN 5.0 AND 5.1 WITH LARGE MEMORY MODEL LIBRARIES
Revision Date: 10/91
Disk Included
The following information applies to Microsoft FORTRAN versions 5.0
and 5.1.
--------------------------------------------------------------------
| INFORMATION PROVIDED IN THIS DOCUMENT AND ANY SOFTWARE THAT MAY |
| ACCOMPANY THIS DOCUMENT (collectively referred to as an |
| Application Note) IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY |
| KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO |
| THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A |
| PARTICULAR PURPOSE. The user assumes the entire risk as to the |
| accuracy and the use of this Application Note. This Application |
| Note may be copied and distributed subject to the following |
| conditions: 1) All text must be copied without modification and |
| all pages must be included; 2) If software is included, all files |
| on the disk(s) must be copied without modification [the MS-DOS(R) |
| utility DISKCOPY is appropriate for this purpose]; 3) All |
| components of this Application Note must be distributed together; |
| and 4) This Application Note may not be distributed for profit. |
| |
| Copyright 1990-1991 Microsoft Corporation. All Rights Reserved. |
| Microsoft, MS-DOS, and the Microsoft logo are registered |
| trademarks and Windows is a trademark of Microsoft Corporation. |
--------------------------------------------------------------------
The following files are included on the enclosed HF0304 disk:
Directory Filename Description
--------- -------- -----------
\FORT500\F120 UNIT.OBJ Modified UNIT.ASM for 120
file handles to be linked
with DOS or OS/2 executable
files
\FORT500\F120\DOS CRT0DAT.OBJ Modified CRTODAT.ASM for 120
file handles to be linked
with DOS executable files
\FORT500\F120\OS2 CRT0DAT.OBJ Modified CRTODAT.ASM for 120
file handles to be linked
with OS/2 executable files
\FORT500\F50 UNIT.OBJ Modified UNIT.ASM for 50
file handles to be linked
with DOS or OS/2 executable
files
\FORT500\F50\DOS CRT0DAT.OBJ Modified CRTODAT.ASM for 50
file handles to be linked
with DOS executable files
\FORT500\F50\OS2 CRT0DAT.OBJ Modified CRTODAT.ASM for 50
file handles to be linked
with OS/2 executable files
\FORT510 UNIT.OBJ Modified UNIT.ASM for 64
file handles to be linked
with Windows executable
files or Windows DLLs
\FORT510 CRT0DATD.OBJ Modified CRTODAT.ASM for 64
file handles to be linked
with Windows DLLs
\FORT510 CRT0DATL.OBJ Modified CRTODAT.ASM for 64
file handles to be linked
with Windows executable
files
The original versions of CRT0DAT.ASM and UNIT.ASM are located on the
distribution disks for Microsoft FORTRAN versions 5.0 and 5.1. The
exact locations of these files are shown in the PACKING.LST file
located on Disk 1, Setup. Page 405 of the "Microsoft FORTRAN
Reference" manual for both versions 5.0 and 5.1 describes the
modifications made to CRT0DAT.ASM and UNIT.ASM to increase the number
of file handles. The assembled versions of these two files,
CRT0DAT.OBJ and UNIT.OBJ, are included on the enclosed HF0304 disk for
use with large memory model FORTRAN 5.0 libraries. The files CRT0DATL
.OBJ and CRT0DATD.OBJ are included on the enclosed disk for use with
large memory model FORTRAN 5.1 Windows or Windows DLL libraries.
1. Add the file CRT0DAT.OBJ to your current directory. This file is
located on the enclosed HF0304 disk in the \FORT500\F50\DOS
directory (or the \FORT500\F50\OS2 directory, if you are using
FORTRAN with OS/2).
2. Add the file UNIT.OBJ to your current directory. This file is
located on the enclosed HF0304 disk in the \FORT500\F50 directory.
3. Change the FILES=<number> line in your CONFIG.SYS file to read as
follows:
FILES=50
Add this line to your CONFIG.SYS file if the line does not exist.
Reboot the machine so the new FILES= statement takes effect.
4. Link the .OBJ files with the FORTRAN.OBJ file using the following
statement
LINK /NOE <QUUX.OBJ> + UNIT.OBJ + CRT0DAT.OBJ;
where <QUUX.OBJ> is the FORTRAN object code.
5. Alternatively, for a more permanent change, you can replace these
object modules in the run-time library <libraryname> as follows:
LIB <libraryname> -+UNIT.OBJ -+CRT0DAT.OBJ;
1. Add the file CRT0DAT.OBJ to your current directory. This file is
located on the enclosed HF0304 disk in the \FORT500\F120\DOS
directory (or the \FORT500\F120\OS2 directory, if you are using
FORTRAN with OS/2).
2. Add the file UNIT.OBJ to your current directory. This file is found
on the enclosed HF0304 disk in the \FORT500\F120 directory.
3. Change the FILES=<number> line in your CONFIG.SYS file to read as
follows:
FILES=120
Add this line to your CONFIG.SYS file if the line does not exist.
Reboot the machine so the new FILES= statement takes effect.
4. Link the .OBJ files with the FORTRAN.OBJ file using the following
statement
LINK /NOE <QUUX.OBJ> + UNIT.OBJ + CRT0DAT.OBJ;
where <QUUX.OBJ> is the FORTRAN object code.
5. Alternatively, for a more permanent change, you can replace these
object modules in the run-time library <libraryname> as follows:
LIB <libraryname> -+UNIT.OBJ -+CRT0DAT.OBJ;
The document FILEHAND.DOC, contained on the Microsoft FORTRAN version 5.1 distribution Disk 5, describes where to find the object modules on the distribution disks to increase the number of file handles to 64 for both DOS and OS/2. The document also describes the process of linking these object modules with the executable file.
The files CRT0DATD.OBJ and CRT0DATL.OBJ, shipped with Microsoft FORTRAN version 5.1, may generate an L2029, L2044, or L2025 error during link time when attempting to increase the number of file handles to 64 for a Windows executable file. The files CRT0DATD.OBJ and CRT0DATL.OBJ on the enclosed HF0304 disk are corrections for the object modules shipped with Microsoft FORTRAN 5.1.
1. Add the files CRT0DATL.OBJ and CRT0DATD.OBJ to your current
directory. These files are located on the enclosed HF0304 disk in
the \FORT510 directory.
2. Add the file UNIT.OBJ to your current directory. This file is
located on the enclosed HF0304 disk in the \FORT510 directory.
3. Change the FILES=<number> line in your CONFIG.SYS file to read as
follows:
FILES=64
Add this line to your CONFIG.SYS file if the line does not exist.
Reboot the machine so the new FILES= statement takes effect.
4. Link the .OBJ files with the FORTRAN object code file to create a
Windows executable file using the following statement
LINK /NOE <QUUX.OBJ> + UNIT.OBJ + CRT0DATL.OBJ;
where <QUUX.OBJ> is the FORTRAN object code. Use CRT0DATD.OBJ in
place of CRT0DATL.OBJ to create a Windows DLL.
5. Alternatively, for a more permanent change, you can replace these
object modules in the run-time library as follows:
a. To change the Windows run-time library, rename CRT0DATL.OBJ to
CRT0DAT.OBJ and type:
LIB LLIBFEW.LIB -+UNIT.OBJ -+CRT0DAT.OBJ;
b. To change the Windows dynamic-linked library, rename
CRT0DATD.OBJ to CRT0DAT.OBJ and type:
LIB LDLLFEW.LIB -+UNIT.OBJ -+CRT0DAT.OBJ;
Additional query words:
Keywords : kbfile
Last Reviewed: December 10, 1998