STANDARD DATA DICTIONARY #40.9 -- LOCATION TYPE FILE                                                              9/29/25    PAGE 1
STORED IN ^DIC(40.9,  (13 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                      (VERSION 5.3)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains a list of possible locations at your facility.  


              DD ACCESS: @
              RD ACCESS: d
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
IDENTIFIED BY: DESIGNATION (#1)[R]

POINTED TO BY: TYPE EXTENSION field (#2.1) of the HOSPITAL LOCATION File (#44) 
               ASSOCIATED LOCATION TYPES field (#.01) of the ASSOCIATED LOCATION TYPES sub-field (#44.101) of the HOSPITAL LOCATION 
                   File (#44) 
               IN OUT PATIENT INDICATOR field (#7) of the ADMISSION SETUP EXTRACT File (#727.82) 
               IN OUT PATIENT INDICATOR field (#7) of the PHYSICAL MOVEMENT SETUP EXTRACT File (#727.821) 
               IN OUT PATIENT INDICATOR field (#7) of the TREATING SPECIALTY CHANGE SETUP EXTRACT File (#727.822) 
               IN OUT PATIENT INDICATOR field (#7) of the PAI EXTRACT File (#727.823) 
               

CROSS
REFERENCED BY: NAME(B), DESIGNATION(C)



40.9,.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:
                                Enter the name of the location type.  

              CROSS-REFERENCE:  40.9^B 
                                1)= S ^DIC(40.9,"B",$E(X,1,30),DA)=""
                                2)= K ^DIC(40.9,"B",$E(X,1,30),DA)


40.9,1        DESIGNATION            0;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45)!($D(^DIC(40.9,"C",$E(X,1,30)))) X I $D(X) K:$L(X)>2!($L(X)<1)!'(X?1A!(X?2A)) X
              HELP-PROMPT:      ANSWER MUST BE 1-2 CHARACTERS IN LENGTH 
              DESCRIPTION:      Enter a unique designation for each location type.  No two may have the designation.  Must contains
                                1-2 characters.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  40.9^C 
                                1)= S ^DIC(40.9,"C",$E(X,1,30),DA)=""
                                2)= K ^DIC(40.9,"C",$E(X,1,30),DA)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):