STANDARD DATA DICTIONARY #150.2 -- VSIT SITE CODES FILE 9/29/25 PAGE 1
STORED IN ^VSIT(150.2, (247 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file list VHA facilities and their site code.
DD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
IDENTIFIED BY: CODE (#.02)[R]
POINTED TO BY: SITE PART OF VISIT ID field (#402) of the VISIT TRACKING PARAMETERS File (#150.9)
CROSS
REFERENCED BY: NAME(B), NAME(C), CODE(D)
150.2,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: JUN 20, 1996
HELP-PROMPT: Answer must be 3-30 characters in length.
CROSS-REFERENCE: 150.2^B
1)= S ^VSIT(150.2,"B",$E(X,1,30),DA)=""
2)= K ^VSIT(150.2,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 150.2^C^KWIC
1)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I ",-"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2,^DD("KWI
C")'[I S ^VSIT(150.2,"C",I,DA)=""
2)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I ",-"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2 K ^VSIT(
150.2,"C",I,DA)
150.2,.02 CODE 0;2 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>4!($L(X)<3)!'(X?1U2UN!(X="TEST")) X
LAST EDITED: JUN 20, 1996
HELP-PROMPT: Answer must be 3-4 characters in length.
DESCRIPTION:
This is the unique site code.
CROSS-REFERENCE: 150.2^D
1)= S ^VSIT(150.2,"D",$E(X,1,30),DA)=""
2)= K ^VSIT(150.2,"D",$E(X,1,30),DA)
150.2,.03 SELECTABLE FLAG 0;3 SET (Required)
'1' FOR SELECTABLE;
'0' FOR NON-SELECTABLE;
LAST EDITED: JUN 19, 1996
DESCRIPTION:
This flag determines whether or not an entry may be viewed.
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):