STANDARD DATA DICTIONARY #457.2 -- SPECIAL TOUR INDICATOR FILE                                                    6/27/25    PAGE 1
STORED IN ^PRST(457.2,  (9 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                     (VERSION 4.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains a list of special processing conditions which may relate to a particular Tour of Duty time segment.  
 
This file should not be altered except as instructed.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: 
      "WRITE": W "   ",$P(^(0),U,3)

POINTED TO BY: SPECIAL CODE-1 field (#13) of the TOUR OF DUTY File (#457.1) 
               SPECIAL CODE-2 field (#16) of the TOUR OF DUTY File (#457.1) 
               SPECIAL CODE-3 field (#19) of the TOUR OF DUTY File (#457.1) 
               SPECIAL CODE-4 field (#22) of the TOUR OF DUTY File (#457.1) 
               SPECIAL CODE-5 field (#25) of the TOUR OF DUTY File (#457.1) 
               SPECIAL CODE-6 field (#28) of the TOUR OF DUTY File (#457.1) 
               TOUR #1 SCH SPECIAL CODE-1 field (#13) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #1 SCH SPECIAL CODE-2 field (#16) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #1 SCH SPECIAL CODE-3 field (#19) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #1 SCH SPECIAL CODE-4 field (#22) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #1 SCH SPECIAL CODE-5 field (#25) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #1 SCH SPECIAL CODE-6 field (#28) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #2 SCH SPECIAL CODE-1 field (#32.2) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #2 SCH SPECIAL CODE-2 field (#32.5) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #2 SCH SPECIAL CODE-3 field (#32.8) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #2 SCH SPECIAL CODE-4 field (#33.1) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #2 SCH SPECIAL CODE-5 field (#33.4) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               TOUR #2 SCH SPECIAL CODE-6 field (#33.7) of the DAY # sub-field (#458.02) of the EMPLOYEE sub-field (#458.01) of the 
                   TIME & ATTENDANCE RECORDS File (#458) 
               

CROSS
REFERENCED BY: NAME(AC), NAME(B), UPPERCASE NAME(C), CODE(D)



457.2,.01     NAME                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>20!($L(X)<3) X
              LAST EDITED:      AUG 09, 1994 
              HELP-PROMPT:      Answer must be 3-20 characters in length. 
              DESCRIPTION:
                                The full name of the special tour indicator.  

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

              CROSS-REFERENCE:  457.2^AC^MUMPS 
                                1)= S $P(^PRST(457.2,DA,0),"^",3)=DA
                                2)= Q
                                Cross-reference is actually a form of a trigger and forces the internal number of the entry into
                                the CODE field as data.  


              CROSS-REFERENCE:  ^^TRIGGER^457.2^4 
                                1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^PRST(457.2,D0,0)):^(0),1:"") S X=$P(Y(1),U,5),X=X S
                                 DIU=X K Y X ^DD(457.2,.01,1,3,1.1) X ^DD(457.2,.01,1,3,1.4)

                                1.1)= S X=DIV S X=DIV X "F %=1:1:$L(X) S:$E(X,%)?1L X=$E(X,0,%-1)_$C($A(X,%)-32)_$E(X,%+1,999)"

                                1.4)= S DIH=$S($D(^PRST(457.2,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,5)=DIV,DIH=457.2,DIG=4 D ^DIC
                                R:$O(^DD(DIH,DIG,1,0))>0

                                2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^PRST(457.2,D0,0)):^(0),1:"") S X=$P(Y(1),U,5),X=X S
                                 DIU=X K Y S X="" X ^DD(457.2,.01,1,3,2.4)

                                2.4)= S DIH=$S($D(^PRST(457.2,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,5)=DIV,DIH=457.2,DIG=4 D ^DIC
                                R:$O(^DD(DIH,DIG,1,0))>0

                                CREATE VALUE)= UPPERCASE(NAME)
                                DELETE VALUE)= @
                                FIELD)= UPPERCASE NAME
                                This triggers an all uppercase name which is cross-referenced for lookup.  



457.2,1       TYPE OF TIME           0;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2)!'(X?2U) X
              LAST EDITED:      MAY 22, 1992 
              HELP-PROMPT:      Answer must be 2 uppercase characters in length. 
              DESCRIPTION:
                                A two letter abbreviation for the special tour indicator.  


457.2,2       CODE                   0;3 NUMBER (Required)

              INPUT TRANSFORM:  K:X'=DA X
              LAST EDITED:      JUL 23, 1992 
              HELP-PROMPT:      Type a Number between 1 and 99, 0 Decimal Digits 
              DESCRIPTION:
                                The numeric code that identifies the special tour indicator.  

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

              CROSS-REFERENCE:  457.2^D 
                                1)= S ^PRST(457.2,"D",$E(X,1,30),DA)=""
                                2)= K ^PRST(457.2,"D",$E(X,1,30),DA)


457.2,3       LONG DESCRIPTION       0;4 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>60!($L(X)<3) X
              LAST EDITED:      JAN 17, 1992 
              HELP-PROMPT:      Answer must be 3-60 characters in length. 
              DESCRIPTION:
                                A free text response that describes the special tour indicator.  


457.2,4       UPPERCASE NAME         0;5 FREE TEXT

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>20!($L(X)<3) X
              LAST EDITED:      JAN 28, 1992 
              HELP-PROMPT:      Answer must be 3-20 characters in length. 
              DESCRIPTION:
                                The name of the special tour indicator spelled out in uppercase letters.  

              WRITE AUTHORITY:  ^
              NOTES:            TRIGGERED by the NAME field of the SPECIAL TOUR INDICATOR File 

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


457.2,5       SHORT NAME             0;6 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>10!($L(X)<3) X
              LAST EDITED:      OCT 05, 1993 
              HELP-PROMPT:      Answer must be 3-10 characters in length. 
              DESCRIPTION:
                                This is a short name to be displayed when posting time segments.  



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):