STANDARD DATA DICTIONARY #356.017 -- X12 278 PATIENT LOCATION FILE                                                3/24/25    PAGE 1
STORED IN ^IBT(356.017,  (15 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                   (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains all the corresponding X.12 codes for patient locations.  
 
Per VHA Directive 10-93-142, this file definition should not be modified.  


              DD ACCESS: @
              RD ACCESS: 
              WR ACCESS: 
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: 
IDENTIFIED BY: DESCRIPTION (#.02)

POINTED TO BY: PATIENT LOCATION field (#10.13) of the HCS REVIEW TRANSMISSION File (#356.22) 
               

CROSS
REFERENCED BY: CODE(B)

INDEXED BY:    DESCRIPTION (C)


    LAST MODIFIED: SEP 2,2016@13:49:10

356.017,.01   CODE                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X'?1P.E) X
              LAST EDITED:      APR 21, 2014 
              HELP-PROMPT:      Answer must be 1 character in length. 
              DESCRIPTION:
                                This is the code value sent in an X.12 message.  

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


356.017,.02   DESCRIPTION            0;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
              LAST EDITED:      MAR 30, 2015 
              HELP-PROMPT:      Answer must be 1-40 characters in length. 
              DESCRIPTION:
                                This describes the code value in more detail.  

              FIELD INDEX:      C (#450)    REGULAR    IR    LOOKUP & SORTING
                  Short Descr:  Convert to Upper Case for lookups
                    Set Logic:  S ^IBT(356.017,"C",$E(X,1,30),DA)=""
                   Kill Logic:  K ^IBT(356.017,"C",$E(X,1,30),DA)
                   Whole Kill:  K ^IBT(356.017,"C")
                         X(1):  DESCRIPTION  (356.017,.02)  (Subscr 1)  (Len 30)  (forwards)
                                  Transform (Storage):  S X=$$UP^XLFSTR($E(X,1,30))


356.017,.03   INACTIVE?              0;3 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      APR 21, 2014 
              HELP-PROMPT:      Set this to YES in order to deactivate the code. 
              DESCRIPTION:
                                This field will be marked inactive if a code is determined to no longer be used by X.12.  



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):