STANDARD DATA DICTIONARY #452.3 -- PRSE MANDATORY TRAINING (MI) CLASS GROUP FILE                                  3/24/25    PAGE 1
STORED IN ^PRSE(452.3,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 4.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains groups of mandatory or required classes.  For Nursing service this was known as Mandatory Inservice (MI).  These
groups can be for individual students or for entire services.  


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

   APPLICATION GROUP(S): PRSE

POINTED TO BY: MI REVIEW GROUP field (#.01) of the MI REVIEW GROUP sub-field (#450.0632) of the PAID EMPLOYEE File (#450) 
               

CROSS
REFERENCED BY: NAME(B), MANDATORY CLASSES(C), SERVICE(D)



452.3,.01     NAME                   0;1 FREE TEXT

              NAME OF REVIEW GROUP   
              INPUT TRANSFORM:  S X=$$UP^XLFSTR(X) K:$L(X)>22!($L(X)<2) X
              LAST EDITED:      MAR 25, 1994 
              HELP-PROMPT:      Answer must be 2-22 characters in length. 
              DESCRIPTION:
                                This is the name of a mandatory or required class group (review group or service).  

              TECHNICAL DESCR:
                                FREE TEXT FIELD 

              DELETE TEST:      1,0)= I $$EN3^PRSEUTL5(D0)

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

              CROSS-REFERENCE:  452.3^B 
                                1)= S ^PRSE(452.3,"B",$E(X,1,30),DA)=""
                                2)= K ^PRSE(452.3,"B",$E(X,1,30),DA)
                                Main index of Mandatory Training Group entries by training group name.  



452.3,.02     SERVICE                0;2 POINTER TO PAID COST CENTER/ORGANIZATION FILE (#454.1)

              LAST EDITED:      JAN 10, 1994 
              DESCRIPTION:      This field associates a service/section with a mandatory inservice review group or identifies this
                                MI review group as assigned to the entire hospital.  

              EXECUTABLE HELP:  W !,?2,"Enter 'MISCELLANEOUS' if you want to designate this",!,?2,"MI Review Group to be assigned a
                                s hospital wide.",!
              CROSS-REFERENCE:  452.3^D 
                                1)= S ^PRSE(452.3,"D",$E(X,1,30),DA)=""
                                2)= K ^PRSE(452.3,"D",$E(X,1,30),DA)
                                This cross reference is by service contains a pointer value for File 454.1.  



452.3,1       MANDATORY CLASSES      1;0 POINTER Multiple #452.31 (Add New Entry without Asking)

              LAST EDITED:      FEB 14, 1992 
              HELP-PROMPT:      Enter name of inservice group. 
              DESCRIPTION:
                                This multiple contains mandatory training classes that may be assigned for this group.  

              TECHNICAL DESCR:
                                Pointer to mandatory classes in file 452.1.  


452.31,.01      MANDATORY CLASSES      0;1 POINTER TO PRSE PROGRAM/CLASS FILE (#452.1) (Multiply asked)

                MANDATED PROGRAM/CLASS   
                INPUT TRANSFORM:S DIC("S")="I $P(^(0),U,7)=""M"",$S('$D(PRSESER(1)):1,1:$P(^(0),U,8)=PRSESER(1)!($P(^(0),U,9)=0))" 
                                D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
                LAST EDITED:    FEB 16, 1994 
                HELP-PROMPT:    Enter program or class that is mandated by this group. 
                DESCRIPTION:
                                 This field indicates mandatory classes for this group.  

                TECHNICAL DESCR:
                                Pointer to file 452.1 Program Class File.  

                SCREEN:         S DIC("S")="I $P(^(0),U,7)=""M"",$S('$D(PRSESER(1)):1,1:$P(^(0),U,8)=PRSESER(1)!($P(^(0),U,9)=0))"
                EXPLANATION:    Select only MI entries.
                CROSS-REFERENCE:452.31^B 
                                1)= S ^PRSE(452.3,DA(1),1,"B",$E(X,1,30),DA)=""
                                2)= K ^PRSE(452.3,DA(1),1,"B",$E(X,1,30),DA)
                                Main index of mandatory classes by class name.  


                CROSS-REFERENCE:452.3^C^MUMPS 
                                1)= S ^PRSE(452.3,"C",DA(1),$E(X,1,30),DA)=""
                                2)= K ^PRSE(452.3,"C",DA(1),$E(X,1,30),DA)
                                Indexes mandatory training group entries by group/class name.  






      FILES POINTED TO                      FIELDS

PAID COST CENTER/ORGANIZATION 
                   (#454.1)       SERVICE (#.02)

PRSE PROGRAM/CLASS (#452.1)       MANDATORY CLASSES:MANDATORY CLASSES (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):