STANDARD DATA DICTIONARY #4.1 -- FACILITY TYPE FILE 3/24/25 PAGE 1 STORED IN ^DIC(4.1, (86 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 8.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file is pointed to by the Institution File. It containes a list of facility codes that had previously been stored in the VA Type Code field of the Institution File. This file is distributed with data, and the new data should overwrite the old. It is cross-referenced by name and full name. APPLICATION GROUP(S): XU IDENTIFIED BY: FULL NAME (#1) POINTED TO BY: FACILITY TYPE field (#13) of the INSTITUTION File (#4) BILLING PROVIDER FAC TYPES field (#.01) of the BILLING PROVIDER FAC TYPES sub-field (#350.9005) of the IB SITE PARAMETERS File (#350.9) CROSS REFERENCED BY: NAME(B), FULL NAME(C), STATUS(XUMF) 4.1,.01 NAME 0;1 FREE TEXT (Required) Type Code INPUT TRANSFORM: K:$L(X)>11!($L(X)<1)!'(X'?1P.E) X LAST EDITED: MAY 02, 1989 HELP-PROMPT: Answer must be 1-11 characters in length. DESCRIPTION: This is the Facility type code. CROSS-REFERENCE: 4.1^B 1)= S ^DIC(4.1,"B",$E(X,1,30),DA)="" 2)= K ^DIC(4.1,"B",$E(X,1,30),DA) 4.1,1 FULL NAME 0;2 FREE TEXT INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>45!($L(X)<3) X HELP-PROMPT: Answer must be 3-45 characters in length. DESCRIPTION: This is the full name of the facility type code. CROSS-REFERENCE: 4.1^C 1)= S ^DIC(4.1,"C",$E(X,1,30),DA)="" 2)= K ^DIC(4.1,"C",$E(X,1,30),DA) 4.1,2 TITLE 0;3 FREE TEXT INPUT TRANSFORM: K:$L(X)>45!($L(X)<3) X LAST EDITED: MAY 02, 1989 HELP-PROMPT: Answer must be 3-45 characters in length. DESCRIPTION: Reserved 4.1,3 STATUS 0;4 SET 'N' FOR NATIONAL; 'L' FOR LOCAL; LAST EDITED: JAN 04, 2001 HELP-PROMPT: Local or National -- if national, do not edit! DESCRIPTION: This field flags an entry as national. National entries can not be modified locally. National Institutions will only point to National facility types. CROSS-REFERENCE: 4.1^XUMF 1)= S ^DIC(4.1,"XUMF",$E(X,1,30),DA)="" 2)= K ^DIC(4.1,"XUMF",$E(X,1,30),DA) INPUT TEMPLATE(S): PRINT TEMPLATE(S): CAPTIONED USER #0 SORT TEMPLATE(S): FORM(S)/BLOCK(S):