70 (825)    INDEX (.11)

Name Value
FILE 70
NAME AD
DESCRIPTION
If the diagnostic code record in the radiology DIAGNOSTIC CODES (#78.3)
has the data attribute for field: PRINT ON ABNORMAL REPORT (#3) set to
'Y' (yes) then the "AD" cross-reference will be set for this exam record
to indicate that this case should be identified on the Abnormal Report.

NOTE: When this field is edited the DIAGNOSTIC PRINT DATE (#20) field is
deleted!
SHORT DESCRIPTION The 'AD' is used to mark cases eligible for the Abnormal Report option.
TYPE MUMPS
EXECUTION FIELD
ACTIVITY IR
USE SORTING ONLY
ROOT TYPE WHOLE FILE
ROOT FILE 70.03
SET LOGIC S:$P($G(^RA(78.3,X2(1),0)),U,3)="Y" ^RADPT("AD",X2(1),DA(2),DA(1),DA)=""
SET CONDITION CODE S:X2(1)'="" X=1
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   70.03
    FIELD:   13
KILL LOGIC D:($D(X1(1))#2) PRIDXIXK^RADD2(.DA,X1(1))
KILL CONDITION CODE S:X1(1)'="" X=1