130 (386)    INDEX (.11)

Name Value
FILE 130
NAME AES8
DESCRIPTION
This cross-reference is responsible for updating the REFERENCE DATE field 
(#1301) in the TIU DOCUMENT file (#8925) for all Reports when the 
DATE OF OPERATION field (#9) in the SURGERY file (#130) is edited.
SHORT DESCRIPTION Update TIU when Date of Operation is changed.
TYPE MUMPS
EXECUTION FIELD
ACTIVITY IR
USE ACTION
ROOT TYPE INDEX FILE
ROOT FILE 130
SET LOGIC D AES8^SROESX0 Q
SET CONDITION CODE S X=((X1(1)'=X2(1))&(X2(1)'=""))
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   130
    FIELD:   .09
    COLLATION:   forwards
KILL LOGIC Q