130 (388)    INDEX (.11)

Name Value
FILE 130
NAME AESP
DESCRIPTION 
This cross reference is responsible for creating a stub entry in TIU for
the non-OR procedure report when the TIME PROCEDURE ENDED field (#122) is
entered and the DICTATED SUMMARY EXPECTED field (#1004) is set to YES.  It
is also responsible for deleting the stub entry in TIU for this report, if
unsigned, when the TIME PROCEDURE ENDED field (#122) is deleted or if the
DICTATED SUMMARY EXPECTED field (#1004) is deleted or  changed to NO.  No
action occurs if the value in the TIME PROCEDURE ENDED field (#122) is
modified.
SHORT DESCRIPTION Create/delete stub entries in TIU for procedure reports (non-OR).
TYPE MUMPS
EXECUTION RECORD
USE ACTION
ROOT TYPE INDEX FILE
ROOT FILE 130
SET LOGIC D AESP^SROESXP
SET CONDITION CODE S X=$$SCOND^SROESXP(.X1,.X2)
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   130
    FIELD:   122
    COLLATION:   forwards
  • ORDER NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   130
    FIELD:   1004
    COLLATION:   forwards
KILL LOGIC D KAESP^SROESXP
KILL CONDITION CODE S X=$$KCOND^SROESXP(.X1,.X2)