798 (366)    INDEX (.11)

Name Value
FILE 798
NAME ARP
DESCRIPTION
This cross-reference lists the registry patients. 
associated with the specified registry.
 
The <Patient> is the IEN of the patient's record 
in the ROR PATIENT file.
It has the following structure:
 
 ^RORDATA(798,"ARP",<Registry>,<Patient>,IEN)
 
The <Registry> is the registry IEN (IEN of the 
registry parameters record in the ROR REGISTRY
PARAMETERS file) concatenated with the "#" so that
the LIST^DIC can be used to retrieve the records
SHORT DESCRIPTION Registry & Patient
TYPE REGULAR
EXECUTION RECORD
ACTIVITY IR
USE SORTING ONLY
ROOT TYPE INDEX FILE
ROOT FILE 798
SET LOGIC S ^RORDATA(798,"ARP",X(2),X(3),DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   798
    FIELD:   .02
  • ORDER NUMBER:   2
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   COMPUTED VALUE
    COMPUTED CODE:   S X=$S(X(1)'="":X(1)_"#",1:"")
    COLLATION:   forwards
  • ORDER NUMBER:   3
    SUBSCRIPT NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   798
    FIELD:   .01
    COLLATION:   forwards
KILL LOGIC K ^RORDATA(798,"ARP",X(2),X(3),DA)
KILL ENTIRE INDEX CODE K ^RORDATA(798,"ARP")