Path: utzoo!utgpu!news-server.csri.toronto.edu!bonnie.concordia.ca!ccu.umanitoba.ca!herald.usask.ca!alberta!ubc-cs!uw-beaver!zephyr.ens.tek.com!uunet!math.fu-berlin.de!fub!geminix.in-berlin.de!tertius.in-berlin.de!gaertner
From: gaertner@tertius.in-berlin.de
Newsgroups: comp.lang.pascal
Subject: Re:  Check to see if file exists ????
Message-ID: <1991Jun5.120038.6567@tertius.in-berlin.de>
Date: 5 Jun 91 12:00:38 GMT
Lines: 19

Hi,

I don't read the orginal question, only the reply.

The easiest way to check (in VAX Pascal) whether the file exists is to use
the STATUS function:

   OPEN(...,FILE_VARIABLE:=file_var,FILE_NAME:=file_name,HISTORY:=OLD,
        ERROR:=CONTINUE,...) ;
   open_stat := STATUS(file_var) ;

Another way is to use the system routine  LIB$FIND_FILE.

Ralf

--

   Ralf Gaertner                   gaertner@venus.rz-berlin.mpg.de
   FHI Berlin