Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.3 4.3bsd-beta 6/6/85; site ucbvax.BERKELEY.EDU
Path: utzoo!decvax!ucbvax!CS.UCL.AC.UK!CHAA006%vaxa.rhbnc.ac.uk
From: CHAA006%vaxa.rhbnc.ac.uk@CS.UCL.AC.UK
Newsgroups: mod.computers.vax
Subject: Lib$ routine fails
Message-ID: <8608140221.AA14258@ucbvax.Berkeley.EDU>
Date: Wed, 13-Aug-86 22:21:46 EDT
Article-I.D.: ucbvax.8608140221.AA14258
Posted: Wed Aug 13 22:21:46 1986
Date-Received: Thu, 14-Aug-86 01:30:44 EDT
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The ARPA Internet
Lines: 21
Approved: info-vax@sri-kl.arpa

The run-time library manual shews that the third parameter requires
MODIFY access.  The following code appears to work.

C       TEST OF LIB$FIND_FILE.
        CHARACTER*255 EXP
        CHARACTER*255 SPEC
        INTEGER LIB$FIND_FILE, zero
	data zero /0/
        SPEC = '*.CHR'
        IDUMMY = LIB$FIND_FILE(SPEC,EXP,zero)
        PRINT *,EXP(1:78)
        STOP
        END

Philip Taylor (RHBNC; University of London, U.K.)

Bitnet/NetNorth/Earn: 	CHAA006@VAXA.RHBNC.AC.UK or CHAA006%RHBNC.VAXA@AC.UK
	or	    :	CHAA006@VAXB.RHBNC.AC.UK or CHAA006%RHBNC.VAXB@AC.UK

       Arpa	    :	CHAA006%UK.AC.RHBNC.VAXA@ARPA.UCL-CS
	or	    :	CHAA006%UK.AC.RHBNC.VAXB@ARPA.UCL-CS