10.3  Lexical Function Example

  Lexical Function Example Command Procedure
  $  write  sys$output  ""
  $  write  sys$output  "Instance  =  ",f$getsyi("scsnode")
  $  write  sys$output  "Platform  =  ",f$getsyi("galaxy_platform")
  $  write  sys$output  "Sharing  Member  =  ",f$getsyi("galaxy_member")
  $  write  sys$output  "Galaxy  ID  =  ",f$getsyi("galaxy_id")

  $  write  sys$output  "Community  ID  =  ",f$getsyi("community_id")
  $  write  sys$output  "Partition  ID  =  ",f$getsyi("partition_id")
  $  write  sys$output  ""
  $  exit

  Lexical Function Command Procedure Output
  COBRA2$  @shoglx

  Instance  =  COBRA2
  Platform  =  1
  Sharing  Member  =  1
  Galaxy  ID  =  376172626F6320202020202020202020
  Community  ID  =  0
  Partition  ID  =  0

  COBRA2$