$ UIC = F$USER()
  $ SHOW SYMBOL UIC
    UIC = "[GROUP6,JENNIFER]"

      In this example, the F$USER function returns the current user
      identification code and assigns it to the symbol UIC.