Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 458.02

Package: PAID

TIME & ATTENDANCE RECORDS(#458)-->458.01-->458.02

Sub-Field: 458.02


Information

Parent File Name Number Package
458.01 DAY # 458.02 PAID

Details

Field # Name Loc Type Details
.01 DAY # 0;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>14)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 21, 1992
  • HELP-PROMPT:  Type a Number between 1 and 14, 0 Decimal Digits
  • DESCRIPTION:  
    The day number of the pay period.
  • RECORD INDEXES:  AEA (#78) (WHOLE FILE #458), ASA (#707) (WHOLE FILE #458)
2 TOUR OF DUTY 0;2 POINTER TO TOUR OF DUTY FILE (#457.1) TOUR OF DUTY(#457.1)

  • LAST EDITED:  MAR 04, 1992
  • DESCRIPTION:  
    A pointer to the TOUR OF DUTY file (#457.1) which identifies the employee's tour of duty for this day.
3 TEMPORARY TOUR? 0;3 SET
  • '0' FOR NO;
  • '1' FOR YES (CURRENT PP CHANGE);
  • '2' FOR YES (NEXT PP CHANGE);

  • LAST EDITED:  JAN 12, 2000
  • HELP-PROMPT:  Select answer from choices.
  • DESCRIPTION:  
    Identifies the tour for this day as a temporary tour. Set as 1 if temporary tour change was made to current pay period or as 2 if tour change is effective with the next pay period.
4 PRIOR SCHEDULED TOUR 0;4 POINTER TO TOUR OF DUTY FILE (#457.1) TOUR OF DUTY(#457.1)

  • LAST EDITED:  APR 29, 1992
  • DESCRIPTION:  
    A pointer to the TOUR OF DUTY file (#457) which identifies the permanent tour of duty when a temporary tour of duty is being used in place of the permanent tour of duty.
  • CROSS-REFERENCE:  458^ATC^MUMPS
    1)= I $P(^PRST(458,DA(2),"E",DA(1),"D",DA,0),"^",5)="" S ^PRST(458,"ATC",DA(1),DA(2),DA)=""
    2)= Q
    This cross-reference is set whenever a tour change occurs and is used to indicate to the supervisor that a tour change has occurred and must be approved. In the special case where a prior tour has yet to be approved
    (and hence the cross-reference is already set) and a new change supercedes the prior change, the cross-reference is not set as it has already been set.
5 SUPERVISOR 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  APR 29, 1992
  • DESCRIPTION:  
    A pointer to the NEW PERSON file (#200) that identifies the employee's supervisor for this day.
6 APPROVAL DATE/TIME 0;6 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 20, 1992
  • DESCRIPTION:  
    The date and time the supervisor approved the tour of duty change.
7 SUPR. ES 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<6) X
  • OUTPUT TRANSFORM:  S Y=""
  • LAST EDITED:  MAY 25, 1995
  • HELP-PROMPT:  Answer must be 6-20 characters in length.
  • DESCRIPTION:  
    A free text response which is the supervisor's electronic signature code.
8 TOUR LENGTH 0;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>24)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  JUL 14, 1992
  • HELP-PROMPT:  Type a Number between 0 and 24, 2 Decimal Digits
  • DESCRIPTION:  
    The tour's length of time in hours and minutes.
9 TEMP TOUR T&L 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X I $D(X) S DIC="^PRST(455.5,",DIC(0)="QEM" D ^DIC K DIC S X=$S(Y>0:$P(Y,"^",2),1:"") K:$L(X)'=3 X
  • LAST EDITED:  AUG 07, 1992
  • DESCRIPTION:  
    The Time and Leave Unit where the employee worked if a temporary tour of duty was worked.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(455.5,",DIC(0)="Q",D="B" D DQ^DICQ Q
10 TOUR LAST POSTED BY 0;10 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  AUG 27, 1992
  • DESCRIPTION:  
    A pointer to the NEW PERSON file (#200) which identifies the last person who posted a tour for the employee for this day.
10.1 POSTING DATE/TIME 0;11 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 27, 1992
  • DESCRIPTION:  
    The date and time the data was posted for this employee for this day.
10.2 OBSERVED HOLIDAY 0;12 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 11, 1993
  • DESCRIPTION:  
    Identifies the day as an observed holiday for the date indicated.
10.3 SECOND TOUR OF DUTY 0;13 POINTER TO TOUR OF DUTY FILE (#457.1) TOUR OF DUTY(#457.1)

  • LAST EDITED:  OCT 26, 1992
  • DESCRIPTION:  
    A pointer to the TOUR OF DUTY file (#457.1) which identifies a second tour of duty the employee will work on this day.
10.4 TOUR #2 LENGTH 0;14 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>24)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  OCT 26, 1992
  • HELP-PROMPT:  Type a Number between 0 and 24, 2 Decimal Digits
  • DESCRIPTION:  
    The second tour's length of time in hours and minutes.
10.5 TOUR #2 T&L 0;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X I $D(X) S DIC="^PRST(455.5,",DIC(0)="QEM" D ^DIC K DIC S X=$S(Y>0:$P(Y,"^",2),1:"") K:$L(X)'=3 X
  • LAST EDITED:  OCT 26, 1992
  • DESCRIPTION:  
    The Time and Leave Unit the second tour is associated with.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(455.5,",DIC(0)="Q",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
11 TOUR #1 SCH START TIME-1 1;1 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the first segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
12 TOUR #1 SCH STOP TIME-1 1;2 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the first segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
13 TOUR #1 SCH SPECIAL CODE-1 1;3 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the first segment of the first tour of duty for this day.
14 TOUR #1 SCH START TIME-2 1;4 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the second segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
15 TOUR #1 SCH STOP TIME-2 1;5 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the second segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
16 TOUR #1 SCH SPECIAL CODE-2 1;6 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the second segment of the first tour of duty for this day.
17 TOUR #1 SCH START TIME-3 1;7 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the third segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
18 TOUR #1 SCH STOP TIME-3 1;8 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the third segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
19 TOUR #1 SCH SPECIAL CODE-3 1;9 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the third segment of the first tour of duty for this day.
20 TOUR #1 SCH START TIME-4 1;10 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the fourth segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
21 TOUR #1 SCH STOP TIME-4 1;11 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the fourth segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
22 TOUR #1 SCH SPECIAL CODE-4 1;12 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the fourth segment of the first tour of duty for this day.
23 TOUR #1 SCH START TIME-5 1;13 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the fifth segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
24 TOUR #1 SCH STOP TIME-5 1;14 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the fifth segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
25 TOUR #1 SCH SPECIAL CODE-5 1;15 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the fifth segment of the first tour of duty for this day.
26 TOUR #1 SCH START TIME-6 1;16 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the sixth segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
27 TOUR #1 SCH STOP TIME-6 1;17 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the sixth segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
28 TOUR #1 SCH SPECIAL CODE-6 1;18 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the sixth segment of the first tour of duty for this day.
29 TOUR #1 SCH START TIME-7 1;19 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the seventh segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
30 TOUR #1 SCH STOP TIME-7 1;20 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the seventh segment of the first tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
31 TOUR #1 SCH SPECIAL CODE-7 1;21 FREE TEXT

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the seventh segment of the first tour of duty for this day.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
32 TOUR #2 SCH START TIME-1 4;1 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the first segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
32.1 TOUR #2 SCH STOP TIME-1 4;2 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the first segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
32.2 TOUR #2 SCH SPECIAL CODE-1 4;3 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the first segment of the second tour of duty for this day.
32.3 TOUR #2 SCH START TIME-2 4;4 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the second segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
32.4 TOUR #2 SCH STOP TIME-2 4;5 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the second segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
32.5 TOUR #2 SCH SPECIAL CODE-2 4;6 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the second segment of the second tour of duty for this day.
32.6 TOUR #2 SCH START TIME-3 4;7 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the third segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
32.7 TOUR #2 SCH STOP TIME-3 4;8 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the third segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
32.8 TOUR #2 SCH SPECIAL CODE-3 4;9 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the third segment of the second tour of duty for this day.
32.9 TOUR #2 SCH START TIME-4 4;10 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the fourth segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
33 TOUR #2 SCH STOP TIME-4 4;11 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the fourth segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
33.1 TOUR #2 SCH SPECIAL CODE-4 4;12 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the fourth segment of the second tour of duty for this day.
33.2 TOUR #2 SCH START TIME-5 4;13 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the fifth segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
33.3 TOUR #2 SCH STOP TIME-5 4;14 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the fifth segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
33.4 TOUR #2 SCH SPECIAL CODE-5 4;15 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the fifth segment of the second tour of duty for this day.
33.5 TOUR #2 SCH START TIME-6 4;16 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the sixth segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
33.6 TOUR #2 SCH STOP TIME-6 4;17 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the sixth segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
33.7 TOUR #2 SCH SPECIAL CODE-6 4;18 POINTER TO SPECIAL TOUR INDICATOR FILE (#457.2) SPECIAL TOUR INDICATOR(#457.2)

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the sixth segment of the second tour of duty for this day.
33.8 TOUR #2 SCH START TIME-7 4;19 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled start time for the seventh segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
33.9 TOUR #2 SCH STOP TIME-7 4;20 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The scheduled stop time for the seventh segment of the second tour of duty for this day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
34 TOUR #2 SCH SPECIAL CODE-7 4;21 FREE TEXT

  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the SPECIAL TOUR INDICATOR file (#457.2) which identifies the scheduled type of special (non-regular) hours associated with the seventh segment of the second tour of duty for this day.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
41 WRK START TIME-1 2;1 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually began work/leave for the first time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
42 WRK STOP TIME-1 2;2 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually stopped work/leave for the first time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
43 WRK TYPE OF TIME-1 2;3 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The type of time worked or leave taken for the first segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
44 WRK SPECIAL CODE-1 2;4 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the first segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
45 WRK START TIME-2 2;5 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually began work/leave for the second time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
46 WRK STOP TIME-2 2;6 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually stopped work/leave for the second time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
47 WRK TYPE OF TIME-2 2;7 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The type of time worked or leave taken for the second segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
48 WRK SPECIAL CODE-2 2;8 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the second segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
49 WRK START TIME-3 2;9 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually began work/leave for the third time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
50 WRK STOP TIME-3 2;10 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually stopped work/leave for the third time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
51 WRK TYPE OF TIME-3 2;11 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The type of time worked or leave taken for the third segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
52 WRK SPECIAL CODE-3 2;12 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the third segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
53 WRK START TIME-4 2;13 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually began work/leave for the fourth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
54 WRK STOP TIME-4 2;14 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually stopped work/leave for the fourth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
55 WRK TYPE OF TIME-4 2;15 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The type of time worked or leave taken for the fourth segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
56 WRK SPECIAL CODE-4 2;16 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the fourth segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
57 WRK START TIME-5 2;17 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually began work/leave for the fifth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
58 WRK STOP TIME-5 2;18 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually stopped work/leave for the fifth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
59 WRK TYPE OF TIME-5 2;19 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The type of time worked or leave taken for the fifth segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
60 WRK SPECIAL CODE-5 2;20 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the fifth segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
61 WRK START TIME-6 2;21 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually began work/leave for the sixth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
62 WRK STOP TIME-6 2;22 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually stopped work/leave for the sixth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
63 WRK TYPE OF TIME-6 2;23 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The type of time worked or leave taken for the sixth segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
64 WRK SPECIAL CODE-6 2;24 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the sixth segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
65 WRK START TIME-7 2;25 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually began work/leave for the seventh time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
66 WRK STOP TIME-7 2;26 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The time the employee actually stopped work/leave for the seventh time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
67 WRK TYPE OF TIME-7 2;27 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    The type of time worked or leave taken for the seventh segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
68 WRK SPECIAL CODE-7 2;28 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 29, 1992
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the seventh segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
70 T/K REMARKS 3;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>70!($L(X)<1) X
  • LAST EDITED:  JUL 14, 1992
  • HELP-PROMPT:  Answer must be 1-70 characters in length.
  • DESCRIPTION:  
    A free text response for any timekeeper remarks.
71 TELEWORK HOURS SCHEDULED 8;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>24)!(X<0)!(X?.E1"."3.N) X
  • LAST EDITED:  MAY 10, 2012
  • HELP-PROMPT:  Enter telework hours performed on this day including any quarter hours (.25, .5, .75). Telework hours must be less than or equal to the amount of work posted.
  • DESCRIPTION:  
    This is the actual number of hours the employee performed scheduled telework on the current day.
  • TECHNICAL DESCR:  Scheduled telework hours cannot exceed the actual telework hours scheduled and worked for the current day. Scheduled telework must be added to the tour of duty through the Timekeeper option Enter/Edit Employee Tour of
    Duty. If the telework is not scheduled through that option then it can not be entered in this field.
72 TELEWORK HOURS MEDICAL 8;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>24)!(X<0)!(X?.E1"."3.N) X
  • LAST EDITED:  MAY 10, 2012
  • HELP-PROMPT:  Enter telework hours performed on this day including any quarter hours (.25, .5, .75). Telework hours must be less than or equal to the amount of work posted.
  • DESCRIPTION:  
    This is the actual number of hours the employee performed medical telework on the current day.
  • TECHNICAL DESCR:  The total telework hours cannot exceed the hours posted on the timecard for work for the current day. Telework hours can be tour work plus overtime, less any leave taken. Medical telework is telework performed by an
    employee who is approved to telework due to medical circumstances. This type of telework can be either ad hoc or scheduled.
73 TELEWORK HRS AD HOC SITU 8;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>24)!(X<0)!(X?.E1"."3.N) X
  • LAST EDITED:  MAY 10, 2012
  • HELP-PROMPT:  Enter telework hours performed on this day including any quarter hours (.25, .5, .75). Telework hours must be less than or equal to the amount of work posted.
  • DESCRIPTION:  
    This is the actual number of hours the employee performed ad hoc or situational telework on this day.
  • TECHNICAL DESCR:  
    The total telework hours cannot exceed the hours posted on the timecard for work. So telework hours should be tour work plus overtime, less any leave taken.
74 TELEWORK TOUR 8;1 SET
  • 'REG' FOR REGULAR SCHEDULED TELEWORK;
  • 'MED' FOR MEDICAL SCHEDULED TELEWORK;

  • LAST EDITED:  MAY 10, 2012
  • HELP-PROMPT:  Select type of scheduled telework for this employee.
  • DESCRIPTION:  This field designates the active tour for the current pay period as scheduled for telework. The tour may be permanent or temporary. If it's a permanent tour, this designator will be copied into this same field for the
    next pay period. If it's a temporary tour, the TELEWORK PRIOR SCHEDULED TOUR (#75) field contains the scheduled telework tour indicator for the permanent tour.
75 TELEWORK PRIOR SCHEDULED TOUR 8;5 SET
  • 'REG' FOR REGULAR SCHEDULED TELEWORK;
  • 'MED' FOR MEDICAL SCHEDULED TELEWORK;

  • LAST EDITED:  MAY 10, 2012
  • HELP-PROMPT:  Select type of scheduled telework for this employee.
  • DESCRIPTION:  If the TELEWORK TOUR (#74) field contains the scheduled telework designator for a temporary tour, this field contains the indicator for the permanent tour, and will be copied into field #74 for the next pay period. If
    the TELEWORK TOUR (#74) field contains a scheduled telework designator for a permanent tour, this field is null.
101 POSTING STATUS 10;1 SET
  • 'T' FOR TIMEKEEPER POSTED;
  • 'P' FOR PAYROLL REVIEWED;
  • 'X' FOR TRANSMITTED;

  • LAST EDITED:  NOV 13, 1992
  • DESCRIPTION:  
    The status of this day's posting.
102 TIMEKEEPER POSTING 10;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  APR 24, 1992
  • DESCRIPTION:  
    A pointer to the NEW PERSON file (#200) which identifies the timekeeper who posted this day's entry.
103 TK DATE/TIME ENTERED 10;3 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 20, 1992
  • DESCRIPTION:  
    The date and time this day's entry was posted.
104 POSTING TYPE 10;4 SET
  • '1' FOR WORKED ENTIRE TOUR;
  • '2' FOR ABSENT ENTIRE TOUR;
  • '3' FOR IRREGULAR TOUR;

  • LAST EDITED:  MAY 29, 1992
  • DESCRIPTION:  
    Identifies the employee as having worked the entire tour, been absent the entire tour or having a mixture of work and leave hours during the tour.
110 ESR START TIME-1 5;1 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The start time for the 1st segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the first time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
111 ESR STOP TIME-1 5;2 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The end time for the 1st segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually stopped work/leave for the first time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
112 ESR TYPE OF TIME-1 5;3 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The type of work performed during the 1st segment of work.
  • DESCRIPTION:  
    The type of time worked or leave taken for the first segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
113 ESR SPECIAL CODE-1 5;4 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The remarks code, if any, for the 1st segment of work.
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the first segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
114 ESR MEAL TIME-1 5;5 FREE TEXT

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X I $D(X) K:X#15 X
  • LAST EDITED:  JUL 28, 2005
  • HELP-PROMPT:  Enter 0, 15, 30, 45, or 60 as the best approximation of the actual meal time in minutes.
  • DESCRIPTION:  Enter the best approximation of time for the meal during this work segment in increments of 15 minutes. Meals may not be longer than 60 minutes, so appropriate meal times are 15, 30, 45, and 60. Enter a 0 or leave
    the field blank to indicate that no meal was taken. When meals are taken, they must be entered, even when they are not scheduled for that tour. Meals may be entered for periods of both regular hours and leave.
    Entering the meal time will automatically deduct the meal from the total creditable hours in the work segment.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
115 ESR START TIME-2 5;6 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The start time for the 2nd segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the second time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
116 ESR STOP TIME-2 5;7 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The end time for the 2nd segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the second time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
117 ESR TYPE OF TIME-2 5;8 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The type of work performed during the 2nd segment of work.
  • DESCRIPTION:  
    The type of time worked or leave taken for the second segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
118 ESR SPECIAL CODE-2 5;9 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The remarks code, if any, for the 2nd segment of work.
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the second segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
119 ESR MEAL TIME-2 5;10 FREE TEXT

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X I $D(X) K:X#15 X
  • LAST EDITED:  JAN 28, 2005
  • HELP-PROMPT:  Enter 0, 15, 30, 45, or 60 as the best approximation of the actual meal time in minutes.
  • DESCRIPTION:  Enter the best approximation of time for the meal during this work segment in increments of 15 minutes. Meals may not be longer than 60 minutes, so appropriate meal times are 15, 30, 45, and 60. Enter a 0 or leave
    the field blank to indicate that no meal was taken. When meals are taken, they must be entered, even when they are not scheduled for that tour. Meals may be entered for periods of both regular hours and leave.
    Entering the meal time will automatically deduct the meal from the total creditable hours in the work segment.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
120 ESR START TIME-3 5;11 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The start time for the 3rd segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the third time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
121 ESR STOP TIME-3 5;12 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The end time for the 3rd segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the third time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
122 ESR TYPE OF TIME-3 5;13 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The type of work performed during the 3rd segment of work.
  • DESCRIPTION:  
    The type of time worked or leave taken for the third segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
123 ESR SPECIAL CODE-3 5;14 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The remarks code, if any, for the 3rd segment of work.
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the third segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
124 ESR MEAL TIME-3 5;15 FREE TEXT

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X I $D(X) K:X#15 X
  • LAST EDITED:  JAN 28, 2005
  • HELP-PROMPT:  Enter 0, 15, 30, 45, or 60 as the best approximation of the actual meal time in minutes.
  • DESCRIPTION:  Enter the best approximation of time for the meal during this work segment in increments of 15 minutes. Meals may not be longer than 60 minutes, so appropriate meal times are 15, 30, 45, and 60. Enter a 0 or leave
    the field blank to indicate that no meal was taken. When meals are taken, they must be entered, even when they are not scheduled for that tour. Meals may be entered for periods of both regular hours and leave.
    Entering the meal time will automatically deduct the meal from the total creditable hours in the work segment.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
125 ESR START TIME-4 5;16 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The start time for the 4th segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the fourth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
126 ESR STOP TIME-4 5;17 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The end time for the 4th segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the fourth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
127 ESR TYPE OF TIME-4 5;18 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The type of work performed during the 4th segment of work.
  • DESCRIPTION:  
    The type of time worked or leave taken for the fourth segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
128 ESR SPECIAL CODE-4 5;19 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The remarks code, if any, for the 4th segment of work.
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the fourth segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
129 ESR MEAL TIME-4 5;20 FREE TEXT

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X I $D(X) K:X#15 X
  • LAST EDITED:  JAN 28, 2005
  • HELP-PROMPT:  Enter 0, 15, 30, 45, or 60 as the best approximation of the actual meal time in minutes.
  • DESCRIPTION:  Enter the best approximation of time for the meal during this work segment in increments of 15 minutes. Meals may not be longer than 60 minutes, so appropriate meal times are 15, 30, 45, and 60. Enter a 0 or leave
    the field blank to indicate that no meal was taken. When meals are taken, they must be entered, even when they are not scheduled for that tour. Meals may be entered for periods of both regular hours and leave.
    Entering the meal time will automatically deduct the meal from the total creditable hours in the work segment.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
130 ESR START TIME-5 5;21 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The start time for the 5th segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the fifth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
131 ESR STOP TIME-5 5;22 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The end time for the 5th segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the fifth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
132 ESR TYPE OF TIME-5 5;23 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The type of work performed during the 5th segment of work.
  • DESCRIPTION:  
    The type of time worked or leave taken for the fifth segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
133 ESR SPECIAL CODE-5 5;24 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The remarks code, if any, for the 5th segment of work.
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the fifth segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
134 ESR MEAL TIME-5 5;25 FREE TEXT

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X I $D(X) K:X#15 X
  • LAST EDITED:  JAN 28, 2005
  • HELP-PROMPT:  Enter 0, 15, 30, 45, or 60 as the best approximation of the actual meal time in minutes.
  • DESCRIPTION:  Enter the best approximation of time for the meal during this work segment in increments of 15 minutes. Meals may not be longer than 60 minutes, so appropriate meal times are 15, 30, 45, and 60. Enter a 0 or leave
    the field blank to indicate that no meal was taken. When meals are taken, they must be entered, even when they are not scheduled for that tour. Meals may be entered for periods of both regular hours and leave.
    Entering the meal time will automatically deduct the meal from the total creditable hours in the work segment.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
135 ESR START TIME-6 5;26 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The start time for the 6th segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the sixth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
136 ESR STOP TIME-6 5;27 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The end time for the 6th segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the sixth time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
137 ESR TYPE OF TIME-6 5;28 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The type of work performed during the 6th segment of work.
  • DESCRIPTION:  
    The type of time worked or leave taken for the sixth segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
138 ESR SPECIAL CODE-6 5;29 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The remarks code, if any, for the 6th segment of work.
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the sixth segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
139 ESR MEAL TIME-6 5;30 FREE TEXT

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X I $D(X) K:X#15 X
  • LAST EDITED:  JAN 28, 2005
  • HELP-PROMPT:  Enter 0, 15, 30, 45, or 60 as the best approximation of the actual meal time in minutes.
  • DESCRIPTION:  Enter the best approximation of time for the meal during this work segment in increments of 15 minutes. Meals may not be longer than 60 minutes, so appropriate meal times are 15, 30, 45, and 60. Enter a 0 or leave
    the field blank to indicate that no meal was taken. When meals are taken, they must be entered, even when they are not scheduled for that tour. Meals may be entered for periods of both regular hours and leave.
    Entering the meal time will automatically deduct the meal from the total creditable hours in the work segment.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
140 ESR START TIME-7 5;31 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The start time for the 7th segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the seventh time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
141 ESR STOP TIME-7 5;32 FREE TEXT

  • INPUT TRANSFORM:  D:$D(X) ^PRSATIM
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The end time for the 7th segment of work.
  • DESCRIPTION:  
    The time the Part Time Physician actually began work/leave for the seventh time segment of the work day.
  • EXECUTABLE HELP:  D HLP^PRSATIM
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
142 ESR TYPE OF TIME-7 5;33 FREE TEXT

  • INPUT TRANSFORM:  S DIC=457.3,DIC(0)="EMQ",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))" D ^DIC K DIC S X=$P(Y,"^",2) K:Y'>0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The type of work performed during the 7th segment of work.
  • DESCRIPTION:  
    The type of time worked or leave taken for the seventh segment of the work day.
  • EXECUTABLE HELP:  N D,X,DIC,DO S DIC="^PRST(457.3,",DIC(0)="Q",DIC("S")="I $S('$D(ZENT):1,1:ZENT[$P(^(0),U,1))",D="B" D DQ^DICQ Q
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
143 ESR SPECIAL CODE-7 5;34 POINTER TO TIME REMARKS FILE (#457.4) TIME REMARKS(#457.4)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 22, 2005
  • HELP-PROMPT:  The remarks code, if any, for the 7th segment of work.
  • DESCRIPTION:  
    A pointer to the TIME REMARKS file (#457.4) which identifies a time remark with the type of time worked or leave taken for the seventh segment of the work day.
  • SCREEN:  S DIC("S")="I $S('$D(TT):1,1:$P(^(0),U,3)[TT)"
  • EXPLANATION:  Select only valid time remarks for Type of Time.
144 ESR MEAL TIME-7 5;35 FREE TEXT

  • INPUT TRANSFORM:  K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X I $D(X) K:X#15 X
  • LAST EDITED:  JAN 28, 2005
  • HELP-PROMPT:  Enter 0, 15, 30, 45, or 60 as the best approximation of the actual meal time in minutes.
  • DESCRIPTION:  Enter the best approximation of time for the meal during this work segment in increments of 15 minutes. Meals may not be longer than 60 minutes, so appropriate meal times are 15, 30, 45, and 60. Enter a 0 or leave
    the field blank to indicate that no meal was taken. When meals are taken, they must be entered, even when they are not scheduled for that tour. Meals may be entered for periods of both regular hours and leave.
    Entering the meal time will automatically deduct the meal from the total creditable hours in the work segment.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
145 DAILY ESR REMARKS 6;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>70!($L(X)<1) X
  • LAST EDITED:  OCT 01, 2004
  • HELP-PROMPT:  Answer must be 1-70 characters in length
  • DESCRIPTION:  
    Any comments entered by the Part Time Physician.
146 ESR DAILY STATUS 7;1 SET
  • '1' FOR NOT STARTED;
  • '2' FOR PENDING;
  • '3' FOR RESUBMIT;
  • '4' FOR SIGNED;
  • '5' FOR APPROVED;
  • '6' FOR DAY OFF;

  • LAST EDITED:  APR 26, 2005
  • HELP-PROMPT:  Answer must be 1 character in length
  • DESCRIPTION:  
    The status of the Part Time Physician's daily Electronic Subsidiary Record (ESR).
  • RECORD INDEXES:  AEA (#78) (WHOLE FILE #458), ASA (#707) (WHOLE FILE #458)
147 PT PHYSICIAN DATE/TIME STAMP 7;2 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  FEB 25, 2005
  • HELP-PROMPT:  (No range limit on date)
  • DESCRIPTION:  
    The Date and Time the Part Time Physician electronically signed their daily ESR record.
148 ESR SUPERVISOR REMARKS 6;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>21!($L(X)<1) X
  • LAST EDITED:  APR 28, 2005
  • HELP-PROMPT:  Answer must be 1-21 characters in length
  • DESCRIPTION:  Enter a brief comment that will be displayed to the part-time physician when they resubmit the daily ESR.
149 ESR DAY LAST SIGN METHOD 7;3 SET
  • '1' FOR MANUAL POST;
  • '2' FOR EXTENDED ABSENCE;
  • '3' FOR LEAVE REQUEST;
  • '4' FOR HOLIDAY;

  • LAST EDITED:  JAN 28, 2005
  • HELP-PROMPT:  How the signature for the current ESR data was obtained.
  • DESCRIPTION:  This field indicates how the current ESR record was signed.
    When the employee signs an ESR day, this field is set with code 1 for employee manual post. If the auto posting of either an extended absence or a leave request changes field 146--ESR DAILY STATUS--to signed, then the
    field is update with code 2 or 3 respectively.
    If the employee signature is removed via supervisor rework request, employee edit, cancellation of extended absence, or cancellation of leave, the value in the field will be deleted.
Info |  Details