DSIV ACTIVE USER LIST (3345)    REMOTE PROCEDURE (8994)

This will return a list of active users matching the lookup value. You 
can pass in additional screening logic if so desired, such as security 
keys.

• VAL
  PARAMETER TYPE:   LITERAL
  MAXIMUM DATA LENGTH:   50
  REQUIRED:   YES
  SEQUENCE NUMBER:   1
  DESCRIPTION:   

  This is the lookup value to find matches in file 200.
  

• SCR
  PARAMETER TYPE:   LIST
  MAXIMUM DATA LENGTH:   250
  REQUIRED:   NO
  SEQUENCE NUMBER:   2
  DESCRIPTION:   

  This RPC will return a list of active users. You may wish additional 
  screening to occur. For example, return all active users matching SMITH
  who also own a particular security key.  Acceptable format of SCR():
     SCR(n) = KEY^<security key name>
     SCR(n) = PARM^<parameter name>^<parameter instance>
     SCR(n) = M^<return text>^<executable M code that sets $T>
  

 Data will be returned in ^TMP("DSIV",$J,"DILIST",n,0).
      p3 = sig block printed name   p7 = title
      p4 - sig block title          p8 = service
 
 If problems are encountered, then return
   ^TMP("DSIV",$J,"DILIST",1,0) = -1^message
   If additional messages are provided then they will be at
     ^TMP("DSIV",$J,"DILIST",n,0) = message   for n=2,3,4,5,...
 
 If $Piece(List[0],"^",1) := -1 then there were problems, else the lookup
 was successful.
 
 If a successful find for the lookup value, then return the following 
data:
   ^TMP("DSIV",$J,"DILIST",n,0) = p1^p2^p3^...^p8  for n=1,2,3,4,...
      for the GUI, you will have List[n] := p1^p2^...^p8 for n=0,1,2,3,...
      where
      p1 = ien                      p5 = first m last   p9 = division
      p2 = name (.01 field)         p6 = initials