STANDARD DATA DICTIONARY #195.4 -- RECORD TRACKING SYSTEM PARAMETERS FILE 9/29/25 PAGE 1
STORED IN ^DIC(195.4, (2 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
CROSS
REFERENCED BY: NAME(B), MAS TRACKING APPLICATION(MAS), RADIOLOGY TRACKING APPLICATION(RAD)
195.4,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:X'="OVERALL PARAMETERS"&(X'="MISSING RECORD") X
LAST EDITED: MAY 02, 1994
HELP-PROMPT: Enter one of the choices from the list above.
DESCRIPTION:
This defines parameters that are used through out the system and applications.
DELETE TEST: 1,0)= I 1 W *7,!,"CAN'T DELETE THIS ENTRY"
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 195.4^B
1)= S ^DIC(195.4,"B",$E(X,1,30),DA)=""
2)= K ^DIC(195.4,"B",$E(X,1,30),DA)
195.4,2 QUEUE THRESHOLD 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 30, 1987
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 9999
DESCRIPTION: This number is the number of records that can be charged-out or check-in at one time before the
system queue's the job to process in the backround.
195.4,3 NULL QUEUING DEVICE 0;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>40!($L(X)<1) X D PRT^RTDPA3:$D(X)
LAST EDITED: MAY 14, 1987
HELP-PROMPT: ANSWER MUST BE 1-40 CHARACTERS IN LENGTH
DESCRIPTION: This defines a non-sharable device in the device file which limits the number of requests that are
processed simultaneously by the task manager.
EXECUTABLE HELP: D HELP^RTDPA3
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
195.4,4 OPERATING CONDITIONS 0;4 SET (Required)
'n' FOR NORMAL;
'e' FOR EMERGENCY(NORMAL COMPUTER DOWN);
LAST EDITED: APR 07, 1987
DESCRIPTION: This field contains the hardware conditions parameter that tells the system the type of operating
conditions that are in effect. The available conditions are: 'N' for normal and 'E' for emergency.
Under NORMAL conditions, the system uses the parameters set up in the files 195.1, 195.2, 195.9 to
determine which input and printer devices to use. Under EMERGENCY conditions, the system ignores
all the location parameters set up and the user is prompted for this information.
195.4,5 BATCH RECORD,XRAY REQUESTS 0;5 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: APR 12, 1988
HELP-PROMPT: Enter Yes to Batch requests, No to process immediately
DESCRIPTION: No means Appointments for clinics which require records, and/or xrays cause Requests for Records to
be processed immediately through the taskmanager, null queuing device, in the background.
YES means clinic Requests for Records are not made until the clinic requests option is run at
night.
SOURCE OF DATA: Site manager
195.4,6 BATCH REQUESTS CUTOFF (days) 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: APR 12, 1988
HELP-PROMPT: Enter a digit from 1 to 9
DESCRIPTION: This defines the number of days in the future that the clinic request option should look for clinic
requests for records and/or xrays.
195.4,8 OK TO PURGE REQUESTS? 0;8 SET
'y' FOR YES;
'n' FOR NO;
LAST EDITED: APR 28, 1987
DESCRIPTION:
YES means the purge option will purge requests.
195.4,10 OK TO PURGE PULL LISTS? 0;10 SET
'y' FOR YES;
'n' FOR NO;
LAST EDITED: APR 28, 1987
DESCRIPTION:
YES means the purge option will purge pull lists.
195.4,12 OK TO PURGE MOVEMENT LOGS? 0;12 SET
'y' FOR YES;
'n' FOR NO;
LAST EDITED: APR 28, 1987
DESCRIPTION:
YES means the purge option will purge movements.
195.4,20 LABEL PRINTER COOLER COOL;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: APR 09, 1988
HELP-PROMPT: Enter a number from 0 to 99.
DESCRIPTION: This defines the number of minutes the program will hang every 100 records when printing barcodes
to allow the printer to relax. It is dynamic.
SOURCE OF DATA: site manager
195.4,30 INSTITUTION/STATION NUMBER SITE;1 FREE TEXT
INPUT TRANSFORM: S DIC="^DIC(4,",DIC(0)="ENM" D ^DIC K DIC K:Y=-1 X I $D(X) S X=+$P(^DIC(4,+Y,99),"^")
LAST EDITED: MAY 08, 1991
HELP-PROMPT: Enter your Station Number in the Institution file
DESCRIPTION: This field should contain the Station Number of the site. It is usually the same as the
^DD("SITE")
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
195.4,100 MAS INTERFACE STATUS UP;1 SET
'0' FOR DOWN;
'1' FOR UP;
LAST EDITED: SEP 18, 1986
DESCRIPTION: UP means clinic requests for records will be processed. DOWN means clinic requests for records
will be ignored.
195.4,101 MAS TRACKING APPLICATION MAS;1 POINTER TO RECORD TRACKING APPLICATION FILE (#195.1)
LAST EDITED: AUG 27, 1986
DESCRIPTION:
This defines the application which is called by clinic requests.
WRITE AUTHORITY: ^
NOTES: TRIGGERED by the RECORD TYPE FOR MEDICAL FOLDER field of the RECORD TRACKING SYSTEM PARAMETERS File
CROSS-REFERENCE: 195.4^MAS
1)= S ^DIC(195.4,"MAS",$E(X,1,30),DA)=""
2)= K ^DIC(195.4,"MAS",$E(X,1,30),DA)
195.4,102 RECORD TYPE FOR MEDICAL FOLDER MAS;2 POINTER TO RECORD TYPES FILE (#195.2)
DESCRIPTION:
This defines the record type for the medical record.
CROSS-REFERENCE: ^^TRIGGER^195.4^101
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(195.4,D0,"MAS")):^("MAS"),1:"") S X=$P(Y(1),U,1
),X=X S DIU=X K Y X ^DD(195.4,102,1,1,1.1) X ^DD(195.4,102,1,1,1.4)
1.1)= S X=DIV S I(0,0)=$S($D(D0):D0,1:""),D0=DIV S:'$D(^DIC(195.2,+D0,0)) D0=-1 S Y(101)=$S($D(^DIC
(195.2,D0,0)):^(0),1:"") S X=$P(Y(101),U,3),X=X S X=X S D0=I(0,0)
1.4)= S DIH=$S($D(^DIC(195.4,DIV(0),"MAS")):^("MAS"),1:""),DIV=X S %=$P(DIH,U,2,999),DIU=$P(DIH,U,1
),^("MAS")=DIV_$S(%]"":U_%,1:""),DIH=195.4,DIG=101 D ^DICR:$N(^DD(DIH,DIG,1,0))>0
2)= Q
CREATE VALUE)= INTERNAL(#102:#3)
DELETE VALUE)= NO EFFECT
FIELD)= #101
195.4,200 RADIOLOGY INTERFACE STATUS UP;2 SET
'0' FOR DOWN;
'1' FOR UP;
LAST EDITED: NOV 10, 1986
DESCRIPTION: UP means clinic requests for xrays are processed. DOWN means clinic requests for xrays are
ignored.
195.4,201 RADIOLOGY TRACKING APPLICATION RAD;1 POINTER TO RECORD TRACKING APPLICATION FILE (#195.1)
LAST EDITED: AUG 27, 1986
DESCRIPTION:
This defines the application which is called by radiology scheduling.
WRITE AUTHORITY: ^
NOTES: TRIGGERED by the RECORD TYPE FOR MASTER JACKET field of the RECORD TRACKING SYSTEM PARAMETERS File
CROSS-REFERENCE: 195.4^RAD
1)= S ^DIC(195.4,"RAD",$E(X,1,30),DA)=""
2)= K ^DIC(195.4,"RAD",$E(X,1,30),DA)
195.4,202 RECORD TYPE FOR MASTER JACKET RAD;2 POINTER TO RECORD TYPES FILE (#195.2)
DESCRIPTION:
This defines the record type for the radiology application.
CROSS-REFERENCE: ^^TRIGGER^195.4^201
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(195.4,D0,"RAD")):^("RAD"),1:"") S X=$P(Y(1),U,1
),X=X S DIU=X K Y X ^DD(195.4,202,1,1,1.1) X ^DD(195.4,202,1,1,1.4)
1.1)= S X=DIV S I(0,0)=$S($D(D0):D0,1:""),D0=DIV S:'$D(^DIC(195.2,+D0,0)) D0=-1 S Y(101)=$S($D(^DIC
(195.2,D0,0)):^(0),1:"") S X=$P(Y(101),U,3),X=X S X=X S D0=I(0,0)
1.4)= S DIH=$S($D(^DIC(195.4,DIV(0),"RAD")):^("RAD"),1:""),DIV=X S %=$P(DIH,U,2,999),DIU=$P(DIH,U,1
),^("RAD")=DIV_$S(%]"":U_%,1:""),DIH=195.4,DIG=201 D ^DICR:$N(^DD(DIH,DIG,1,0))>0
2)= Q
CREATE VALUE)= INTERNAL(#202:#3)
DELETE VALUE)= NO EFFECT
FIELD)= #201
FILES POINTED TO FIELDS
RECORD TRACKING APPLICATION
(#195.1) MAS TRACKING APPLICATION (#101)
RADIOLOGY TRACKING APPLICATION (#201)
RECORD TYPES (#195.2) RECORD TYPE FOR MEDICAL FOLDER (#102)
RECORD TYPE FOR MASTER JACKET (#202)
INPUT TEMPLATE(S):
RT OVERALL PARAMETERS MAY 06, 1991@07:51 USER #0
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):