STANDARD DATA DICTIONARY #223 -- DENTAL CLASS I-VI (AMIS) FILE                                                    3/24/25    PAGE 1
STORED IN ^DENT(223,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                        (VERSION 1.2)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This  information is used to report the number of staff class I-VI treatment cases authorized, the number of staff class I-VI cases
pending initiation of treatment and the number of staff class I-VI treatment cases pending completion.  This information is entered
by the Dental Service monthly.  


IDENTIFIED BY: STATION.DIVISION (#.3)[R]

CROSS
REFERENCED BY: DATE(B)



223,.01       DATE                   0;1 DATE (Required)

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      AUG 17, 1985 
              CROSS-REFERENCE:  223^B 
                                1)= S ^DENT(223,"B",$E(X,1,30),DA)=""
                                2)= K ^DENT(223,"B",$E(X,1,30),DA)


223,.3        STATION.DIVISION       0;29 FREE TEXT (Required)

              INPUT TRANSFORM:  S DIC="^DENT(225,",DIC(0)="QEMZ" D ^DIC S:Y>0 X=$P(Y(0),U,1) K:Y'>0 X K DIC
              LAST EDITED:      SEP 15, 1985 
              HELP-PROMPT:      Select the appropriate station (division) no. for this Dental class I-VI entry 
              DESCRIPTION:
                                This is the three digit station number.  

              EXECUTABLE HELP:  S:$D(D) ZD=D S X="?",DIC="^DENT(225,",DIC(0)="QEM" D ^DIC,N^DENTDNJ2 S DIC=DIE S:$D(ZD) D=ZD K ZD
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


223,1         TREAT CASES AUTH I     0;2 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      DEC 29, 1987 
              HELP-PROMPT:      Type a Number between 1 and 999, 0 Decimal Digits 

223,2         CASES PEND INIT OF TREAT I 0;3 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class I cases pending initiation 
                                of treatment as of the end of this reporting period. 

223,3         CASES PEND COMP I      0;4 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class I cases pending completion 
                                as of the end of this reporting period. 

223,4         TREAT CASES AUTH II    0;5 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 999 indicating the total number of Class II treatment cases 
                                authorized during this reporting period. 

223,5         CASES PEND INIT OF TREAT II 0;6 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 999 indicating the total number of Class II cases pending initiation 
                                of treatment as of the end of this reporting period. 

223,6         CASES PEND COMP II     0;7 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 999 indicating the total number of Class II cases pending completion 
                                as of the end of this reporting period. 

223,7         TREAT CASES AUTH IIA   0;8 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class IIA treatment cases 
                                authorized during this reporting period. 

223,8         CASES PEND INIT OF TREAT IIA 0;9 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class IIA cases pending initiation 
                                of treatment as of the end of this reporting period. 

223,9         CASES PEND COMP IIA    0;10 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class IIA cases pending completion 
                                as of the end of this reporting period. 

223,10        TREAT CASES AUTH IIB   0;11 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class IIB treatment cases 
                                authorized during this reporting period. 

223,11        CASES PEND INIT OF TREAT IIB 0;12 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class IIB cases pending initiation 
                                of treatment as of the end of this reporting period. 

223,12        CASES PEND COMP IIB    0;13 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class IIB cases pending completion 
                                as of the end of this reporting period. 

223,13        TREAT CASES AUTH IIC   0;14 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class IIC treatment cases 
                                authorized during this reporting period. 

223,14        CASES PEND INIT OF TREAT IIC 0;15 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class IIC cases pending initiation 
                                of treatment as of the end of this reporting period. 

223,15        CASES PEND COMP IIC    0;16 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class IIC cases pending completion 
                                as of the end of this reporting period. 

223,16        TREAT CASES AUTH III   0;17 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 999 indicating the total number of Class III treatment cases 
                                authorized during this reporting period. 

223,17        CASES PEND INIT OF TREAT III 0;18 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 999 indicating the total number of Class III cases pending 
                                initiation of treatment as of the end of this reporting period. 

223,18        CASES PEND COMP III    0;19 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enetr a whole number from 1 to 999 indicating the total number of Class III cases pending 
                                completion as of the end of this reporting period. 

223,19        TREAT CASES AUTH IV    0;20 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 999 indicating the total number of Class IV treatment cases 
                                authorized during this reporting period. 

223,20        CASES PEND INIT OF TREAT IV 0;21 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 999 indicating the total number of Class IV cases pending initiation 
                                of treatment as of the end of this reporting period. 

223,21        CASES PEND COMP IV     0;22 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 999 indicating the total number of Class IV cases pending completion 
                                as of the end of this reporting period. 

223,22        TREAT CASES AUTH V     0;23 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class V treatment cases authorized 
                                during this reporting period. 

223,23        CASES PEND INIT OF TREAT V 0;24 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class V cases pending initiation 
                                of treatment as of the end of this reporting period. 

223,24        CASES PEND COMP V      0;25 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class V cases pending completion 
                                as of the end of this reporting period. 

223,25        TREAT CASES AUTH VI    0;26 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class VI treatment cases 
                                authorized during this reporting period. 

223,26        CASES PEND INIT OF TREAT VI 0;27 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class VI cases pending initiation 
                                of treatment as of the end of this reporting period. 

223,27        CASES PEND COMP VI     0;28 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 17, 1985 
              HELP-PROMPT:      Enter a whole number from 1 to 99 indicating the total number of Class VI cases pending completion 
                                as of the end of this reporting period. 

223,28        CHANGE/DELETE          0;30 SET

                                'C' FOR CHANGE; 
                                'D' FOR DELETE; 
              LAST EDITED:      OCT 13, 1987 

223,60        RELEASED BY            .1;1 POINTER TO NEW PERSON FILE (#200)

              LAST EDITED:      MAY 12, 1995 

223,61        DATE RELEASED          .1;2 DATE

              INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      SEP 04, 1985 


      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 RELEASED BY (#60)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):