STANDARD DATA DICTIONARY #45.81 -- STATION TYPE FILE 9/29/25 PAGE 1
STORED IN ^DIC(45.81, (19 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file holds the different types of stations available. It contains both the station type (a numeric code), name, and the
allowable suffixes for the station type. This is pointed to by both File #45.1-SOURCE OF ADMISSION and #45.82-CATEGORY OF
BENEFICIARY.
DD ACCESS: @
RD ACCESS: d
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
IDENTIFIED BY: NAME (#2)
POINTED TO BY: STATION TYPE field (#.01) of the STATION TYPE sub-field (#45.11) of the SOURCE OF ADMISSION File (#45.1)
STATION TYPE field (#.01) of the STATION TYPE sub-field (#45.821) of the CATEGORY OF BENEFICIARY File (#45.82)
CROSS
REFERENCED BY: NUMBER(B), NAME(C), SUFFIXES(D), SUFFIX PTR(D1)
45.81,.01 NUMBER 0;1 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<10)!(X?.E1"."1N.N) X I $D(X) S DINUM=X
LAST EDITED: MAY 22, 1990
HELP-PROMPT: Enter the number of the station type between 10 and 99.
DESCRIPTION:
This field contains a station type. Valid station type are numbers between '10' and '99'.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 45.81^B
1)= S ^DIC(45.81,"B",$E(X,1,30),DA)=""
2)= K ^DIC(45.81,"B",$E(X,1,30),DA)
45.81,2 NAME 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>40!($L(X)<3) X
HELP-PROMPT: Enter the station type name, 3-40 characters.
DESCRIPTION:
This field contains the station type name.
CROSS-REFERENCE: 45.81^C
1)= S ^DIC(45.81,"C",$E(X,1,30),DA)=""
2)= K ^DIC(45.81,"C",$E(X,1,30),DA)
45.81,10 *SUFFIXES SU;0 Multiple #45.811
LAST EDITED: JUN 23, 1995
DESCRIPTION: This multiple is no longer in use and has been starred for deletion. It will be removed in a
future release of the PIMS (MAS) package. Previously, this multiple contained the suffixes
assigned to various stations or facilities. It has been replaced by the Suffix Ptr field (#.01) of
the Suffix Ptr multiple (#45.813) which is a pointer to the Facility Suffix file (#45.68). The
Facility Suffix file is a table file which contains the suffixes, effective date(s), and
active/inactive flag(s).
45.811,.01 SUFFIXES 0;1 FREE TEXT (Multiply asked)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<1) X
HELP-PROMPT: Enter the allowable suffixes for this station type, 1-3 characters.
DESCRIPTION:
This sub-field contains the suffixes assigned to various stations or facilities.
CROSS-REFERENCE: 45.81^D
1)= S ^DIC(45.81,"D",$E(X,1,30),DA(1),DA)=""
2)= K ^DIC(45.81,"D",$E(X,1,30),DA(1),DA)
45.81,50 SUFFIX PTR S;0 POINTER Multiple #45.813
45.813,.01 SUFFIX PTR 0;1 POINTER TO FACILITY SUFFIX FILE (#45.68) (Required)
LAST EDITED: JUN 20, 1995
DESCRIPTION: This field points to the Facility Suffix file which contains the suffix, effective date, and
active/inactive flag.
CROSS-REFERENCE: 45.813^B
1)= S ^DIC(45.81,DA(1),"S","B",$E(X,1,30),DA)=""
2)= K ^DIC(45.81,DA(1),"S","B",$E(X,1,30),DA)
CROSS-REFERENCE: 45.81^D1^MUMPS
1)= S ^DIC(45.81,"D1",$P($G(^DIC(45.68,X,0)),U),DA(1),DA)=""
2)= K ^DIC(45.81,"D1",$P($G(^DIC(45.68,X,0)),U),DA(1),DA)
FILES POINTED TO FIELDS
FACILITY SUFFIX (#45.68) SUFFIX PTR:SUFFIX PTR (#.01)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):