STANDARD DATA DICTIONARY #64.6 -- INTERIM REPORTS FILE 3/24/25 PAGE 1
STORED IN ^LAB(64.6, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file is used to define whether or not your site will be generating interim reports of patient lab values and to what locations
these reports will be sent or routed. Interim reports are defined as hard copy print- outs of a patient's test results which are
generated between the times that the permanent chart copy (cumulative) is printed and made available. The entries in the fields of
this file also let you determine whether or not to generate these interim reports automatically upon verification of the results in
the lab, and specify the device (printer) for any of the reports to print on at a given location. NOTE: In order to have ANY
location receive automatically generated interims, you must fill in the field 'Queue verified test(s) notice' in the LABORATORY
SITE file (#69.9) with 'YES'.
IDENTIFIED BY: DEVICE (#3)[R]
CROSS
REFERENCED BY: DEVICE(AD), LOCATION(AI), INTERIM REPORTING(AI), IMMEDIATELY TRANSMIT RESULTS(AS), LOCATION(AS1), LOCATION(B)
64.6,.01 LOCATION 0;1 POINTER TO HOSPITAL LOCATION FILE (#44) (Required)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,2)]""""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: MAR 05, 1991
DESCRIPTION:
This is the ward or clinic that will be receiving interim reports.
SCREEN: S DIC("S")="I $P(^(0),U,2)]"""""
EXPLANATION: Can use only locations that have abbreviations.
CROSS-REFERENCE: 64.6^B
1)= S ^LAB(64.6,"B",$E(X,1,30),DA)=""
2)= K ^LAB(64.6,"B",$E(X,1,30),DA)
CROSS-REFERENCE: ^^TRIGGER^64.6^5
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LAB(64.6,D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S D
IU=X K Y S X=DIV S X=$P($G(^SC(+X,0)),U,2) X ^DD(64.6,.01,1,2,1.4)
1.1)= S X=DIV S X=$S($L($P($G(^SC(+X,0)),U,2)):$P(^(0),U,2),1:"UNK")
1.4)= S DIH=$S($D(^LAB(64.6,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,6)=DIV,DIH=64.6,DIG=5 D ^DICR:$
O(^DD(DIH,DIG,1,0))>0
2)= Q
CREATE VALUE)= S X=$P($G(^SC(+X,0)),U,2)
DELETE VALUE)= NO EFFECT
FIELD)= LOCATION ABB
CROSS-REFERENCE: 64.6^AI^MUMPS
1)= S:$P(^LAB(64.6,DA,0),U,3) ^LAB(64.6,"AI",$P(^LAB(64.6,DA,0),U,6),DA)=""
2)= K:$P(^LAB(64.6,DA,0),U,3) ^LAB(64.6,"AI",$P(^LAB(64.6,DA,0),U,6),DA)
CROSS-REFERENCE: 64.6^AS1^MUMPS
1)= S:$P(^LAB(64.6,DA,0),U,2) ^LAB(64.6,"AS",$P(^LAB(64.6,DA,0),U,6),DA)=""
2)= K:$P(^LAB(64.6,DA,0),U,2) ^LAB(64.6,"AS",$P(^LAB(64.6,DA,0),U,6),DA)
64.6,1 IMMEDIATELY TRANSMIT RESULTS 0;2 SET
'1' FOR YES;
'0' FOR NO;
LAST EDITED: MAR 05, 1991
DESCRIPTION: If this field is yes, all new data when verified will be transmitted to the device identified for
the given location.
CROSS-REFERENCE: 64.6^AS^MUMPS
1)= S:X ^LAB(64.6,"AS",$P(^LAB(64.6,DA,0),U,6),DA)=""
2)= K ^LAB(64.6,"AS",$P(^LAB(64.6,DA,0),U,6),DA)
64.6,2 INTERIM REPORTING 0;3 SET
'1' FOR YES;
'0' FOR NO;
LAST EDITED: MAR 05, 1991
DESCRIPTION: If this field is yes, the interim reports tasked by TaskMan, will transmit all verified data for
the current day appropriate for the location.
CROSS-REFERENCE: 64.6^AI^MUMPS
1)= S:X ^LAB(64.6,"AI",$P(^LAB(64.6,DA,0),U,6),DA)=""
2)= K ^LAB(64.6,"AI",$P(^LAB(64.6,DA,0),U,6),DA)
64.6,3 DEVICE 0;4 POINTER TO DEVICE FILE (#3.5) (Required)
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X I $D(X) S DIC(0)="EMQ" D ^DIC S X=$P(Y,U,2),DIC=DIE K:Y<1 X
LAST EDITED: APR 30, 1987
HELP-PROMPT: ENTER THE NAME OF THE DEVICE TO PRINT THIS REPORT ON
DESCRIPTION:
The default device to print the interim report on.
EXECUTABLE HELP: S X="?",DIC(0)="Q",DIC="^%ZIS(1,",PDO(2)=$S($D(DO(2)):DO(2),1:"") D ^DIC S DO(2)=PDO(2) K DIC,PDO(2
)
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 64.6^AD
1)= S ^LAB(64.6,"AD",$E(X,1,30),DA)=""
2)= K ^LAB(64.6,"AD",$E(X,1,30),DA)
64.6,4 URGENCY CUTOFF 0;5 POINTER TO URGENCY FILE (#62.05)
INPUT TRANSFORM: S DIC("S")="I '$P(^(0),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: AUG 05, 1993
DESCRIPTION: This field is used when lab results are verified and immediately reported/printed on a ward. If
this field is left blank, all tests of all urgencies will be reported. If an urgency is entered in
this field, that urgency along with all higher urgencies will be reported to the ward leaving all
lower urgencies not immediately reported.
SCREEN: S DIC("S")="I '$P(^(0),U,3)"
EXPLANATION: Prevent the selection of WKLD urgency
64.6,5 LOCATION ABBREVIATION 0;6 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: MAR 05, 1991
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
This field contains the printable short name for the location.
WRITE AUTHORITY: ^
NOTES: TRIGGERED by the LOCATION field of the INTERIM REPORTS File
64.6,6 DOMAIN NAME 0;7 POINTER TO DOMAIN FILE (#4.2)
LAST EDITED: APR 02, 1997
HELP-PROMPT: If this location is a referring site then enter that's site Domain name.
DESCRIPTION:
This field is used to identify the Referring Site.
FILES POINTED TO FIELDS
DEVICE (#3.5) DEVICE (#3)
DOMAIN (#4.2) DOMAIN NAME (#6)
HOSPITAL LOCATION (#44) LOCATION (#.01)
URGENCY (#62.05) URGENCY CUTOFF (#4)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):