STANDARD DATA DICTIONARY #5.13 -- COUNTY CODE FILE                                                                3/24/25    PAGE 1
STORED IN ^XIP(5.13,  (3327 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                    (VERSION 8.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
*** NOTICE: DO NOT POINT DIRECTLY TO THIS FILE UNTILL YOU GET AN IA *** *** The ONLY file that is allowed to point directly to this
file is the: 
    POSTAL CODE(#5.12) file *** 
 
This file contains all known US County FIPS codes according to the USGS, HUD, and USPS.  


              DD ACCESS: @
              RD ACCESS: 
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @

POINTED TO BY: COUNTY field (#2) of the POSTAL CODE File (#5.12) 
               

CROSS
REFERENCED BY: FIPS CODE(B), COUNTY NAME(C)

INDEXED BY:    FIPS CODE & COUNTY NAME & STATE & INACTIVE DATE (AC), FIPS CODE & COUNTY NAME & STATE (D)




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

              INPUT TRANSFORM:  K:$L(X)>5!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      MAY 25, 2006 
              HELP-PROMPT:      Please enter the 5-digit FIPS code for this county. 
              DESCRIPTION:      This field contains a 5-digit number representing the Federal Information Processing Standard for a
                                state and county.  The first 2 digits represent the state, and the last 3 digits represent the
                                county.  

              DELETE TEST:      1,0)= D EN^DDIOL("Entries can only be Inactivated.","","!?5,$C(7)") I 1

              LAYGO TEST:       1,0)= D:'$G(XUMF) EN^DDIOL("New County Code additions are not allowed.","","!?5,$C(7)") I +$G(XUMF)

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

              RECORD INDEXES:   AC (#273), D (#274)

5.13,1        COUNTY NAME            0;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>25!($L(X)<3) X
              LAST EDITED:      JUN 21, 2003 
              HELP-PROMPT:      Answer must be 3-25 characters in length 
              DESCRIPTION:
                                This field holds the name associated with this county.  

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

              RECORD INDEXES:   AC (#273), D (#274)

5.13,2        STATE                  0;3 POINTER TO STATE FILE (#5)

              LAST EDITED:      JUN 21, 2003 
              DESCRIPTION:
                                This field holds the state that this county is within.  

              RECORD INDEXES:   AC (#273), D (#274)

5.13,3        INACTIVE DATE          0;4 DATE

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:X<1 X
              LAST EDITED:      JUN 21, 2003 
              HELP-PROMPT:      Please enter an Inactive Date for this County FIPS. 
              DESCRIPTION:
                                This is the date that the 5-digit FIPS became inactive.  

              RECORD INDEXES:   AC (#273)

5.13,4        LATITUDE (EST)         0;5 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>6!($L(X)<6) X
              LAST EDITED:      JUN 19, 2003 
              HELP-PROMPT:      Answer must be 6 characters in length. 
              DESCRIPTION:      This field the estimated Latitude in :N or :S of the County as
                                given by the United States Geological Survey (USGS).  
                                 
                                 N is North of the Equator.  
                                 S is South of the Equator.  


5.13,5        LONGITUDE (EST)        0;6 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>7!($L(X)<7) X
              LAST EDITED:      JUN 19, 2003 
              HELP-PROMPT:      Answer must be 7 characters in length. 
              DESCRIPTION:      This field is the estimated Longitude in E or :W of the County
                                as given by the United States Geological Survey (USGS).  
                                 
                                 E is East of the Prime Meridian.  
                                 W is West of the Prime Meridian.  



      FILES POINTED TO                      FIELDS

STATE (#5)                        STATE (#2)


File #5.13

  Record Indexes:

  AC (#273)    RECORD    MUMPS    IR    ACTION
      Short Descr:  Cross Reference Used To Keep Track Of Field Changes
      Description:  This cross reference is used to keep track of any field changes that are made during updates via the USPS's
                    'Address Information System' the are obtained from the 'City State Product - Detail Record'.  The format of the 
                    cross reference is: 
                                         
                                          S ^XIP(5.13,"AC",)="" 
                                         
                    If there are any changes to one or more of the field values, then a background job will transmit the record to
                    all of the VAMC's via a MFN message.  
        Set Logic:  D:'$D(XIPSEED) X513AC^XIPXREF
       Kill Logic:  Q
       Whole Kill:  K ^XIP(5.13,"AC")
             X(1):  FIPS CODE  (5.13,.01)  (forwards)
             X(2):  COUNTY NAME  (5.13,1)  (forwards)
             X(3):  STATE  (5.13,2)  (forwards)
             X(4):  INACTIVE DATE  (5.13,3)  (forwards)

  D (#274)    RECORD    REGULAR    IR    LOOKUP & SORTING
      Short Descr:  Uniqueness Index for File #5.13
        Set Logic:  S ^XIP(5.13,"D",X(1),X(2),X(3),DA)=""
       Kill Logic:  K ^XIP(5.13,"D",X(1),X(2),X(3),DA)
       Whole Kill:  K ^XIP(5.13,"D")
             X(1):  FIPS CODE  (5.13,.01)  (Subscr 1)
             X(2):  COUNTY NAME  (5.13,1)  (Subscr 2)
             X(3):  STATE  (5.13,2)  (Subscr 3)


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):