ROR LIST DIVISIONS

TITLEVALUE
NAMEROR LIST DIVISIONS
DESCRIPTIONThe ROR LIST DIVISIONS remote procedure returns a list of divisions
defined in the MEDICAL CENTER DIVISION file (#40.8).
TAGDIVLIST
ROUTINERORRP015
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERPART
DESCRIPTIONThe partial match restriction.
PARAMETER TYPELITERAL
REQUIRED
MAXIMUM DATA LENGTH30
INPUT PARAMETERSSEQUENCE NUMBER2
INPUT PARAMETERFLAGS
DESCRIPTIONFlags that control the execution (can be combined):

B Backwards. Traverses the index in the opposite
direction of normal traversal.
PARAMETER TYPELITERAL
REQUIRED
MAXIMUM DATA LENGTH
INPUT PARAMETERSSEQUENCE NUMBER3
INPUT PARAMETERNUMBER
DESCRIPTIONMaximum number of entries to return. A value of "*" or no value in this
parameter designates all entries.
PARAMETER TYPELITERAL
REQUIRED
MAXIMUM DATA LENGTH
INPUT PARAMETERSSEQUENCE NUMBER4
INPUT PARAMETERFROM
DESCRIPTIONThe index entry(s) from which to begin the list
^01: FromName
^02: FromIEN

For example, a FROM value of "VA" would list entries following VA. You can
use the 2-nd and 3-rd "^"- pieces of the @RESULTS@(0) node to continue the
listing in the subsequent procedure calls.

NOTE: The FROM value itself is not included in the
resulting list.

See description of the LIST^DIC for more details about the PART, NUMBER
and FROM parameters.
PARAMETER TYPELITERAL
REQUIRED
MAXIMUM DATA LENGTH
RETURN VALUE TYPEGLOBAL ARRAY
RETURN PARAMETER DESCRIPTIONA negative value of the first "^"-piece of the Results[0] indicates that
an error occurred during the execution of the remote procedure. In this
case, the second piece of the Results[0] will contain number of the error
descriptors returned in the subsequent nodes of the Results array:

Results[0] Result Descriptor
^01: The last error code
^02: Number of the error descriptors

Results[i] Error Descriptor
^01: Error code
^02: Message
^03: Place of the error

Otherwise, number of divisions and the value of the FROM parameter for the
next procedure call are returned in the Results[0] and the subsequent
nodes of the global array contain the divisions.

Results[0] Result Descriptor
^01: Number of divisions
^02: FromName
^03: FromIEN

Results[i] Division
^01: IEN
^02: Name
^03: Facility Number
^04: Institution IEN

Example:

// Get the list of divisions (10 items at a time), which
// names start with the 'S'

repeat
with RPCBroker do
begin
Param[0].Value := 'S';
Param[0].PType := literal;
Param[1].Value := '';
Param[1].PType := literal;
Param[2].Value := '10';
Param[2].PType := literal;
Param[3].Value := Piece(Results[0],'^',2,3);
Param[3].PType := literal;
Call;
end;

n := StrToIntDef(Piece(Results[0],'^'), 0);
for i:=1 to n do
// Process the division record (Results[i])
...
until Piece(Results[0],'^',2) = '';
AVAILABILITYRESTRICTED
INACTIVE
CLIENT MANAGER
WORD WRAP ONTRUE
VERSION1
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED