DSIC ACTIVE USER LIST (1646)    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.
 
It is the programmers responsibility to ensure that the total length of 
the date returned in each return value does not exceed 250 characters.

• 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("DSIC",$J,"DILIST",n,0).
     p4 - sig block title          p8 = service
 
If problems are encountered, then return
  ^TMP("DSIC",$J,"DILIST",1,0) = -1^message
  If additional messages are provided then they will be at
    ^TMP("DSIC",$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("DSIC",$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
     p3 = sig block printed name   p7 = title