PRSDPR06 ;HISC/GWB/FPT-PAID PAYRUN DOWNLOAD RECORD 6 LAYOUT ;6/24/93 12:54
;;4.0;PAID;**146**;Sep 21, 1995;Build 7
F CC=1:1 S GRP=$T(@CC) Q:GRP="" S GRPVAL=$P(RCD,":",CC) I GRPVAL'="" S GNUM=$P(GRP,";",4),LTH=$P(GRP,";",5),PIC=$P(GRP,";",6) D:PIC=9 PIC9^PRSDUTIL F EE=1:1:GNUM S FLD=$T(@CC+EE) D EPTSET^PRSDSET
Q
RECORD ;;Record 6;38
;PRS*4.0*146 changes piece 6 of the UNIFORM ALLOWANCE AMT CPPD field record to 6. This is due to a DD change to the field allowing 6 characters instead of 5
;;
1 ;;Group 1;1;6;9
;;AUNIF;UNIFORM ALLOWANCE AMT CPPD;1;6;UNIFORM;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;29;563;A
;;
2 ;;Group 2;1;5;9
;;AQTRS;QUARTERS DEDUCTION CPPD;1;5;QSGP;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;25;325;A
;;
3 ;;Group 3;1;5;9
;;ASUBSIST;SUBSISTANCE DEDUCTION CPPD;1;5;QSGP;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;26;327;A
;;
4 ;;Group 4;1;5;9
;;AGAR;GARAGE DEDUCTION CPPD;1;5;QSGP;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;22;318;A
;;
5 ;;Group 5;1;5;9
;;ASATPAY;SATURDAY AMT CPPD;1;5;PREMIUM;16;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;17;558;A
;;
6 ;;Group 6;1;5;9
;;ASUNPAY;SUNDAY AMT CPPD;1;5;PREMIUM;18;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;19;560;A
;;
7 ;;Group 7;1;5;9
;;ASECTAX;STATE TAX-2 AMT WITHHELD CPPD;1;5;STATE;16;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;3;387;A
;;
8 ;;Group 8;1;7;9
;;ALIVING;COLA AMT CPPD;1;7;COLA;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;22;527;A
;;
9 ;;Group 9;1;5;9
;;APOSTDIF;POST DIFF AMT CPPD;1;5;PREMIUM;15;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;16;557;A
;;
10 ;;Group 10;1;5;9
;;ALUMPSUMHD;ANNUAL LEAVE LUMP SUM HRS/DAYS;1;5;LUMPSUM;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;27;526;A
;;
11 ;;Group 11;1;7;9
;;ALMPSUM;ANNUAL LEAVE LUMP SUM AMT;1;7;LUMPSUM;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;26;525;A
;;
12 ;;Group 12;1;7;9
;;AAWARD;INCENTIVE AWARD;1;7;AWARDS;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;24;587;A
;;
13 ;;Group 13;1;7;9
;;ASTAPAY;DEBT REFUND ACCT 36X6875 CPPD;1;7;OTHER;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;2;303;A
;;
14 ;;Group 14;1;7;9
;;ADPCPAY;NET PAY OUT-OF-SYSTEM AMT CPPD;1;7;PAY;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;3;542;A
;;
15 ;;Group 15;1;7;9
;;AOTHER;DEBT DEPOSIT ACCT 36X6875 CPPD;1;7;OTHER;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;1;301;A
;;
16 ;;Group 16;1;5;9
;;AQTRNOHSK;QUARTERS NON-HSKP DED CPPD;1;5;QSGP;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;24;320;A
;;
17 ;;Group 17;1;5;9
;;AOPTINS;FEGLI STANDARD DEDUCTION CPPD;1;5;FEGLI;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;16;228;A
;;
18 ;;Group 18;1;7;9
;;AMILRET;MSD DEDUCTION CPPD;1;7;MSD2;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;29;279;A
;;
19 ;;Group 19;1;7;9
;;AFICAEMP;OASDI TAX AMT WITHHELD CPPD;1;7;OASDI;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;8;290;A
;;
20 ;;Group 20;1;7;9
;;ARETIRE;RETIREMENT DED CPPD;1;7;RETIRE;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;20;337;A
;;
21 ;;Grroup 21;1;7;9
;;AOTPAY;OVERTIME AMT CPPD;1;7;PREMIUM;12;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;14;554;A
;;
22 ;;Group 22;1;7;9
;;AUOTPAY;AUO AMT CPPD;1;7;PREMIUM;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;23;543;A
;;
23 ;;Group 23;1;7;9
;;ASPSALRAT;SPECIAL PAY RATE DIFFERENCE;1;7;1;35;D SIGN^PRSDUTIL,DD^PRSDUTIL;6;4;82;A
;;
24 ;;Group 24;1;5;9
;;AANNUSED;ANNUAL LEAVE USED CPPD;1;5;ANNUAL;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;4;1;465;A
;;
25 ;;Group 25;1;5;9
;;ASICKUSED;TOTAL SICK LEAVE USED CPPD;1;5;SICK;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;4;2;513;A
;;
26 ;;Group 26;1;3;9
;;ANITETIME;NIGHT DIFF HRS CPPD;1;3;PREMIUM;8;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;11;550;A
;;
27 ;;Group 27;1;3;9
;;AOVRTIME;OVERTIME HRS CPPD;1;3;PREMIUM;13;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;15;555;A
;;
28 ;;Group 28;1;3;9
;;AHOLTIME;HOLIDAY HOURS;1;3;PREMIUM;5;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;9;547;A
;;
29 ;;Group 29;1;3;9
;;ALWOPUSED;LWOP HOURS/DAYS CPPD;1;3;LWOP;5;D SIGN^PRSDUTIL,AHRS^PRSDUTIL,NPLWOP^PRSDUTIL;4;5;519;A
;;
30 ;;Group 30;1;3;9
;;ANONPATIME;NONPAY HOURS/DAYS CPPD;1;3;1;19;D SIGN^PRSDUTIL,AHRS^PRSDUTIL,NPLWOP^PRSDUTIL;6;2;66;A
;;
31 ;;Group 31;1;3;9
;;AREGTIME;UNSCHEDULED HOURS;1;3;MISC;1;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;30;530;A
;;
32 ;;Group 32;1;3;9
;;ASPECOT;REG HOURS AT OT RATE;1;3;PREMIUM;20;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;6;562;A
;;
33 ;;Group 33;1;3;9
;;ASUNTIME;SUNDAY HRS CPPD;1;3;PREMIUM;19;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;20;561;A
;;
34 ;;Group 34;1;1;9
;;AINSGRP;FEGLI AGE CODE CPPD;1;1;FEGLI;2;D SIGN^PRSDUTIL;1;13;224;O
;;
35 ;;Group 35;4;27;9
;;ASTA3875;DEBT REFUND ACCT 36F3875 CPPD;1;6;OTHER;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;4;302;A
;;AOTHER3875;DEBT DEPOSIT ACCT 36F3875 CPPD;7;13;OTHER;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;3;300;A
;;APARKING;PARKING DEDUCTION CPPD;14;18;QSGP;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;23;321;A
;;ANEWSSN;NEW SSN;19;27;0;35;S:DATA="000000000" DATA="" D:DATA'="" NEWSSN^PRSDUTIL;6;1;34;O
;;
36 ;;Group 36;1;7;9
;;APERFORM-AWARD;PERFORMANCE AWARD;1;7;AWARDS;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;31;587.1;A
;;
37 ;;Group 37;1;7;9
;;AINCENT-AWARD;INCENTIVE AWARD;1;7;AWARDS;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;24;587;A
;;
38 ;;Group 38;1;1;X
;;MXLVGRP;LEAVE GROUP;1;1;0;15;;;;14
;;
39 ;;Group 39;1;7;9
;;ALOCAL-SALARY;LOCALITY PAY CPPD;1;7;MISC;21;D SIGN^PRSDUTIL,DD^PRSDUTIL;8;30;83.2;A
;;
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPRSDPR06 5147 printed Dec 13, 2024@02:25:51 Page 2
PRSDPR06 ;HISC/GWB/FPT-PAID PAYRUN DOWNLOAD RECORD 6 LAYOUT ;6/24/93 12:54
+1 ;;4.0;PAID;**146**;Sep 21, 1995;Build 7
+2 FOR CC=1:1
SET GRP=$TEXT(@CC)
if GRP=""
QUIT
SET GRPVAL=$PIECE(RCD,":",CC)
IF GRPVAL'=""
SET GNUM=$PIECE(GRP,";",4)
SET LTH=$PIECE(GRP,";",5)
SET PIC=$PIECE(GRP,";",6)
if PIC=9
DO PIC9^PRSDUTIL
FOR EE=1:1:GNUM
SET FLD=$TEXT(@CC+EE)
DO EPTSET^PRSDSET
+3 QUIT
RECORD ;;Record 6;38
+1 ;PRS*4.0*146 changes piece 6 of the UNIFORM ALLOWANCE AMT CPPD field record to 6. This is due to a DD change to the field allowing 6 characters instead of 5
+2 ;;
1 ;;Group 1;1;6;9
+1 ;;AUNIF;UNIFORM ALLOWANCE AMT CPPD;1;6;UNIFORM;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;29;563;A
+2 ;;
2 ;;Group 2;1;5;9
+1 ;;AQTRS;QUARTERS DEDUCTION CPPD;1;5;QSGP;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;25;325;A
+2 ;;
3 ;;Group 3;1;5;9
+1 ;;ASUBSIST;SUBSISTANCE DEDUCTION CPPD;1;5;QSGP;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;26;327;A
+2 ;;
4 ;;Group 4;1;5;9
+1 ;;AGAR;GARAGE DEDUCTION CPPD;1;5;QSGP;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;22;318;A
+2 ;;
5 ;;Group 5;1;5;9
+1 ;;ASATPAY;SATURDAY AMT CPPD;1;5;PREMIUM;16;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;17;558;A
+2 ;;
6 ;;Group 6;1;5;9
+1 ;;ASUNPAY;SUNDAY AMT CPPD;1;5;PREMIUM;18;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;19;560;A
+2 ;;
7 ;;Group 7;1;5;9
+1 ;;ASECTAX;STATE TAX-2 AMT WITHHELD CPPD;1;5;STATE;16;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;3;387;A
+2 ;;
8 ;;Group 8;1;7;9
+1 ;;ALIVING;COLA AMT CPPD;1;7;COLA;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;22;527;A
+2 ;;
9 ;;Group 9;1;5;9
+1 ;;APOSTDIF;POST DIFF AMT CPPD;1;5;PREMIUM;15;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;16;557;A
+2 ;;
10 ;;Group 10;1;5;9
+1 ;;ALUMPSUMHD;ANNUAL LEAVE LUMP SUM HRS/DAYS;1;5;LUMPSUM;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;27;526;A
+2 ;;
11 ;;Group 11;1;7;9
+1 ;;ALMPSUM;ANNUAL LEAVE LUMP SUM AMT;1;7;LUMPSUM;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;26;525;A
+2 ;;
12 ;;Group 12;1;7;9
+1 ;;AAWARD;INCENTIVE AWARD;1;7;AWARDS;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;24;587;A
+2 ;;
13 ;;Group 13;1;7;9
+1 ;;ASTAPAY;DEBT REFUND ACCT 36X6875 CPPD;1;7;OTHER;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;2;303;A
+2 ;;
14 ;;Group 14;1;7;9
+1 ;;ADPCPAY;NET PAY OUT-OF-SYSTEM AMT CPPD;1;7;PAY;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;3;542;A
+2 ;;
15 ;;Group 15;1;7;9
+1 ;;AOTHER;DEBT DEPOSIT ACCT 36X6875 CPPD;1;7;OTHER;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;1;301;A
+2 ;;
16 ;;Group 16;1;5;9
+1 ;;AQTRNOHSK;QUARTERS NON-HSKP DED CPPD;1;5;QSGP;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;24;320;A
+2 ;;
17 ;;Group 17;1;5;9
+1 ;;AOPTINS;FEGLI STANDARD DEDUCTION CPPD;1;5;FEGLI;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;16;228;A
+2 ;;
18 ;;Group 18;1;7;9
+1 ;;AMILRET;MSD DEDUCTION CPPD;1;7;MSD2;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;29;279;A
+2 ;;
19 ;;Group 19;1;7;9
+1 ;;AFICAEMP;OASDI TAX AMT WITHHELD CPPD;1;7;OASDI;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;8;290;A
+2 ;;
20 ;;Group 20;1;7;9
+1 ;;ARETIRE;RETIREMENT DED CPPD;1;7;RETIRE;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;20;337;A
+2 ;;
21 ;;Grroup 21;1;7;9
+1 ;;AOTPAY;OVERTIME AMT CPPD;1;7;PREMIUM;12;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;14;554;A
+2 ;;
22 ;;Group 22;1;7;9
+1 ;;AUOTPAY;AUO AMT CPPD;1;7;PREMIUM;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;23;543;A
+2 ;;
23 ;;Group 23;1;7;9
+1 ;;ASPSALRAT;SPECIAL PAY RATE DIFFERENCE;1;7;1;35;D SIGN^PRSDUTIL,DD^PRSDUTIL;6;4;82;A
+2 ;;
24 ;;Group 24;1;5;9
+1 ;;AANNUSED;ANNUAL LEAVE USED CPPD;1;5;ANNUAL;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;4;1;465;A
+2 ;;
25 ;;Group 25;1;5;9
+1 ;;ASICKUSED;TOTAL SICK LEAVE USED CPPD;1;5;SICK;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;4;2;513;A
+2 ;;
26 ;;Group 26;1;3;9
+1 ;;ANITETIME;NIGHT DIFF HRS CPPD;1;3;PREMIUM;8;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;11;550;A
+2 ;;
27 ;;Group 27;1;3;9
+1 ;;AOVRTIME;OVERTIME HRS CPPD;1;3;PREMIUM;13;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;15;555;A
+2 ;;
28 ;;Group 28;1;3;9
+1 ;;AHOLTIME;HOLIDAY HOURS;1;3;PREMIUM;5;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;9;547;A
+2 ;;
29 ;;Group 29;1;3;9
+1 ;;ALWOPUSED;LWOP HOURS/DAYS CPPD;1;3;LWOP;5;D SIGN^PRSDUTIL,AHRS^PRSDUTIL,NPLWOP^PRSDUTIL;4;5;519;A
+2 ;;
30 ;;Group 30;1;3;9
+1 ;;ANONPATIME;NONPAY HOURS/DAYS CPPD;1;3;1;19;D SIGN^PRSDUTIL,AHRS^PRSDUTIL,NPLWOP^PRSDUTIL;6;2;66;A
+2 ;;
31 ;;Group 31;1;3;9
+1 ;;AREGTIME;UNSCHEDULED HOURS;1;3;MISC;1;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;30;530;A
+2 ;;
32 ;;Group 32;1;3;9
+1 ;;ASPECOT;REG HOURS AT OT RATE;1;3;PREMIUM;20;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;6;562;A
+2 ;;
33 ;;Group 33;1;3;9
+1 ;;ASUNTIME;SUNDAY HRS CPPD;1;3;PREMIUM;19;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;20;561;A
+2 ;;
34 ;;Group 34;1;1;9
+1 ;;AINSGRP;FEGLI AGE CODE CPPD;1;1;FEGLI;2;D SIGN^PRSDUTIL;1;13;224;O
+2 ;;
35 ;;Group 35;4;27;9
+1 ;;ASTA3875;DEBT REFUND ACCT 36F3875 CPPD;1;6;OTHER;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;4;302;A
+2 ;;AOTHER3875;DEBT DEPOSIT ACCT 36F3875 CPPD;7;13;OTHER;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;3;300;A
+3 ;;APARKING;PARKING DEDUCTION CPPD;14;18;QSGP;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;23;321;A
+4 ;;ANEWSSN;NEW SSN;19;27;0;35;S:DATA="000000000" DATA="" D:DATA'="" NEWSSN^PRSDUTIL;6;1;34;O
+5 ;;
36 ;;Group 36;1;7;9
+1 ;;APERFORM-AWARD;PERFORMANCE AWARD;1;7;AWARDS;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;31;587.1;A
+2 ;;
37 ;;Group 37;1;7;9
+1 ;;AINCENT-AWARD;INCENTIVE AWARD;1;7;AWARDS;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;24;587;A
+2 ;;
38 ;;Group 38;1;1;X
+1 ;;MXLVGRP;LEAVE GROUP;1;1;0;15;;;;14
+2 ;;
39 ;;Group 39;1;7;9
+1 ;;ALOCAL-SALARY;LOCALITY PAY CPPD;1;7;MISC;21;D SIGN^PRSDUTIL,DD^PRSDUTIL;8;30;83.2;A
+2 ;;
