STANDARD DATA DICTIONARY #220.2 -- DENTAL CLASSIFICATION FILE                                                     9/29/25    PAGE 1
STORED IN ^DIC(220.2,  (22 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                     (VERSION 1.2)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file is a table of Dental treatment classifications (inpatient and outpatient) used to classify each Dental patient.  



POINTED TO BY: DENTAL CLASSIFICATION field (#220) of the PATIENT File (#2) 
               LAST CLASSIFICATION field (#70.01) of the DENTAL PATIENT File (#220) 
               PATIENT CATEGORY field (#4.5) of the DENTAL TREATMENT (AMIS) File (#221) 
               PATIENT CATEGORY field (#21) of the DENTAL EXTRACT File (#727.806) 
               


INDEXED BY:    CLASSIFICATION (B)




220.2,.001    NUMBER                     NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>22)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      JUL 06, 1986 
              HELP-PROMPT:      TYPE A WHOLE NUMBER BETWEEN 1 AND 22 

220.2,.01     CLASSIFICATION         0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>50!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
              LAST EDITED:      JUL 17, 2014 
              HELP-PROMPT:      Answer must be 3-50 characters in length. 
              DESCRIPTION:
                                A VA Dental Eligibility including Inpatient/Outpatient and classification.  

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

              FIELD INDEX:      B (#1222)    REGULAR    IR    LOOKUP & SORTING
                  Short Descr:  "B" Regular Cross-Reference of .01 field
                  Description:  The "B" cross-reference has been updated to allow for a full 50-characters.  
                    Set Logic:  S ^DIC(220.2,"B",$E(X,1,50),DA)=""
                   Kill Logic:  K ^DIC(220.2,"B",$E(X,1,50),DA)
                   Whole Kill:  K ^DIC(220.2,"B")
                         X(1):  CLASSIFICATION  (220.2,.01)  (Subscr 1)  (Len 50)  (forwards)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):