STANDARD DATA DICTIONARY #458.6 -- OVERTIME WARNINGS FILE 3/24/25 PAGE 1 STORED IN ^PRST(458.6, *** 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 entries that are generated during a supervisors certification. When an employee's 8B string contains more overtime than approved overtime in the requests file, a warning message is displayed to the supervisor before certifying the timecard. If the supervisor certifies the timecard without resolving the warning then the warning is filed in this file. The entries are for either week 1 or week 2 of a pay period. DD ACCESS: @ RD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ AUDIT ACCESS: @ APPLICATION GROUP(S): PRS CROSS REFERENCED BY: STATUS(AC), NUMBER(B), PAY PERIOD(C), PAY PERIOD(D), STATUS(E) 458.6,.01 NUMBER 0;1 NUMBER (Required) INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: OCT 01, 1998 HELP-PROMPT: Type a Number between 1 and 9999999, 0 Decimal Digits DESCRIPTION: a sequential number to uniquely identify each warning. DELETE TEST: 1,0)= I 1 D EN^DDIOL(" OT WARNING CAN'T BE DELETED!! ","","?0") CROSS-REFERENCE: 458.6^B 1)= S ^PRST(458.6,"B",$E(X,1,30),DA)="" 2)= K ^PRST(458.6,"B",$E(X,1,30),DA) CROSS-REFERENCE: ^^TRIGGER^458.6^4 1)= X ^DD(458.6,.01,1,2,1.3) I X S X=DIV S Y(1)=$S($D(^PRST(458.6,D0,0)):^(0),1:"") S X=$P(Y(1),U,5 ),X=X S DIU=X K Y S X=DIV S X="A" X ^DD(458.6,.01,1,2,1.4) 1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(2)=$C(59)_$S($D(^DD(458.6,4,0)):$P(^(0),U,3),1:"") ,Y(1)=$S($D(^PRST(458.6,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,5)_":",2),$C(59),1)="" 1.4)= S DIH=$S($D(^PRST(458.6,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,5)=DIV,DIH=458.6,DIG=4 D ^DIC R:$O(^DD(DIH,DIG,1,0))>0 2)= Q CREATE CONDITION)= STATUS="" CREATE VALUE)= S X="A" DELETE VALUE)= NO EFFECT FIELD)= STATUS Trigger ensures that whenever an overtime warning is filed that it's status is set to active. The conditional expression ensures that the status is not triggered unless it is a new overtime warning entry and won't reset status if the trigger is reindexed. 458.6,1 EMPLOYEE 0;2 POINTER TO PAID EMPLOYEE FILE (#450) (Required) LAST EDITED: AUG 06, 1998 DESCRIPTION: The employee who has more calculated overtime in their 8B string than approved overtime in the OT/CT requests file. 458.6,2 PAY PERIOD 0;3 POINTER TO TIME & ATTENDANCE RECORDS FILE (#458) (Required) LAST EDITED: AUG 13, 1998 DESCRIPTION: The pay period in which the overtime warning occurs. CROSS-REFERENCE: 458.6^C 1)= S ^PRST(458.6,"C",$E(X,1,30),DA)="" 2)= K ^PRST(458.6,"C",$E(X,1,30),DA) CROSS-REFERENCE: 458.6^D^MUMPS 1)= S PRSZ=$P($G(^PRST(458,X,0)),"^"),^PRST(458.6,"D",$$IC^PRSAPPU($P(PRSZ,"-"),4,10,)_"-"_$P(PRSZ, "-",2),DA)="" K PRSZ 2)= S PRSZ=$P($G(^PRST(458,X,0)),"^") K ^PRST(458.6,"D",$$IC^PRSAPPU($P(PRSZ,"-"),4,10,)_"-"_$P(PRS Z,"-",2),DA),PRSZ 4 digit year cross ref on pay period in order to be year 2000 compliant. 458.6,3 WEEK 0;4 NUMBER (Required) INPUT TRANSFORM: K:+X'=X!(X>2)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: AUG 06, 1998 HELP-PROMPT: Type a Number between 1 and 2, 0 Decimal Digits DESCRIPTION: Either the first (1) or second (2) week of the pay period in which the overtime warning occurs. 458.6,4 STATUS 0;5 SET (Required) 'A' FOR ACTIVE; 'C' FOR CLEARED; LAST EDITED: SEP 24, 1998 DESCRIPTION: When a supervisor approves a timecard with an overtime warning an entry is added to this file and it is assumed active. Payroll may decide to clear the warning thereby changing the status to cleared. WRITE AUTHORITY: ^ NOTES: TRIGGERED by the NUMBER field of the OVERTIME WARNINGS File CROSS-REFERENCE: 458.6^AC^MUMPS 1)= I $$STATCHNG^PRSAOTTF(DA,X) D CLRXREF^PRSAOTTF(DA) 2)= Q This cross reference looks at the existing value of the "E" x-ref on this field (STATUS) to determine if the value of this field is being changed. If the STATUS is being changed then the LAST UPDATED BY field is set to the current user via their DUZ. CROSS-REFERENCE: 458.6^E 1)= S ^PRST(458.6,"E",$E(X,1,30),DA)="" 2)= K ^PRST(458.6,"E",$E(X,1,30),DA) This x-ref maintains an index of Active and Cleared Overtime Warnings. 458.6,5 LAST UPDATED BY 0;6 POINTER TO NEW PERSON FILE (#200) LAST EDITED: SEP 21, 1998 DESCRIPTION: User in file 200 who changes the STATUS of the warning to CLEARED (C). TECHNICAL DESCR: triggered by status field being set to Cleared. WRITE AUTHORITY: ^ 458.6,6 DATE/TIME CLEARED 0;7 DATE INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X LAST EDITED: AUG 06, 1998 DESCRIPTION: Date and time that the overtime warning is cleared. 458.6,7 8B STRING OVERTIME 0;8 NUMBER (Required) INPUT TRANSFORM: K:+X'=X!(X>98)!(X<0)!(X?.E1"."3N.N) X LAST EDITED: AUG 06, 1998 HELP-PROMPT: Type a Number between 0 and 98, 2 Decimal Digits DESCRIPTION: The total of all types of overtime in the employees 8B string for either week 1 or 2. 458.6,8 APPROVED OVERTIME 0;9 NUMBER (Required) INPUT TRANSFORM: K:+X'=X!(X>98)!(X<0)!(X?.E1"."3N.N) X LAST EDITED: AUG 06, 1998 HELP-PROMPT: Type a Number between 0 and 98, 2 Decimal Digits DESCRIPTION: The total amount of approved overtime at the time this warning is filed. FILES POINTED TO FIELDS NEW PERSON (#200) LAST UPDATED BY (#5) PAID EMPLOYEE (#450) EMPLOYEE (#1) TIME & ATTENDANCE RECORDS (#458) PAY PERIOD (#2) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):