Path: utzoo!mnetor!uunet!mcvax!ukc!stl!stc!btnix!crouch From: crouch@btnix.UUCP (Chris Rouch) Newsgroups: comp.os.vms Subject: Re: RE: Testing for a node Message-ID: <714@btnix.UUCP> Date: 31 Mar 88 01:01:02 GMT References: Lines: 35 From article , by jj1h+@ANDREW.CMU.EDU (Joseph Jackson): > > I was recently working on a DCL procedure and needed to see if a node > was available enough to let me access various files on its system > disk. I recalled this quick and nifty method that a manager once > showed me. If a node is there, then you can expect to find this file: > > nodename::DUA0:[000000]000000.DIR > > That is, the root directory file on the disk DUA0:. This is the line > that I used to assign a "boolean" DCL symbol used as the condition of > a later IF statement: > > Node_down = F$Search ("''Nodename'::DUA0:[000000]000000.dir") .eqs. "" > > This assumes that every DECnetted machine has a disk called DUA0:. > Hopefully, I'm not completely off-base in this respect! > Unfortunately this is not always the case. Our 785 for instance has all its disks as DRxx. Also, wildcards are not allowed aas part of the disk name. I s'pose you could always look for both types, but then there might be even more valid formats that you would need to test. Chris Rouch -------------------------------------------------------------------------------- vax to vax (UUCP) CRouch@axion.bt.co.uk (...!ukc!btnix!crouch) desk to desk RT3124, 310 SSTF, British Telecom Research Laboratories, Martlesham Heath, IPSWICH, IP5 7RE, UK. voice to voice +44 473 646093 "Ours is not to look back, ours to continue the crack." --------------------------------------------------------------------------------