STANDARD DATA DICTIONARY #455.5 -- T&L UNIT FILE                                                                  3/24/25    PAGE 1
STORED IN ^PRST(455.5,  *** 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 the list of T&L units established by a station as well as the associated timekeepers.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: NAME (#1)

POINTED TO BY: NURSE T&L UNIT field (#6) of the VA NURSE sub-field (#451.09) of the POC DAILY TIME RECORDS File (#451) 
               NURSE T&L UNIT field (#15) of the POC DAILY ACTIVITY EXTRACTION File (#451.7) 
               ASSOCIATED T&L UNIT field (#.01) of the ASSOCIATED T&L UNIT sub-field (#457.13) of the TOUR OF DUTY File (#457.1) 
               T&L UNIT field (#.01) of the T&L UNIT sub-field (#730.01) of the NATIONAL SERVICE File (#730) 
               

CROSS
REFERENCED BY: OT/CT APPROVER(AA), SUPERVISOR(AS), T&L WHICH CERTIFIES SUPERVISOR(ASX), TIMEKEEPER(AT), CODE(B)

INDEXED BY:    POC DATA ENTRY PERSONNEL (AE), POC DATA APPROVAL PERSONNEL (AR)




455.5,.01     CODE                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<3)!'(X?3N!(X?1"VC"1U)!(X?1"F"2N)) X
              LAST EDITED:      NOV 28, 1995 
              HELP-PROMPT:      ANSWER MUST BE 3 NUMBERS IN LENGTH OR 'VC' AND AN ALPHABETIC CHARACTER OR 'F' AND 2 NUMBERS 
              DESCRIPTION:
                                This field contains the three-character code assigned to the T&L Unit.  

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

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


455.5,1       NAME                   0;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>20!($L(X)<3) X
              HELP-PROMPT:      ANSWER MUST BE 3-20 CHARACTERS IN LENGTH 
              DESCRIPTION:
                                This field contains a descriptive name for the T&L unit.  


455.5,2       CURRENT PAY PERIOD STATUS 0;3 SET

                                'T' FOR TIMEKEEPER CLOSED; 
                                'P' FOR PAYROLL REVIEWED; 
                                'X' FOR SENT TO AUSTIN; 
              LAST EDITED:      OCT 20, 1989 
              DESCRIPTION:      This field indicates the status of the T&L unit for the current pay period. The status is updated
                                only when all employees in the unit have been processed by the Timekeeper or reviewed by Payroll.  


455.5,10      TIMEKEEPER             T;0 POINTER Multiple #455.51

              DESCRIPTION:
                                This field contains the Timekeepers assigned to the T&L Unit.  


455.51,.01      TIMEKEEPER             0;1 POINTER TO NEW PERSON FILE (#200)

                INPUT TRANSFORM:  I $D(X) S DINUM=X
                DESCRIPTION:      This field is a pointer to the New Person File (File 200) and is a timekeeper assigned to this
                                  T&L Unit.  

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

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

                CROSS-REFERENCE:  455.5^AT^MUMPS 
                                  1)= S ^PRST(455.5,"AT",DA,DA(1))=""
                                  2)= K ^PRST(455.5,"AT",DA,DA(1))
                                  This is a cross-reference by User of all T&L units for which this user is a Timekeeper.  



455.51,1        ENTRY METHOD           0;2 SET (Required)

                                  '0' FOR SINGLE STRING ENTRY; 
                                  '1' FOR INDIVIDUAL PROMPTS; 
                LAST EDITED:      AUG 22, 1988 
                DESCRIPTION:
                                  This field contains the preferred data entry method for the Timekeeper.  




455.5,11      SUPERVISOR             S;0 POINTER Multiple #455.511

              LAST EDITED:      FEB 18, 1992 
              DESCRIPTION:      This is a list of the persons who may function as OT/CT supervisors in that they officially request
                                OT/CT time and verify the time worked for this T&L unit.  


455.511,.01     SUPERVISOR             0;1 POINTER TO NEW PERSON FILE (#200)

                INPUT TRANSFORM:  I $D(X) S DINUM=X
                LAST EDITED:      NOV 10, 1990 
                DESCRIPTION:      This is a pointer to file 200 and represents a supervisor who may request and verify OT/CT for
                                  this T&L unit.  

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

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

                CROSS-REFERENCE:  455.5^AS^MUMPS 
                                  1)= S ^PRST(455.5,"AS",DA,DA(1))=""
                                  2)= K ^PRST(455.5,"AS",DA,DA(1))
                                  This is a cross-reference by User of all T&L units of which the user is a supervisor.  



455.511,1       T&L WHICH CERTIFIES SUPERVISOR 0;2 FREE TEXT (Required)

                INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) S DIC=455.5,DIC(0)="EMQ" D ^DIC K DIC S X=$P(Y,"^",2) K:$L(X)'=3 X
                LAST EDITED:      SEP 09, 2011 
                DESCRIPTION:      A supervisor from this T&L Unit will be displayed all actions requiring approval of the
                                  supervisor. It will often be the Director's Office T&L for Service Chief supervisors for example.  

                EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(455.5,",DIC(0)="Q",D="B" D DQ^DICQ Q
                CROSS-REFERENCE:  455.5^ASX^MUMPS 
                                  1)= S ^PRST(455.5,"ASX",$E(X,1,30),DA,DA(1))=""
                                  2)= K ^PRST(455.5,"ASX",$E(X,1,30),DA,DA(1))
                                  This is a cross-reference by T&L Unit of supervisors certified by that T&L Unit. It is used to
                                  find supervisory employees that should be included when certifications or approvals are performed
                                  for the T&L.  
                                    ^PRST(455.5,"ASX",X,DA,DA(1)) where: 
                                      X is the T&L which certifies the supervisor (external value).  
                                      DA is the supervisor's ien (equal to ien in file #200 due to DINUM).  
                                      DA(1) is the ien of the T&L UNIT that the supervisor supervises.  





455.5,12      OT/CT APPROVER         A;0 POINTER Multiple #455.512

              LAST EDITED:      JUL 15, 1992 
              DESCRIPTION:      This is a list of persons who may function as OT/CT approving officials for OT/CT requests from
                                this T&L unit.  


455.512,.01     OT/CT APPROVER         0;1 POINTER TO NEW PERSON FILE (#200)

                INPUT TRANSFORM:  I $D(X) S DINUM=X
                LAST EDITED:      NOV 10, 1990 
                DESCRIPTION:
                                  This is a pointer into file 200 and represents an OT/CT approver for this T&L unit.  

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

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

                CROSS-REFERENCE:  455.5^AA^MUMPS 
                                  1)= S ^PRST(455.5,"AA",DA,DA(1))=""
                                  2)= K ^PRST(455.5,"AA",DA,DA(1))
                                  This is a cross-reference by User of all T&L units for which the user is an OverTime/CompTime
                                  approver.  





455.5,20      STATION #              0;4 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3)!'(X?3N) X
              LAST EDITED:      MAR 30, 1992 
              HELP-PROMPT:      Answer must be 3 digits in length. 
              DESCRIPTION:
                                This is a pointer to the Institution file and is the station with which this T&L is associated.  


455.5,20.5    MEDICAL CENTER DIVISION 1;1 POINTER TO INSTITUTION FILE (#4)

              INPUT TRANSFORM:  S DIC("S")="I +$P($$SITE^VASITE(),U,3)=+$G(^DIC(4,+Y,99))&'$P($G(^DIC(4,+Y,99)),U,4)" D ^DIC K DIC 
                                S DIC=$G(DIE),X=+Y K:Y<0 X
              LAST EDITED:      NOV 07, 2011 
              HELP-PROMPT:      Must be in the INSTITUTION file (#4) and associated with this facility. 
              DESCRIPTION:      This field points to an entry in the INSTITUTION file (#4).  It may be a stand alone facility or in
                                the case of an integrated site it could be the parent facility or any of its subordinates.  

              SCREEN:           S DIC("S")="I +$P($$SITE^VASITE(),U,3)=+$G(^DIC(4,+Y,99))&'$P($G(^DIC(4,+Y,99)),U,4)"
              EXPLANATION:      Only allow selection of active divisions for this VistA instance.

455.5,21      SERVICE                0;5 POINTER TO SERVICE/SECTION FILE (#49)

              LAST EDITED:      MAR 19, 1990 
              DESCRIPTION:      This is a pointer into the Service/Section file (49) and indicates the Service with which this T&L
                                is associated.  


455.5,22      SECTION                0;6 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>20!($L(X)<3) X
              LAST EDITED:      FEB 07, 1992 
              HELP-PROMPT:      Answer must be 3-20 characters in length. 
              DESCRIPTION:      This is a free text field indicating the service sub-unit or division with which this T&L unit is
                                associated.  


455.5,23      ENTITLED TO PREMIUMS?  0;7 SET (Required)

                                '1' FOR YES; 
                                '0' FOR NO; 
              LAST EDITED:      SEP 25, 1992 
              DESCRIPTION:
                                Indicates the time and leave unit is entitled to premium pay.  


455.5,24      TIME SLEEP-TIME BEGINS 0;8 FREE TEXT (Required)

              INPUT TRANSFORM:  D:$D(X) ^PRSATIM
              LAST EDITED:      SEP 25, 1992 
              DESCRIPTION:
                                When Sleep Time begins for Standby tours of duty in this time and leave unit.  

              EXECUTABLE HELP:  D HLP^PRSATIM
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


455.5,30      POC DATA ENTRY PERSONNEL 2;0 POINTER Multiple #455.52

              DESCRIPTION:      This field contains persons that are responsible for entering additional data about VA nurses time
                                and attendance activity for this T&L unit that will be used by the VANOD database.  


455.52,.01      POC DATA ENTRY PERSONNEL 0;1 POINTER TO NEW PERSON FILE (#200)

                LAST EDITED:      DEC 17, 2009 
                HELP-PROMPT:      Select personnel responsible for entering Nurse POC data. 
                DESCRIPTION:      This field points to the NEW PERSON file (#200) and identifies individuals that are responsible
                                  for entering Nurse POC data for this T&L unit.  

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

                CROSS-REFERENCE:  455.52^AC^MUMPS 
                                  1)= D ASSIGNKY^PRSNEETP(.X)
                                  2)= D REMOVEKY^PRSNEETP(.DA,.X)
                                  This cross reference does not set any index.  It calls MUMPS code to assign the PRSN DEP Security
                                  Key when a user is added to the POC Data Entry Personnel multiple.  When a user is deleted from
                                  the multiple the cross reference calls code to remove the security key.  The key won't be removed
                                  if the user is also a POC Data Entry Personnel in another T&L unit.  


                FIELD INDEX:      AE (#1015)    REGULAR    IR    SORTING ONLY    WHOLE FILE (#455.5)
                    Short Descr:  POC Data Entry Personnel
                    Description:  This is a whole file index to sort POC DATA ENTRY PERSONNEL by the T&L Units for which they are
                                  responsible.  
                      Set Logic:  S ^PRST(455.5,"AE",X,DA(1),DA)=""
                     Kill Logic:  K ^PRST(455.5,"AE",X,DA(1),DA)
                     Whole Kill:  K ^PRST(455.5,"AE")
                           X(1):  POC DATA ENTRY PERSONNEL  (455.52,.01)  (Subscr 1)  (forwards)




455.5,31      POC DATA APPROVAL PERSONNEL 3;0 POINTER Multiple #455.531

              DESCRIPTION:      This field contains persons that are responsible for approving additional data about VA nurses time
                                and attendance activity for this T&L unit that will be used by the VANOD database.  


455.531,.01     POC DATA APPROVAL PERSONNEL 0;1 POINTER TO NEW PERSON FILE (#200)

                LAST EDITED:      JUL 10, 2009 
                HELP-PROMPT:      Select personnel that will be responsible for Nurse POC data approval. 
                DESCRIPTION:      This field points to the NEW PERSON file (#200) and identifies persons that are responsible for
                                  approving Nurse POC data for this T&L unit.  

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

                FIELD INDEX:      AR (#1016)    REGULAR    IR    SORTING ONLY    WHOLE FILE (#455.5)
                    Short Descr:  POC Data Approval Personnel
                    Description:  This is a whole file index to sort POC DATA APPROVAL PERSONNEL by the T&L Units for which they
                                  are responsible.  
                      Set Logic:  S ^PRST(455.5,"AR",X,DA(1),DA)=""
                     Kill Logic:  K ^PRST(455.5,"AR",X,DA(1),DA)
                     Whole Kill:  K ^PRST(455.5,"AR")
                           X(1):  POC DATA APPROVAL PERSONNEL  (455.531,.01)  (Subscr 1)  (forwards)




455.5,101     PENDING CERTIFICATION ACTIONS 0;10 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      APR 12, 1995 
              HELP-PROMPT:      Type a Number between 0 and 9999, 0 Decimal Digits 
              DESCRIPTION:      This field contains the number of pending actions relating to leave, overtime, tour changes, and
                                prior pay period corrections which require supervisory certification.  


455.5,102     PENDING OT/PPA ACTIONS 0;11 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      MAY 23, 1995 
              HELP-PROMPT:      Type a Number between 0 and 9999, 0 Decimal Digits 
              DESCRIPTION:      This field contains the number of OT/CT and Prior Pay Period Adjustment actions requiring
                                second-level approval.  



      FILES POINTED TO                      FIELDS

INSTITUTION (#4)                  MEDICAL CENTER DIVISION (#20.5)

NEW PERSON (#200)                 TIMEKEEPER:TIMEKEEPER (#.01)
                                  SUPERVISOR:SUPERVISOR (#.01)
                                  OT/CT APPROVER:OT/CT APPROVER (#.01)
                                  POC DATA ENTRY PERSONNEL:POC DATA ENTRY PERSONNEL (#.01)
                                  POC DATA APPROVAL PERSONNEL:POC DATA APPROVAL PERSONNEL (#.01)

SERVICE/SECTION (#49)             SERVICE (#21)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):
PRSA TL DISP                  FEB 07, 1992        USER #0
  PRSA TL DISP                  DD #455.5

PRSA TL EDIT                  FEB 07, 1992        USER #0
  PRSA TL DISP                  DD #455.5
  PRSA TL ED1                   DD #455.51
  PRSA TL ED2                   DD #455.511
  PRSA TL ED3                   DD #455.512

PRSN EDIT TL POC              NOV 24, 2009@08:30  USER #0
  PRSN TL EDIT                  DD #455.5