Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!sharkey!math.lsa.umich.edu!zaphod.mps.ohio-state.edu!brutus.cs.uiuc.edu!psuvax1!psuvm!ALBNYVM1!BEC
From: BEC@ALBNYVM1.BITNET (Ben Chi)
Newsgroups: bit.listserv.mailbook
Subject: Re: setting NAMES in MAILUSER XEDIT
Message-ID: <900203.234724.EST.BEC@ALBNYVM1.BITNET>
Date: 4 Feb 90 04:47:24 GMT
Sender: MAIL/MAILBOOK subscription list <MAILBOOK@RICEVM1>
Reply-To: MAIL/MAILBOOK subscription list <MAILBOOK@RICEVM1>
Organization: University at Albany Computing Services
Lines: 30
Approved: NETNEWS@PSUVM Gateway
X-Acknowledge-To: <BEC@ALBNYVM1.BITNET>
In-Reply-To:  Message of Sat, 3 Feb 90 20:28:21 EST from <TOMHO@PURCCVM>

On Sat, 3 Feb 90 20:28:21 EST Thomas I. M. Ho said:
>In MAILUSER XEDIT, I want to specify several names files in addition to
>userid.  I'm trying to set up a "generic" MAILUSER XEDIT for all of my
>users so that each user doesn't have to put his own userid literally into
>his own copy of MAILUSER XEDIT. . .

If your goal is for each user to access his own NAMES file, and also pub-
lic NAMES files XXX NAMES and YYY NAMES,

"SETMAIL NAMES" USERID() "XXX YYY"

surely should do it (as was pointed out on this list a few weeks ago).

If you want to be a little more elegant (and allow for the possibility
that some user may not have accessed the minidisk containing XXX and/or
YYY, you can do the following in your MAILUSER XEDIT:

nameFileList = USERID() "XXX YYY"   /* List of NAMES files to search. */

"SET CMSTYPE HT"
x = ""
DO i = 1 TO WORDS(nameFileList)
  y = WORD(nameFileList,i)
  ADDRESS CMS "STATE" y "NAMES *"
  IF RC = 0 THEN x = x y
END
"SET CMSTYPE RT"
"SETMAIL NAMES" x

I picked up this idea from Grant Harders, a member of our staff.