RORICR PATIENT SAVE

TITLEVALUE
NAMERORICR PATIENT SAVE
DESCRIPTIONThe RORICR PATIENT SAVE remote procedure updates the patient's record in
the registry (or creates one).
TAGSAVE
ROUTINERORRP034
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERREGIEN
DESCRIPTIONThe REGIEN parameter should contain a valid registry IEN (IEN of the
registry parameters record in the ROR REGISTRY PARAMETERS file #798.1).
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH
INPUT PARAMETERSSEQUENCE NUMBER2
INPUT PARAMETERPATIEN
DESCRIPTIONA valid patient IEN (DFN) should be assigned to the PATIEN parameter.
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH
INPUT PARAMETERSSEQUENCE NUMBER3
INPUT PARAMETERCANCEL
DESCRIPTIONCancel the update and unlock the patient's registry data.
PARAMETER TYPELITERAL
REQUIRED
MAXIMUM DATA LENGTH
INPUT PARAMETERSSEQUENCE NUMBER4
INPUT PARAMETERDATA
DESCRIPTIONA list that contains the data in the same format as the output of the
RORICR PATIENT LOAD remote procedure. Only PH and ICR segments are
processed; the others are ignored.

Example:

with RPCBroker do
begin
RemoteProcedure:= 'RORICR PATIENT LOAD';
Param[0].Value := RegistryIEN;
Param[0].PType := literal;
Param[1].Value := DFN;
Param[1].PType := literal;
lstCall(PatientData); // Load the data

... // Edit the data

RemoteProcedure:= 'RORICR PATIENT SAVE';
Param[0].Value := RegistryIEN;
Param[0].PType := literal;
Param[1].Value := DFN;
Param[1].PType := literal;
Param[2].PType := list;
Param[2].Mult.Assign(PatientData);
Call; // Save the data
end;

NOTE: Only those items of the list are processed
that have numeric subscripts greater than 0;
all others are ignored.
PARAMETER TYPELIST
REQUIREDYES
MAXIMUM DATA LENGTH
RETURN VALUE TYPEARRAY
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

A positive value of the first "^"-piece of the Results[0] indicates an
error in the data. The value is the number of the erroneous piece of the
data segment whose name is returned in the second piece of the Results[0].
For example, the "16^PH" means that the 16th piece of the PH data segment
(DATE OF FIRST TRANSFUSION) contains an invalid value.

Otherwise, zero is returned in the Results[0].
AVAILABILITYRESTRICTED
INACTIVE
CLIENT MANAGER
WORD WRAP ONTRUE
VERSION1
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED