139.5 (549)    INDEX (.11)

Name Value
FILE 139.5
NAME AF
DESCRIPTION
This cross reference lists transplant assessments according to their 
type, their assessment status, the patient's DFN and the internal entry 
number (IEN) in the SURGERY TRANSPLANT ASSESSMENTS file (#139.5). This 
cross reference is used by the transmission routine SRTPMIT to identify 
which transplant assessments are COMPLETE and thus ready for 
transmission. The cross reference list of assessments is updated when the 
ASSESSMENT STATUS field (#181) is changed.
SHORT DESCRIPTION This is a sort index of the TRANSPLANT TYPE, ASSESSMENT STATUS & DFN
TYPE REGULAR
EXECUTION RECORD
ACTIVITY IR
USE SORTING ONLY
ROOT TYPE INDEX FILE
ROOT FILE 139.5
SET LOGIC S ^SRT("AF",X(1),X(2),X(3),DA)=""
SET CONDITION CODE S X=(X(1)'="")
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   139.5
    FIELD:   182
    COLLATION:   forwards
  • ORDER NUMBER:   2
    SUBSCRIPT NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   139.5
    FIELD:   181
    COLLATION:   forwards
  • ORDER NUMBER:   3
    SUBSCRIPT NUMBER:   3
    TYPE OF VALUE:   FIELD
    FILE:   139.5
    FIELD:   .01
    COLLATION:   forwards
KILL LOGIC K ^SRT("AF",X(1),X(2),X(3),DA)
KILL CONDITION CODE S X=(X(1)'="")
KILL ENTIRE INDEX CODE K ^SRT("AF")