799.51 (375)    INDEX (.11)

Name Value
FILE 799.51
NAME ARDG
DESCRIPTION
This cross-reference creates the relation between ROR Registry and 
ROR Generic entry and it's checked during Patient Medication History
report.
SHORT DESCRIPTION Registry & Drug Group
TYPE REGULAR
EXECUTION RECORD
ACTIVITY IR
USE SORTING ONLY
ROOT TYPE INDEX FILE
ROOT FILE 799.51
SET LOGIC S ^ROR(799.51,"ARDG",X(2),X(3),DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   799.51
    FIELD:   .02
    COLLATION:   forwards
  • ORDER NUMBER:   3
    SUBSCRIPT NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   799.51
    FIELD:   .04
    COLLATION:   forwards
  • ORDER NUMBER:   2
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   COMPUTED VALUE
    COMPUTED CODE:   S X=$S(X(1)'="":X(1)_"#",1:"")
KILL LOGIC K ^ROR(799.51,"ARDG",X(2),X(3),DA)
KILL ENTIRE INDEX CODE K ^ROR(799.51,"ARDG")