Re: Passing parameter when loading a Fortran program

Article View: comp.lang.fortran

Article #6583

#6583

From: JR
Date: Thu, 04 Dec 1997 00:00

55 lines
2099 bytes

This may not be exactly what you want, but it may point you in the right
direction.  NARGS and GETARG are Fortran internal functions for querying
command line arguments.

JR




      SUBROUTINE INFILE(FILE)
      INTEGER*4 NA
      CHARACTER*20 FILE

* QUERY COMMAND LINE FOR INPUT DATA FILE NAME  

      NA=NARGS()
      IF(NA.EQ.1) GO TO 10
      CALL GETARG(1,FILE,NL)
      IF(NL.GT.20) STOP 'STOP - Filename entered on command line is longer
than 20 characters!'
      RETURN
   10 FILE='                    '
      RETURN
      END                                         

      SUBROUTINE FLEN(F,N)
      CHARACTER*20 F

* DETERMINE NUMBER OF CHARACTERS IN FILENAME       

      DO 10 I=1,20
      N=21-I
      IF(F(N:N).EQ.' '    ) GO TO 10
      IF(F(N:N).EQ.CHAR(0)) GO TO 10
      RETURN
   10 CONTINUE
      RETURN
      END

DMASYB <dmasyb@email.msn.com> wrote in article
<eO0dwSAA9GA.264@upnetnews04>...
> Can anyone help me with this:  How to pass a parameter to a program when
> loading it.
> For example:  Program name is ANYPROG.EXE
> The parameter is PARAM1
> I want to execute the program like this:
> 
> ANYPROG.EXE   PARAM1
> 
> Any help would be greatly appreciated.
> Thanks.
> 
> 
>

Technical Details

Message-ID: <01bd0071$af6554c0$a5fbadcd@jrichard.iamerica.net>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

References: <eO0dwSAA9GA.264@upnetnews04>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fcffb,5596e8b35b5f590
X-Google-Attributes: gidfcffb,public
X-Google-Thread: f9607,5596e8b35b5f590
X-Google-Attributes: gidf9607,public
X-Google-Thread: 1094ba,5596e8b35b5f590
X-Google-Attributes: gid1094ba,public
X-Google-Thread: 167b2b,5596e8b35b5f590
X-Google-Attributes: gid167b2b,public
X-Google-Thread: f754b,5596e8b35b5f590
X-Google-Attributes: gidf754b,public
From: "JR" <jrichard@iamerica.net>
Subject: Re: Passing parameter when loading a Fortran program
Date: 1997/12/04
Message-ID: <01bd0071$af6554c0$a5fbadcd@jrichard.iamerica.net>
X-Deja-AN: 295073869
References: <eO0dwSAA9GA.264@upnetnews04>
Organization: LDS-iAmerica, ISP
Newsgroups: comp.lang.fortran,fj.lang.fortran,microsoft.public.fortran,slac.lang.fortran,tw.bbs.comp.lang.fortran

Reply to Parent Message