topic Read Input file from working directorly in Software Archive

Read Input file from working directorly

Intel_C_Intel — Wed, 18 Jul 2001 07:04:29 GMT

I'm working with a program which use Excel spreadsheet to take input data and write to an input file, then use a Fortran Console application to read that input file, perform some calculation and then write to several output files. The question is the location of the input file created by Excel may very. how could the Fortran Consonle application know where to find it. Is there anyway I could pass an argument or commnd line from Excel to Fortran exe.

Re: Read Input file from working directorly

Jugoslav_Dujic — Wed, 18 Jul 2001 18:12:01 GMT

Sure, see NARGS/GETARG:

 
PROGRAM Foo 
 
USE DFLIB 
 
CHARACTER (MAX_PATH)::     sDir="" 
 
IF (NARGS() .GT. 0) CALL GETARG(1, sDir)

and change all your open statements so that they look like:

 
OPEN (11, FILE=TRIM(sDir)//"input.txt")

HTH

Jugoslav

Re: Read Input file from working directorly

durisinm — Wed, 18 Jul 2001 20:52:18 GMT

You can also consider writing an Excel VBA macro to pass an argument directly to a Fortran DLL. You can probably change your console application to a DLL by changing its main program to a subroutine. If you do, though, the Fortran code shouldn't write any output to the console. The console won't exist unless the DLL explicitly creates it. Writing to and reading from files is OK.

Mike