STANDARD DATA DICTIONARY #195.2 -- RECORD TYPES FILE 3/24/25 PAGE 1
STORED IN ^DIC(195.2, (7 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
POINTED TO BY: DEFAULT MEDICAL RECORD TYPE field (#100.3) of the MEDICAL CENTER DIVISION File (#40.8)
TYPE OF RECORD field (#3) of the RECORDS File (#190)
RECORD TYPE RESTRICTION field (#4) of the PULL LIST File (#194.2)
DEFAULT RECORD CREATION TYPE field (#10) of the RECORD TRACKING APPLICATION File (#195.1)
DEFAULT PERPETUAL RECORD field (#45) of the RECORD TRACKING APPLICATION File (#195.1)
TYPE OF RECORD field (#.01) of the TYPE OF RECORDS sub-field (#195.13) of the INSTITUTION sub-field (#195.12) of the
RECORD TRACKING APPLICATION File (#195.1)
MAS RECORD field (#.01) of the MAS RECORDS NEEDED BY CLINICS sub-field (#195.14) of the RECORD TRACKING APPLICATION
File (#195.1)
RADIOLOGY FOLDER field (#.01) of the RAD FOLDERS NEEDED BY CLINICS sub-field (#195.15) of the RECORD TRACKING
APPLICATION File (#195.1)
LINKED RECORDS field (#.01) of the LINKED RECORDS sub-field (#195.22) of the RECORD TYPES File (#195.2)
RECORD TYPE FOR MEDICAL FOLDER field (#102) of the RECORD TRACKING SYSTEM PARAMETERS File (#195.4)
RECORD TYPE FOR MASTER JACKET field (#202) of the RECORD TRACKING SYSTEM PARAMETERS File (#195.4)
RECORD TYPE NEEDED field (#.01) of the RECORDS NEEDED BY LOCATION sub-field (#195.9001) of the BORROWERS/FILE AREAS
File (#195.9)
CROSS
REFERENCED BY: FILE ROOM(AF), NAME(B), APPLICATION(C)
195.2,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
HELP-PROMPT: NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
DESCRIPTION:
This describes the record as to function.
CROSS-REFERENCE: 195.2^B
1)= S ^DIC(195.2,"B",$E(X,1,30),DA)=""
2)= K ^DIC(195.2,"B",$E(X,1,30),DA)
195.2,2 ABBREVIATION 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>3!($L(X)<1) X
LAST EDITED: SEP 05, 1986
HELP-PROMPT: ANSWER MUST BE 1-3 CHARACTERS IN LENGTH
DESCRIPTION:
This allows the record type to be selected by a few characters.
195.2,3 APPLICATION 0;3 POINTER TO RECORD TRACKING APPLICATION FILE (#195.1)
LAST EDITED: JAN 22, 1987
DESCRIPTION:
This allows the record type to be associated with one or many applications.
UNEDITABLE
CROSS-REFERENCE: 195.2^C
1)= S ^DIC(195.2,"C",$E(X,1,30),DA)=""
2)= K ^DIC(195.2,"C",$E(X,1,30),DA)
195.2,4 INQUIRY DISPLAY ORDER 0;4 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X D CHK^RTUTL3:$D(X)
LAST EDITED: MAR 06, 1987
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 999
DESCRIPTION:
This is used by the system to allow application modification of displays.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
195.2,5 RECORD LABEL FORMAT 0;5 POINTER TO LABEL FORMAT FILE (#194.4)
INPUT TRANSFORM: S DIC("S")="I $D(D0),$P(^(0),U,4)=""r"",$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)" D ^DIC K DIC S DIC=D
IE,X=+Y K:Y<0 X
LAST EDITED: AUG 19, 1986
DESCRIPTION:
This defines the label format to be used when printing a record label.
SCREEN: S DIC("S")="I $D(D0),$P(^(0),U,4)=""r"",$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)"
EXPLANATION: Allows only record formats for current application.
195.2,6 REQUEST NOTICE FORMAT 0;6 POINTER TO LABEL FORMAT FILE (#194.4)
INPUT TRANSFORM: S DIC("S")="I $D(D0),$P(^(0),U,4)=""q"",$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)" D ^DIC K DIC S DIC=D
IE,X=+Y K:Y<0 X
LAST EDITED: AUG 19, 1986
DESCRIPTION:
This defines the label format to be used when printing a request for a record.
SCREEN: S DIC("S")="I $D(D0),$P(^(0),U,4)=""q"",$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)"
EXPLANATION: Allows only request formats for current application.
195.2,7 CONTROL OF FINDING RECORDS 0;7 SET
'f' FOR FILE ROOM SUPERVISOR ONLY!;
'a' FOR ANY USER;
LAST EDITED: AUG 26, 1986
DESCRIPTION:
This allows the application to limit the designation of a missing record as found.
195.2,8 REQUEST PURGE CUTOFF (days) 0;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: AUG 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 99999999
DESCRIPTION:
This defines the number of days to retain requests before purging.
195.2,9 PENDING REQUEST CUTOFF (days) 0;9 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: AUG 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 99999999
DESCRIPTION:
This defines the number of days before a request is considered not filled by the system.
195.2,10 PULL LIST PURGE CUTOFF (days) 0;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: AUG 27, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 99999999
DESCRIPTION: This defines the number of days to retain pull lists before the pull lists are purged by the purge
option.
195.2,11 OVERDUE RECORD CUTOFF (days) 0;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: SEP 02, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 99999999
DESCRIPTION: This defines the number of days that a charged record is allowed to be charged before it is
considered by the system as overdue.
195.2,11.1 BARCODE RENEWAL CUTOFF (days) 0;20 NUMBER
Barcode Renewal Cutoff (days)
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<365)!(X?.E1"."1N.N) X
LAST EDITED: MAY 23, 1991
HELP-PROMPT: Type a Number between 365 and 9999, 0 Decimal Digits
DESCRIPTION: This field contains the number of days required to consider re-printing a barcode label.
195.2,12 # PREVIOUS MOVEMENTS TO RETAIN 0;12 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<5)!(X?.E1"."1N.N) X
LAST EDITED: JUN 06, 1988
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 5 AND 9999
DESCRIPTION:
This defines the number of movements to not be purged by the purge option.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
195.2,13 CURRENT BORR REQUEST TIME MIN. 0;13 NUMBER
CURRENT BORROWER FUTURE REQUEST TIME MINIMUM (minutes)
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: OCT 28, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 99999
DESCRIPTION:
This defines the time in the future when the current borrower may request the record again.
195.2,14 CAN RECORD BE REQUESTED? 0;14 SET
'y' FOR YES;
'n' FOR NO;
LAST EDITED: NOV 12, 1986
DESCRIPTION:
No means the record cannot be requested.
195.2,15 IS RECORD TEMPORARY? 0;15 SET
'y' FOR YES;
'n' FOR NO;
LAST EDITED: NOV 12, 1986
DESCRIPTION:
This means that the record can only be charged out once.
195.2,16 ASK FOR CONTENT DESCRIPTOR? 0;16 SET
'y' FOR YES;
'n' FOR NO;
LAST EDITED: NOV 12, 1986
DESCRIPTION:
Yes means the system will query the user to add free text for record description.
195.2,17 MULTIPLE VOLUMES ALLOWED? 0;17 SET (Required)
'y' FOR YES;
'n' FOR NO;
LAST EDITED: FEB 14, 1987
DESCRIPTION:
Yes means the system will allow creation of multiple volumes for this type of record.
195.2,18 OK TO PURGE DATA? 0;18 SET
'y' FOR YES;
'n' FOR NO;
LAST EDITED: APR 28, 1987
DESCRIPTION: NO means that all the purge parameters will be ignored by the purge option and no data is purged
until this parameter is set to YES.
195.2,19 RETIRE RECORD CUTOFF (days) 0;19 NUMBER
Record Retirement Cutoff (days)
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<365)!(X?.E1"."1N.N) X
LAST EDITED: MAY 23, 1991
HELP-PROMPT: Type a Number between 365 and 9999, 0 Decimal Digits
DESCRIPTION: This field will contain the number of days required for a record to be considered for retirement.
195.2,21 PENDING CHECK-IN CUTOFF (days) 1;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: DEC 18, 1990
HELP-PROMPT: Type a Number between 0 and 99999, 0 Decimal Digits
DESCRIPTION: This describes the number of days a pending request will be displayed for a record when the record
is being checked in.
195.2,22 OK TO RETIRE RECORDS? 1;2 SET
'y' FOR YES;
'n' FOR NO;
LAST EDITED: MAR 13, 1991
195.2,50 INACTIVATION DATE I;1 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
DESCRIPTION:
This defines a date when the record is no longer available to be charged out.
195.2,75 LINKED RECORDS LINKED;0 POINTER Multiple #195.22 (Add New Entry without Asking)
DESCRIPTION: This points to other record types which should be automatically created by the system when this
record is created.
SCREEN: S DIC("S")="I $D(D0),D0'=+Y,$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)"
EXPLANATION: Allows only records for the same application.
195.22,.01 LINKED RECORDS 0;1 POINTER TO RECORD TYPES FILE (#195.2) (Multiply asked)
INPUT TRANSFORM:S DIC("S")="I $D(D0),D0'=+Y,$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<
0 X
LAST EDITED: SEP 08, 1986
CROSS-REFERENCE:195.22^B
1)= S ^DIC(195.2,DA(1),"LINKED","B",$E(X,1,30),DA)=""
2)= K ^DIC(195.2,DA(1),"LINKED","B",$E(X,1,30),DA)
195.2,100 ALLOWABLE FILE ROOMS F;0 POINTER Multiple #195.21 (Add New Entry without Asking)
DESCRIPTION:
This defines which borrower/file areas may be allowed to check in this type of record.
SCREEN: S DIC("S")="I $D(D0),$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3),$D(^SC(+$P(^RTV(195.9,Y,0),U,2),0)),$P(^
(0),U,3)=""F"" D DICS^RTDPA31"
EXPLANATION: Allows only file rooms that match the record type application.
195.21,.01 FILE ROOM 0;1 POINTER TO BORROWERS/FILE AREAS FILE (#195.9) (Multiply asked)
INPUT TRANSFORM:S DIC("V")="I $P(Y(0),U,4)=""L""",DIC("S")="I $D(D0),$P(^(0),U,13)=""F"",$P(^(0),U,3)=$P(^DIC(195.2
,D0,0),U,3) D DICS^RTDPA31" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: MAY 14, 1987
SCREEN: S DIC("S")="I $D(D0),$P(^(0),U,13)=""F"",$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3) D DICS^RTDPA31"
EXPLANATION: Allows only file rooms associated with the same application as the record type.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE:195.2^AF
1)= S ^DIC(195.2,"AF",$E(X,1,30),DA(1),DA)=""
2)= K ^DIC(195.2,"AF",$E(X,1,30),DA(1),DA)
195.2,150 DESCRIPTION D;0 WORD-PROCESSING #195.23
DESCRIPTION:
This free text allows the record to be described more fully.
LAST EDITED: SEP 23, 1986
FILES POINTED TO FIELDS
BORROWERS/FILE AREAS (#195.9) ALLOWABLE FILE ROOMS:FILE ROOM (#.01)
LABEL FORMAT (#194.4) RECORD LABEL FORMAT (#5)
REQUEST NOTICE FORMAT (#6)
RECORD TRACKING APPLICATION
(#195.1) APPLICATION (#3)
RECORD TYPES (#195.2) LINKED RECORDS:LINKED RECORDS (#.01)
INPUT TEMPLATE(S):
RT PURGE PROFILE APR 28, 1987 USER #0
RT RETIREMENT PROFILE MAR 13, 1991@13:00 USER #0
RT TYPE SET-UP FEB 25, 1991@15:48 USER #0
PRINT TEMPLATE(S):
RT PURGE PROFILE APR 28, 1987 USER #0 Record Tracking Purge Profile
RT RETIREMENT PROFILE SEP 12, 1991@17:34 USER #0 Record Tracking Retirement Profile
SORT TEMPLATE(S):
RT PURGE PROFILE APR 28, 1987 USER #0
SORT BY: APPLICATION;S1;C5;"Application: "//
WITHIN APPLICATION, SORT BY: NAME//
RT RETIREMENT PROFILE MAR 13, 1991@13:04 USER #0
SORT BY: APPLICATION;S1;C5;"Application: "//
WITHIN APPLICATION, SORT BY: NAME//
FORM(S)/BLOCK(S):