Examples

   1.$ NAME = F$GETJPI("3B0018","USERNAME")
     $ SHOW SYMBOL NAME
       NAME = "JANE        "

     This example shows how to use the F$GETJPI function to return
     the user name for the process number 3B0018. The user name is
     assigned to the symbol NAME.

   2.$ X=F$ENVIRONMENT("MESSAGE")
     $ SHOW SYMBOL X
       X = "/FACILITY/SEVERITY/IDENTIFICATION/TEXT"
     $ X=F$GETJPI("0","MSGMASK")
     $ SHOW SYMBOL X
       X = 15   Hex = 0000000F  Octal = 00000000017
     $ SET MESSAGE /NOFACILITY
     $ X=F$ENVIRONMENT("MESSAGE")
     $ SHOW SYMBOL X
       X = "/NOFACILITY/SEVERITY/IDENTIFICATION/TEXT"
     $ X=F$GETJPI("0","MSGMASK")
     $ SHOW SYMBOL X
       X = 7   Hex = 00000007  Octal = 00000000007
     $ SET MESSAGE /FACILITY
     $ X=F$ENVIRONMENT("MESSAGE")
     $ SHOW SYMBOL X
       X = "/FACILITY/SEVERITY/IDENTIFICATION/TEXT"
     $ X=F$GETJPI("0","MSGMASK")
     $ SHOW SYMBOL X
       X = 15   Hex = 0000000F  Octal = 00000000017
     $

     This example shows the use of the F$GETJPI MSGMASK item.