In the following example, the MAP_PROFILE_FILENAME subroutine
      described in the PMDF popstore & MessageStore Manager's Guide
      is tested with the TEST/PROFILE_MAPPING command on an OpenVMS
      Alpha system.

 $ DEFINE/SYSTEM/EXECUTIVE_MODE POP_MAP_PROFILES -
 _$      DISK3:[IMAGES]MAP_PROFILES.EXE
 $ CC MAP_PROFILES.C
 $ LINK/SHAREABLE=POP_MAP_PROFILES MAP_PROFILES.OBJ,SYS$INPUT:/OPT
 SYMBOL_VECTOR=(map_profile_filename=PROCEDURE)
 <CTRL/Z>

 $ INSTALL CREATE POP_MAP_PROFILES
 $ PMDF POPSTORE
 popstore> TEST/PROFILE_MAPPING POP_MAP_PROFILES
 PMDF_POPSTORE_PROFILES:[C.R.W]CRW.;1 -> DISK0:[PROFILES.C.R.W]CRW.;
 PMDF_POPSTORE_PROFILES:[D.A.D]DAVID.;1 -> DISK0:[PROFILES.D.A.D]DAVID.;
 PMDF_POPSTORE_PROFILES:[D.A.N]DAN.;1 -> DISK0:[PROFILES.D.A.N]DAN.;
 PMDF_POPSTORE_PROFILES:[D.E.T]DEFAULT.;1 -> DISK0:[PROFILES.D.E.T]DEFAULT.;
 PMDF_POPSTORE_PROFILES:[K.E.N]KEVIN.;1 -> DISK0:[PROFILES.K.E.N]KEVIN.;
 PMDF_POPSTORE_PROFILES:[K.R.N]KRISTIN.;1 -> DISK0:[PROFILES.K.R.N]KRISTIN.;
 PMDF_POPSTORE_PROFILES:[P.E.E]PEKIE.;1 -> DISK1:[PROFILES.P.E.E]PEKIE.;
 PMDF_POPSTORE_PROFILES:[T.E.T]TEST.;1 -> DISK1:[PROFILES.T.E.T]TEST.;
 popstore>