Do you have MPEX?  If so, the VEFINFO function will return the information
you need, provided that the actual file designator (the right side of the
file equation) is fully qualified:

     :file myfile=yourfile.yourgroup.youracct

     :mpex
     %  calc vefinfo("*myfile").group
      yourgroup          <----     value returned by VEFINFO
     %  calc vefinfo("*myfile").account
     youracct         <----     value returned by VEFINFO

You may also use %setvar to place the VEFINFO values into variables which
you can then reference from your programs ... or just use the default
HPRESULT variable set by the %calc command.

Lee Gunter
Regence Blue Cross Blue Shield of Oregon / Regence HMO Oregon

mailto:[log in to unmask]
voice...503-375-4498    fax.....503-375-4401
==========================================================
The opinions expressed, here, are mine and mine alone, and do not
necessarily reflect those of my employer.




From: [log in to unmask] on 01/07/98 09:39 AM

Please respond to [log in to unmask]


To:   [log in to unmask]
cc:    (bcc: Lee Gunter/BCBSO/TBG)
Subject:  Location of a File-Equated File




Anybody got any ideas on how to find the "real" group & account of a file
that has been file equated?

<snip>