STANDARD DATA DICTIONARY #452 -- PRSE STUDENT EDUCATION TRACKING FILE                                             3/24/25    PAGE 1
STORED IN ^PRSE(452,  *** 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 information on employee and non-employee attendance at continuing education and inservice programs.  


              DD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @

   APPLICATION GROUP(S): PRSE
IDENTIFIED BY: PROGRAM/CLASS TITLE (#1)[R], BEGINNING DATE (#2)[R]

CROSS
REFERENCED BY: STUDENT NAME(AB), PROGRAM/CLASS TITLE(AC), BEGINNING DATE(AD), STUDENT NAME(AE), PROGRAM/CLASS TITLE(AF), 
               PROGRAM/CLASS TITLE(AK), BEGINNING DATE(AL), STUDENT NAME(B), PROGRAM/CLASS TITLE(CLS), BEGINNING DATE(D), 
               PROGRAM/CLASS TITLE(D1), PROGRAM/CLASS TITLE(E), TYPE OF EDUCATION(F), BEGINNING DATE(H), LOCAL NON-LOCAL(LOC1), 
               TYPE OF EDUCATION(LOC2), SPONSORING SERVICE(SER)



452,.01       STUDENT NAME           0;1 POINTER TO NEW PERSON FILE (#200) (Required)

              NAME OF STUDENT   
              LAST EDITED:      JUN 18, 1993 
              DESCRIPTION:
                                This is the name of the employee who attended this program/class.  

              TECHNICAL DESCR:
                                POINTER TO NEW PERSON FILE 

              CROSS-REFERENCE:  452^B 
                                1)= S ^PRSE(452,"B",$E(X,1,30),DA)=""
                                2)= K ^PRSE(452,"B",$E(X,1,30),DA)
                                This X-Ref is the main index on student tracking file which indexes file by student name which is a
                                pointer to the New Person (#200) file.  


              CROSS-REFERENCE:  452^AB^MUMPS 
                                1)= S PDATA=^PRSE(452,DA,0),YY=$P(PDATA,U,2),ZZ=$P(PDATA,U,3),XX=$P(PDATA,U,21) S:'(YY="")&'(XX="")
                                &(+ZZ>0) ^PRSE(452,"AA",XX,$E(X,1,30),YY,(9999999-ZZ),DA)="" K PDATA,YY,ZZ,XX

                                2)= S PDATA=^PRSE(452,DA,0),YY=$P(PDATA,U,2),ZZ=$P(PDATA,U,3),XX=$P(PDATA,U,21) K:'(YY="")&'(XX="")
                                &(+ZZ>0) ^PRSE(452,"AA",XX,$E(X,1,30),YY,(9999999-ZZ),DA) K PDATA,YY,ZZ,XX
                                This MUMPS Cross reference indicates the latest time/date a particular type of inservice class was
                                taken. It includes the class type, the class, the #200 File pointer for the employee, and the
                                inverse start date for the class.  


              CROSS-REFERENCE:  452^AE^MUMPS 
                                1)= S DATA=$G(^PRSE(452,DA,0)),DATA(1)=$S('($P($G(^PRSE(452,DA,6)),U)=""):$P(^(6),U),1:"L") I $P(DA
                                TA,U,21)'="",'(DATA(1)="") S ^PRSE(452,"G",$P(DATA,U,21),DATA(1),X,DA)="" K DATA

                                2)= S DATA=$G(^PRSE(452,DA,0)),DATA(1)=$S('($P($G(^PRSE(452,DA,6)),U)=""):$P(^(6),U),1:"L") I $P(DA
                                TA,U,21)'="",'(DATA(1)="") K ^PRSE(452,"G",$P(DATA,U,21),DATA(1),X,DA) K DATA
                                Indexes continuing education classes by type (local/non-local).  



452,1         PROGRAM/CLASS TITLE    0;2 FREE TEXT (Required)

              NAME OF PROGRAM OR CLASS   
              INPUT TRANSFORM:  S X=$$UP^XLFSTR(X) K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>53!($L(X)<2) X
              LAST EDITED:      MAY 15, 1997 
              HELP-PROMPT:      Answer must be 2-53 characters in length 
              DESCRIPTION:
                                This is the name of the program/class attended.  

              TECHNICAL DESCR:
                                FREE TEXT NAME OF EDUCATION PROGRAM/CLASS TITLE FILE ^PRSE(452.1, ENTRY.  

              EXECUTABLE HELP:  S DIC="^PRSE(452.1,",DIC(0)="EQ",D="B" D DQ^DICQ
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  452^E^MUMPS 
                                1)= S ^PRSE(452,"CLAS",$P(^PRSE(452,DA,0),U),$E(X,1,53),DA)=""
                                2)= K ^PRSE(452,"CLAS",$P(^PRSE(452,DA,0),U),$E(X,1,53),DA)
                                Indicates the latest date/time a particular class was taken. It includes the File 200 pointer for
                                the employee and the inverse start date of the class.  


              CROSS-REFERENCE:  452^CLS 
                                1)= S ^PRSE(452,"CLS",$E(X,1,53),DA)=""
                                2)= K ^PRSE(452,"CLS",$E(X,1,53),DA)

              CROSS-REFERENCE:  452^AC^MUMPS 
                                1)= S PDATA=^PRSE(452,DA,0),YY=$P(PDATA,U,3),ZZ=$P(PDATA,U,21) S:(+PDATA>0)&(+YY>0)&'(ZZ="") ^PRSE(
                                452,"AA",ZZ,+PDATA,$E(X,1,53),(9999999-YY),DA)="" K PDATA,YY,ZZ

                                2)= S PDATA=^PRSE(452,DA,0),YY=$P(PDATA,U,3),ZZ=$P(PDATA,U,21) K:(+PDATA>0)&(+YY>0)&'(ZZ="") ^PRSE(
                                452,"AA",ZZ,+PDATA,$E(X,1,53),(9999999-YY),DA) K PDATA,YY,ZZ
                                See description on AB MUMPS cross reference.  


              CROSS-REFERENCE:  452^AK^MUMPS 
                                1)= S VA200DA=+$G(^PRSE(452,DA,0)) S:'$D(^PRSE(452,"AK",X)) ^PRSE(452,"AK",X,DA)=$$EN7^PRSEUTL3(X,V
                                A200DA,DA)

                                2)= I $D(^PRSE(452,"AK",X,DA)) X "S PRSENM=0,VA200DA=+$G(^(0)) F  S PRSENM=$O(^PRSE(452,""CLS"",X,P
                                RSENM)) Q:PRSENM'>0!(PRSENM'=DA)" S:PRSENM>0 ^PRSE(452,"AK",X,PRSENM)=$$EN7^PRSEUTL3(X,VA200DA,DA) 
                                K ^PRSE(452,"AK",X,DA),PRSENM
                                This cross reference is used to look up each class which has been entered in the Education Tracking
                                File.  


              CROSS-REFERENCE:  452^AF^MUMPS 
                                1)= D SALCLS1^PRSEUTL3
                                2)= D DALCLS1^PRSEUTL3
                                Indexes file by each class/date occurrence.  


              CROSS-REFERENCE:  452^D1^MUMPS 
                                1)= S PRSE=$G(^PRSE(452,DA,0)) I +$P(PRSE,U,3)=$P(PRSE,U,3),'($P(PRSE,U,2)="") S ^PRSE(452,"DAT",$P
                                (PRSE,U,2),(9999999-+$P(PRSE,U,3)),DA)=""

                                2)= S PRSE=$G(^PRSE(452,DA,0)) I +$P(PRSE,U,3)=$P(PRSE,U,3),'($P(PRSE,U,2)="") K ^PRSE(452,"DAT",$P
                                (PRSE,U,2),(9999999-+$P(PRSE,U,3)),DA)
                                 See description for D X-Ref of file 452.  



452,2         BEGINNING DATE         0;3 DATE (Required)

              DATE PROGRAM/CLASS BEGAN   
              INPUT TRANSFORM:  S PRSE="S" D EN10^PRSEUTL2
              OUTPUT TRANSFORM: S X=Y D D^DIQ
              LAST EDITED:      FEB 15, 1994 
              HELP-PROMPT:      Enter the date/time (time is optional) 
              DESCRIPTION:
                                This is the scheduled start date/time for the program or class.  

              TECHNICAL DESCR:
                                BEGINNING DATE/TIME 

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

              CROSS-REFERENCE:  452^D^MUMPS 
                                1)= S PRSE=$G(^PRSE(452,DA,0)) I +X=X,'($P(PRSE,U,2)="") S ^PRSE(452,"DAT",$P(PRSE,U,2),(9999999-X)
                                ,DA)=""

                                2)= S PRSE=$G(^PRSE(452,DA,0)) I +X=X,'($P(PRSE,U,2)="") K ^PRSE(452,"DAT",$P(PRSE,U,2),(9999999-X)
                                ,DA)
                                This an inverted date mumps X-Ref by Class/Date for File 452.  


              CROSS-REFERENCE:  452^AD^MUMPS 
                                1)= S PDATA=^PRSE(452,DA,0),ZZ=$P(PDATA,U,2),YY=$P(PDATA,U,21) S:(+PDATA>0)&'(ZZ="")&'(YY="") ^PRSE
                                (452,"AA",YY,+PDATA,ZZ,(9999999-+X),DA)="" K PDATA,ZZ,YY

                                2)= S PDATA=^PRSE(452,DA,0),ZZ=$P(PDATA,U,2),YY=$P(PDATA,U,21) K:(+PDATA>0)&'(ZZ="")&'(YY="") ^PRSE
                                (452,"AA",YY,+PDATA,ZZ,(9999999-+X),DA) K PDATA,ZZ,YY
                                See description for the AB MUMPS cross reference.  


              CROSS-REFERENCE:  452^H 
                                1)= S ^PRSE(452,"H",$E(X,1,30),DA)=""
                                2)= K ^PRSE(452,"H",$E(X,1,30),DA)
                                Indexes student tracking record entries by start date.  


              CROSS-REFERENCE:  452^AL^MUMPS 
                                1)= D SALCLS^PRSEUTL3
                                2)= D DALCLS^PRSEUTL3
                                Indexes file by each class/date occurence.  



452,2.1       PRSE PROGRAM/CLASS LENGTH HRS 0;16 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999.99)!(X<0)!(X?.E1"."3N.N) X
              LAST EDITED:      DEC 09, 1994 
              HELP-PROMPT:      Indicate class hours by typing a Number between 0 and 9999.99, 2 Decimal Digits. 
              DESCRIPTION:
                                The length of the class in hours.  

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


452,2.2       CLASS HRS DURING ON-DUTY TIME 0;23 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      MAY 24, 1993 
              HELP-PROMPT:      Indicate on duty hours by entering a Number between 0 and 9999, 0 Decimal Digits. 
              DESCRIPTION:
                                The number of class room hours during the student's on-duty time.  


452,2.3       CLASS HRS DURING OFF-DUTY TIME 0;24 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      MAY 24, 1993 
              HELP-PROMPT:      Indicate off duty hours by entering a Number between 0 and 9999, 0 Decimal Digits. 
              DESCRIPTION:
                                The number of class room hours during the student's off-duty time.  


452,2.4       PROGRAM/CLASS SUPPLIER 6;2 FREE TEXT

              INPUT TRANSFORM:  S X=$$UP^XLFSTR(X) K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      SEP 20, 1994 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:
                                This field contains the company or organization who supplied the materials for this class.  

              DELETE AUTHORITY: ^
              WRITE AUTHORITY:  ^
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


452,4         PROGRAM/CLASS CATEGORY 0;5 POINTER TO PRSE EDUCATION PROGRAM/CLASS CATEGORY FILE (#452.4) (Required)

              CLASS CATEGORY   
              LAST EDITED:      OCT 31, 1994 
              DESCRIPTION:      This is a group of related subjects as categorized on VA Form 5-4691 (Report of Employee Training)
                                under #14.  

              TECHNICAL DESCR:
                                POINTER TO EDUCATION PROGRAM/CLASS CATEGORY FILE ^PRSE(452.4, 

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


452,4.1       PURPOSE OF TRAINING    2;1 POINTER TO PRSE EMPLOYEE PURPOSE OF TRAINING FILE (#452.51)

              LAST EDITED:      JUN 13, 1994 
              DESCRIPTION:
                                This field indicates the reason for the student's training.  


452,5         TYPE OF EDUCATION      0;21 SET

                                'M' FOR MANDATORY INSERVICE; 
                                'O' FOR OTHER TRAINING; 
                                'C' FOR CONTINUING EDUCATION; 
                                'W' FOR WARD INSERVICE; 
              LAST EDITED:      OCT 31, 1994 
              DESCRIPTION:      This field categorizes the class as mandatory inservice, continuing education, ward inservice, or
                                other.  

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

              CROSS-REFERENCE:  452^F^MUMPS 
                                1)= S PDATA=^PRSE(452,DA,0),YY=$P(PDATA,U,2),ZZ=$P(PDATA,U,3) S:YY'=""&(+ZZ>0) ^PRSE(452,"AA",$E(X,
                                1,30),+PDATA,YY,(9999999-ZZ),DA)="" K PDATA,YY,ZZ

                                2)= S PDATA=^PRSE(452,DA,0),YY=$P(PDATA,U,2),ZZ=$P(PDATA,U,3) K:YY'=""&(+ZZ>0) ^PRSE(452,"AA",$E(X,
                                1,30),+PDATA,YY,(9999999-ZZ),DA) K PDATA,YY,ZZ
                                See description of AB MUMPS XREF.  


              CROSS-REFERENCE:  452^LOC2^MUMPS 
                                1)= S DATA=$P($G(^PRSE(452,DA,6)),U) I DATA'="" S ^PRSE(452,"G",X,DATA,DA)=""
                                2)= S DATA=$P($G(^PRSE(452,DA,6)),U) I DATA'="" K ^PRSE(452,"G",X,DATA,DA)
                                See description for LOC1 XREF.  



452,6         SOURCE OF TRAINING     0;7 SET

              COST TO GOVERNMENT   
                                '1' FOR VA; 
                                '2' FOR INTERAGENCY; 
                                '3' FOR NON-GOVERNMENT (Designed for VA); 
                                '4' FOR NON-GOVERNMENT (e.g. Institution, Company or University); 
                                '5' FOR STATE OR LOCAL GOVERNMENT; 
              INPUT TRANSFORM:  S X=$$UP^XLFSTR(X) Q
              LAST EDITED:      NOV 23, 1994 
              DESCRIPTION:
                                This field identifies the source of funding for the program.  

              TECHNICAL DESCR:
                                SET OF CODES PERTAINING TO GOVERNMENT COST 

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


452,7         STUDENT EXPENSE        0;8 NUMBER

              COST TO THE STUDENT   
              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>2000)!(X<0) X
              LAST EDITED:      MAY 21, 1993 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 2000, 2 Decimal Digits. 
              DESCRIPTION:
                                This is the amount, if any, incurred by this employee for a government sponsored program or class.  

              TECHNICAL DESCR:
                                THIS IS A DOLLAR AMOUNT FIELD 


452,8         ACCREDITING ORGANIZATION 0;9 POINTER TO PRSE EDUCATION ACCREDITATION ORGANIZATIONS FILE (#452.9)

              LAST EDITED:      FEB 04, 1993 
              DESCRIPTION:
                                This field contains the name of the organization accrediting the program.  

              TECHNICAL DESCR:
                                POINTER TO EDUCATION ACCREDITATION ORGANINZATION FILE ^PRSE(452.9, 


452,9         CONTACT HOURS          0;10 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999.99)!(X<0)!(X?.E1"."3N.N) X
              LAST EDITED:      JUL 06, 1993 
              HELP-PROMPT:      Type a Number between 0 and 9999.99, 2 Decimal Digits. 
              DESCRIPTION:
                                This field contains the number of contact hours associated with this program.  

              TECHNICAL DESCR:
                                NUMERIC FIELD WITH 2 DECIMALS 


452,9.1       C.E.U.s                0;6 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999.99)!(X<0)!(X?.E1"."3N.N) X
              LAST EDITED:      MAY 29, 1997 
              HELP-PROMPT:      Type a Number between 0 and 9999.99, 2 Decimal Digits 
              DESCRIPTION:
                                This is the number of continuing education units associated with this class.  


452,10        S.S.N.                 0;11 NUMBER (Required)

              INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9)!'(X?9N) X
              LAST EDITED:      AUG 26, 1994 
              HELP-PROMPT:      Type a Number between 1 and 999999999, 0 Decimal Digits. 
              DESCRIPTION:
                                This is the social security number of the student.  

              TECHNICAL DESCR:
                                NUMERIC FIELD 

              EXECUTABLE HELP:  W !!,"Social Security is a required field."
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


452,11        CODE FOR OLDE          0;12 SET

                                'Y' FOR CODED; 
                                'N' FOR NOT CODED; 
              INPUT TRANSFORM:  S X=$$UP^XLFSTR(X)
              LAST EDITED:      SEP 23, 1994 
              HELP-PROMPT:      Please enter the status of this program or class 
              DESCRIPTION:
                                This field indicates whether or not this record should be transmitted to Austin, Texas.  

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


452,12        SPONSORING SERVICE     0;13 FREE TEXT

              INPUT TRANSFORM:  S X=$$UP^XLFSTR(X) K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      AUG 03, 1995 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:
                                This is the name of the student's service.  

              TECHNICAL DESCR:
                                EMPLOYEE SERVICE/SECTION OR STUDENT LOCATION 

              EXECUTABLE HELP:  W !,"Enter the employees service/section or students location."
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  452^SER 
                                1)= S ^PRSE(452,"SER",$E(X,1,30),DA)=""
                                2)= K ^PRSE(452,"SER",$E(X,1,30),DA)
                                Indexes student tracking entries by student's service.  



452,13        ENDING DATE            0;14 DATE

              DATE PROGRAM/CLASS ENDED   
              INPUT TRANSFORM:  S PRSE="E" D EN10^PRSEUTL2
              LAST EDITED:      APR 21, 1993 
              HELP-PROMPT:      Enter the data/time (time is optional) 
              DESCRIPTION:
                                This is the date/time the program is scheduled to end.  

              TECHNICAL DESCR:
                                ENDING DATE/TIME 

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


452,13.5      PROGRAM/CLASS LOCATION 0;15 FREE TEXT

              PLACE WHERE PROGRAM/CLASS GIVEN   
              INPUT TRANSFORM:  S X=$$UP^XLFSTR(X) K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      AUG 22, 1994 
              HELP-PROMPT:      Answer must be 3-30 characters in length 
              DESCRIPTION:
                                This field contains a general location for the class, e.g., Nursing Education, Training Room # ...  

              TECHNICAL DESCR:
                                FREE TEXT FIELD 

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


452,14        LOCAL NON-LOCAL        6;1 SET (Required)

                                'L' FOR LOCAL; 
                                'N' FOR NON-LOCAL; 
              LAST EDITED:      OCT 27, 1994 
              DESCRIPTION:      This field indicates when the class was presented at the VA facility (local) or at another location
                                (non-local).  

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

              CROSS-REFERENCE:  452^LOC1^MUMPS 
                                1)= I X'="" S DATA=$G(^PRSE(452,DA,0)) I +$G(DATA)>0,$P(DATA,U,21)="C" S ^PRSE(452,"G","C",X,+DATA,
                                DA)=""

                                2)= I 'X="" S DATA=$G(^PRSE(452,DA,0)) I +$G(DATA)>0,$P(DATA,U,21)="C" K ^PRSE(452,"G","C",X,+DATA,
                                DA)
                                This cross reference indexes continuing education classes by type (local-non/local)employee, and
                                internal entry number.  



452,15        GOVERNMENT FUNDED      0;22 SET

                                'G' FOR GOVERNMENT FUNDED; 
                                'E' FOR EMPLOYEE FUNDED; 
              LAST EDITED:      OCT 27, 1994 
              DESCRIPTION:
                                This field indicates that the program was paid for by the gov't or by the employee.  

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


452,16        HOURS A/A REQUESTED    0;17 NUMBER

              ANUAL LEAVE REQUESTED   
              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      NOV 09, 1992 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits. 
              DESCRIPTION:
                                This field contains the hours of authorized absence requested by employee to attend a program.  


452,17        HOURS A/A GRANTED      0;18 NUMBER

              ANUAL LEAVE GRANTED   
              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      NOV 09, 1992 
              HELP-PROMPT:      Type a Number between 0 and 999, 0 Decimal Digits. 
              DESCRIPTION:
                                This field contains the total hours of authorized absence granted to attend a program.  


452,18        DIRECT COST            0;19 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999.99)!(X<0) X
              LAST EDITED:      MAY 21, 1993 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999.99, 2 Decimal Digits. 
              DESCRIPTION:      This field contains the direct government cost (tuition, books, etc.) of the program.  Refer to VA
                                Form 5-4691, field 13.  


452,19        INDIRECT COST          0;20 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999.99)!(X<0) X
              LAST EDITED:      MAY 21, 1993 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999.99, 2 Decimal Digits. 
              DESCRIPTION:      This field contains the indirect government cost (travel, per diem) of the program.  Refer to VA
                                Form 5-4691, field 13.  


452,20        ROUTINE/NON-ROUTINE    0;4 SET

                                'R' FOR ROUTINE; 
                                'N' FOR NON-ROUTINE; 
              LAST EDITED:      NOV 01, 1994 
              HELP-PROMPT:      Enter (R)outine if class does not enhance employee's job qualifications, or (N)on-Routine if the 
                                opposite is true. 
              DESCRIPTION:       This field indicates whether or not the class enhances or does not enhance the employee's job
                                qualifications.  

              TECHNICAL DESCR:
                                set of codes 


452,33        SVC REASON             1;0 POINTER Multiple #452.033 (Add New Entry without Asking)

              DESCRIPTION:      This field contains the service's reason or purpose for emloyees attending the class.  This field
                                uses data contained in File 452.6.  

              TECHNICAL DESCR:
                                POINTER TO SVC REASON FOR TRAINING File 452.6 


452.033,.01     SVC REASON             0;1 POINTER TO PRSE SVC REASONS FOR TRAINING FILE (#452.6) (Multiply asked)

                SVC REASON FOR CLASS   
                LAST EDITED:      MAY 21, 1993 
                DESCRIPTION:      This field contains the service's reason or purpose for employees attending the class.  This
                                  field uses data contained in File 452.6.  

                TECHNICAL DESCR:
                                  POINTER TO SVC REASON FOR TRAINING File 452.6 

                CROSS-REFERENCE:  452.033^B 
                                  1)= S ^PRSE(452,DA(1),1,"B",$E(X,1,30),DA)=""
                                  2)= K ^PRSE(452,DA(1),1,"B",$E(X,1,30),DA)
                                  Main index of service reason entries that point to the PRSE SVC REASONS FOR TRAINING (#452.6)
                                  File.  





452,55        FUNDS REQUESTED        3;0 SET Multiple #452.055 (Add New Entry without Asking)

              DESCRIPTION:
                                This field indicates intended use of requested funds, e.g., hotel, registration, etc.  


452.055,.01     FUNDS REQUESTED        0;1 SET (Multiply asked)

                                  'A' FOR AIRFARE; 
                                  'P' FOR PER DIEM; 
                                  'R' FOR REGISTRATION; 
                                  'H' FOR HOTEL; 
                                  'T' FOR TRAVEL; 
                                  'N' FOR NONE REQUESTED; 
                                  'U' FOR TUITION; 
                                  'B' FOR BOOKS/MATERIALS; 
                                  'D' FOR DIRECT OTHER; 
                                  'I' FOR INDIRECT OTHER; 
                INPUT TRANSFORM:  S X=$$UP^XLFSTR(X) Q
                LAST EDITED:      AUG 22, 1994 
                DESCRIPTION:
                                  This field indicates intended use of requested funds, e.g., hotel, registration, etc.  

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

                CROSS-REFERENCE:  452.055^B 
                                  1)= S ^PRSE(452,DA(1),3,"B",$E(X,1,30),DA)=""
                                  2)= K ^PRSE(452,DA(1),3,"B",$E(X,1,30),DA)
                                  Main index of Funds Requested entries from the defined code set.  



452.055,1       AMOUNT REQUESTED       0;2 NUMBER

                INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999.99)!(X<0) X
                LAST EDITED:      MAY 21, 1993 
                HELP-PROMPT:      Type a Dollar Amount between 0 and 99999.99, 2 Decimal Digits. 
                DESCRIPTION:
                                  This field stores the total funding (dollar amount) requested by employee.  




452,66        FUNDS AUTHORIZED       4;0 SET Multiple #452.066 (Add New Entry without Asking)

              DESCRIPTION:
                                This field indicates intended use of authorized funds, e.g., hotel, airfare.  


452.066,.01     FUNDS AUTHORIZED       0;1 SET (Multiply asked)

                                  'A' FOR AIRFARE; 
                                  'P' FOR PER DIEM; 
                                  'R' FOR REGISTRATION; 
                                  'H' FOR HOTEL; 
                                  'T' FOR TRAVEL; 
                                  'N' FOR NONE REQUESTED; 
                                  'U' FOR TUITION; 
                                  'B' FOR BOOKS/MATERIALS; 
                                  'D' FOR DIRECT OTHER; 
                                  'I' FOR INDIRECT OTHER; 
                INPUT TRANSFORM:  S X=$$UP^XLFSTR(X) Q
                LAST EDITED:      AUG 22, 1994 
                DESCRIPTION:
                                  This field indicates intended use of authorized funds, e.g., hotel, airfare.  

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

                CROSS-REFERENCE:  452.066^B 
                                  1)= S ^PRSE(452,DA(1),4,"B",$E(X,1,30),DA)=""
                                  2)= K ^PRSE(452,DA(1),4,"B",$E(X,1,30),DA)
                                  Main index of the Funds Authorized entries from the defined code set.  



452.066,1       AMOUNT AUTHORIZED      0;2 NUMBER

                INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999.99)!(X<0) X
                LAST EDITED:      MAY 21, 1993 
                HELP-PROMPT:      Type a Dollar Amount between 0 and 99999.99, 2 Decimal Digits. 
                DESCRIPTION:
                                  This field stores the dollar amount authorized by a service to an employee.  




452,77        C.E.U. COMMENTS        5;0   WORD-PROCESSING #452.077

              DESCRIPTION:
                                This field contains additional comments regarding program/funding.  


                LAST EDITED:      DEC 07, 1992 
                HELP-PROMPT:      This is a word-processing field. 
                DESCRIPTION:
                                  Enter additional comments regarding program/funding.  





      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 STUDENT NAME (#.01)

PRSE EDUCATION ACCREDITATION O 
                   (#452.9)       ACCREDITING ORGANIZATION (#8)

PRSE EDUCATION PROGRAM/CLASS C 
                   (#452.4)       PROGRAM/CLASS CATEGORY (#4)

PRSE EMPLOYEE PURPOSE OF TRAIN 
                   (#452.51)      PURPOSE OF TRAINING (#4.1)

PRSE SVC REASONS FOR TRAINING 
                   (#452.6)       SVC REASON:SVC REASON (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):