PRSDPR09 ;HISC/MGD-PAID PAYRUN DOWNLOAD RECORD 9 LAYOUT ;12/15/2003
;;4.0;PAID;**78,82,86,105**;Sep 21, 1995
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 9;45
1 ;;GRP 1;1;5;9
;;ASLCBCPPD;CARE/BEREAVE LEAVE USED CPPD;1;5;SICK;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;3;7;710;A
2 ;;GRP 2;1;7;9
;;SLCBLYTD;CARE/BEREAVE LEAVE USED LYTD;1;7;SICK;10;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;711
3 ;;GRP 3;1;5;9
;;ASLADCPPD;ADOPTION LEAVE USED CPPD;1;5;SICK;11;D SIGN^PRSDUTIL,DD^PRSDUTIL;3;8;712;A
4 ;;GRP 4;1;7;9
;;SLADLYTD;ADOPTION LEAVE USED LYTD;1;7;SICK;12;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;713
5 ;;GRP 5;1;5;9
;;AOSLCPPD;OTHER SICK LEAVE USED CPPD;1;5;SICK;13;D SIGN^PRSDUTIL,DD^PRSDUTIL;3;9;714;A
6 ;;GRP 6;1;7;9
;;OSLLYTD;OTHER SICK LEAVE USED LYTD;1;7;SICK;14;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;715
7 ;;GRP 7;1;5;9
;;ADLCPPD;DONOR LEAVE USED CPPD;1;5;SICK;15;D SIGN^PRSDUTIL,DD^PRSDUTIL;3;10;716;A
8 ;;GRP 8;1;7;9
;;DLLYTD;DONOR LEAVE USED LYTD;1;7;SICK;16;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;717
9 ;;GRP 9;1;8;X
;;MXWIGDTE;WGI DUE DATE;1;8;0;51;D DATE^PRSDUTIL;;;600
10 ;;GRP 10;1;1;X
;;HAMIL-IND;MILITARY LEAVE INDICATOR;1;1;MILITARY;3;D SIGN^PRSDUTIL;;;507.1
11 ;;GRP 11;1;5;9
;;HAMILUSED;MILITARY LEAVE USED CPPD;1;5;MILITARY;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;1;507.2
12 ;;GRP 12;1;1;
;;MIB1TYPE;SAVINGS BOND-1 TYPE;1;1;BOND1;16;;2;25;718
13 ;;GRP 13;1;1;
;;MIB2TYPE;SAVINGS BOND-2 TYPE;1;1;BOND2;15;;2;26;719
14 ;;GRP 14;1;7;9
;;SBONDS-DED-BAL-3;SAVINGS BOND-3 DED BALANCE;1;7;BOND3;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;3;727;O
15 ;;GRP 15;1;7;9
;;SBONDS-DED-PAY-PERIOD-3;SAVINGS BOND-3 DEDUCTION;1;7;BOND3;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;728
16 ;;GRP 16;1;1;
;;SBONDS-TYPE-3;SAVINGS BOND-3 TYPE;1;1;BOND3;15;;9;2;734
17 ;;GRP 17;1;7;9
;;SBONDS-DED-BAL-4;SAVINGS BOND-4 DED BALANCE;1;7;BOND4;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;5;742;O
18 ;;GRP 18;1;7;9
;;BONDS-DED-PAY-PERIOD-4;SAVINGS BOND-4 DEDUCTION;1;7;BOND4;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;743
19 ;;GRP 19;1;1;
;;SBONDS-TYPE-4;SAVINGS BOND-4 TYPE;1;1;BOND4;15;;9;4;749
20 ;;GRP 20;1;9;
;;LONG-TERM-CARE-PREM;FLTCIP CPPD;1;9;FLTCIP;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;7;751
21 ;;GRP 21;1;1;
;;LONG-TERM-CARE-IND;FLTCIP INDICATOR;1;1;FLTCIP;5;;9;6;754
22 ;;GRP 22;1;6;
;;VOL-ALLOT-AMT-3;VOLUNTARY ALLOTMENTS-3 AMT;1;6;VALLOT;6;D SIGN^PRSDUTIL;9;8;439.1
23 ;;GRP 23;1;6;
;;VOL-ALLOT-AMT-4;VOLUNTARY ALLOTMENTS-4 AMT;1;6;VALLOT;8;D SIGN^PRSDUTIL;9;9;439.3
24 ;;GRP 24;1;6;
;;VCS-ALLOT-AMT;VCS ALLOTMENT AMT;1;6;VCS;22;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;10;586.1
25 ;;GRP 25;1;9;
;;AWARD-TRAVEL-SAVINGS;TRAVEL SAVINGS AWARD;1;9;AWARDS;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;11;587.2
26 ;;GRP 26;1;4;
;;LD-CODE1;LABOR DIST CODE-1;1;4;LD;2;S MULT=1,MFLD=1;LD;2;450.0757-1
27 ;;GRP 27;1;3;
;;LD-PERCENT1;LABOR DIST CODE-1 PCT;1;3;LD;3;S MULT=1,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;LD;3;450.0757-2
28 ;;GRP 28;1;4
;;LD-MXORGCOD;LABOR DIST CODE-1 COST CENTER;1;4;LD;4;S MULT=1,MFLD=3;LD;4;450.0757-3
29 ;;GRP 29;1;3
;;LD-MXFUNDCP;LABOR DIST CODE-1 FUND CTRL PNT;1;3;LD;5;S MULT=1,MFLD=4;LD;5;450.0757-4
30 ;;GRP 30;1;4
;;LD-CODE2;LABOR DIST CODE-2;1;4;LD;2;S MULT=2,MFLD=1;LD;2;450.0757-1
31 ;;GRP 31;1;3
;;LD-PERCENT2;LABOR DIST CODE-2 PCT;1;3;LD;3;S MULT=2,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;LD;3;450.0757-2
32 ;;GRP 32;1;4
;;LD-MHORGCOD2;LABOR DIST CODE-2 COST CENTER;1;4;LD;4;S MULT=2,MFLD=3;LD;4;450.0757-3
33 ;;GRP 33;1;3
;;LD-MHFUNDCP2;LABOR DIST CODE-2 FUND CTRL PNT;1;3;LD;5;S MULT=2,MFLD=4;LD;5;450.0757-4
34 ;;GRP 34;1;4
;;LD-CODE3;LABOR DIST CODE-3;1;4;LD;2;S MULT=3,MFLD=1;LD;2;450.0757-1
35 ;;GRP 35;1;3
;;LD-PERCENT3;LABOR DIST CODE-3 PCT;1;3;LD;3;S MULT=3,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;LD;3;450.0757-2
36 ;;GRP 36;1;4
;;LD-MHORGCOD3;LABOR DIST CODE-3 COST CENTER;1;4;LD;4;S MULT=3,MFLD=3;LD;4;450.0757-3
37 ;;GRP 37;1;3
;;LD-MHFUNDCP3;LABOR DIST CODE-3 FUND CTRL PNT;1;3;LD;5;S MULT=3,MFLD=4;LD;5;450.0757-4
38 ;;GRP 38;1;4
;;LD-CODE4;LABOR DIST CODE-4;1;4;LD;2;S MULT=4,MFLD=1;LD;2;450.0757-1
39 ;;GRP 39;1;3
;;LD-PERCENT4;LABOR DIST CODE-4 PCT;1;3;LD;3;S MULT=4,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;LD;3;450.0757-2
40 ;;GRP 40;1;4
;;LD-MHORGCOD4;LABOR DIST CODE-4 COST CENTER;1;4;LD;4;S MULT=4,MFLD=3;LD;4;450.0757-3
41 ;;GRP 41;1;3
;;LD-MHFUNDCP4;LABOR DIST CODE-4 FUND CTRL PNT;1;3;LD;5;S MULT=4,MFLD=4;LD;5;450.0757-4
42 ;;GRP 42;1;6
;;FSA-HEALTH-CARE;HLTH CARE FLX SPEND ACCT CPPD;1;6;FSA;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;13;759
43 ;;GRP 43;1;6
;;FSA-HEALTH-CARE-YTD;HLTH CARE FLX SPEND ACCT YTD;1;6;FSA;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;12;758
44 ;;GRP 44;1;1
;;MFCOURT-ORDERED-FEHB;FED EMP HLTH BENE CRT ORD IND;1;1;FED;12;;9;16;752
45 ;;GRP 45;1;1
;;MX-EANDL-PRINT-IND;EARNINGS & LEAVE PRT SELECTION;1;1;ADD;11;;9;17;753
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPRSDPR09 4955 printed Dec 13, 2024@02:25:54 Page 2
PRSDPR09 ;HISC/MGD-PAID PAYRUN DOWNLOAD RECORD 9 LAYOUT ;12/15/2003
+1 ;;4.0;PAID;**78,82,86,105**;Sep 21, 1995
+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 9;45
1 ;;GRP 1;1;5;9
+1 ;;ASLCBCPPD;CARE/BEREAVE LEAVE USED CPPD;1;5;SICK;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;3;7;710;A
2 ;;GRP 2;1;7;9
+1 ;;SLCBLYTD;CARE/BEREAVE LEAVE USED LYTD;1;7;SICK;10;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;711
3 ;;GRP 3;1;5;9
+1 ;;ASLADCPPD;ADOPTION LEAVE USED CPPD;1;5;SICK;11;D SIGN^PRSDUTIL,DD^PRSDUTIL;3;8;712;A
4 ;;GRP 4;1;7;9
+1 ;;SLADLYTD;ADOPTION LEAVE USED LYTD;1;7;SICK;12;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;713
5 ;;GRP 5;1;5;9
+1 ;;AOSLCPPD;OTHER SICK LEAVE USED CPPD;1;5;SICK;13;D SIGN^PRSDUTIL,DD^PRSDUTIL;3;9;714;A
6 ;;GRP 6;1;7;9
+1 ;;OSLLYTD;OTHER SICK LEAVE USED LYTD;1;7;SICK;14;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;715
7 ;;GRP 7;1;5;9
+1 ;;ADLCPPD;DONOR LEAVE USED CPPD;1;5;SICK;15;D SIGN^PRSDUTIL,DD^PRSDUTIL;3;10;716;A
8 ;;GRP 8;1;7;9
+1 ;;DLLYTD;DONOR LEAVE USED LYTD;1;7;SICK;16;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;717
9 ;;GRP 9;1;8;X
+1 ;;MXWIGDTE;WGI DUE DATE;1;8;0;51;D DATE^PRSDUTIL;;;600
10 ;;GRP 10;1;1;X
+1 ;;HAMIL-IND;MILITARY LEAVE INDICATOR;1;1;MILITARY;3;D SIGN^PRSDUTIL;;;507.1
11 ;;GRP 11;1;5;9
+1 ;;HAMILUSED;MILITARY LEAVE USED CPPD;1;5;MILITARY;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;1;507.2
12 ;;GRP 12;1;1;
+1 ;;MIB1TYPE;SAVINGS BOND-1 TYPE;1;1;BOND1;16;;2;25;718
13 ;;GRP 13;1;1;
+1 ;;MIB2TYPE;SAVINGS BOND-2 TYPE;1;1;BOND2;15;;2;26;719
14 ;;GRP 14;1;7;9
+1 ;;SBONDS-DED-BAL-3;SAVINGS BOND-3 DED BALANCE;1;7;BOND3;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;3;727;O
15 ;;GRP 15;1;7;9
+1 ;;SBONDS-DED-PAY-PERIOD-3;SAVINGS BOND-3 DEDUCTION;1;7;BOND3;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;728
16 ;;GRP 16;1;1;
+1 ;;SBONDS-TYPE-3;SAVINGS BOND-3 TYPE;1;1;BOND3;15;;9;2;734
17 ;;GRP 17;1;7;9
+1 ;;SBONDS-DED-BAL-4;SAVINGS BOND-4 DED BALANCE;1;7;BOND4;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;5;742;O
18 ;;GRP 18;1;7;9
+1 ;;BONDS-DED-PAY-PERIOD-4;SAVINGS BOND-4 DEDUCTION;1;7;BOND4;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;743
19 ;;GRP 19;1;1;
+1 ;;SBONDS-TYPE-4;SAVINGS BOND-4 TYPE;1;1;BOND4;15;;9;4;749
20 ;;GRP 20;1;9;
+1 ;;LONG-TERM-CARE-PREM;FLTCIP CPPD;1;9;FLTCIP;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;7;751
21 ;;GRP 21;1;1;
+1 ;;LONG-TERM-CARE-IND;FLTCIP INDICATOR;1;1;FLTCIP;5;;9;6;754
22 ;;GRP 22;1;6;
+1 ;;VOL-ALLOT-AMT-3;VOLUNTARY ALLOTMENTS-3 AMT;1;6;VALLOT;6;D SIGN^PRSDUTIL;9;8;439.1
23 ;;GRP 23;1;6;
+1 ;;VOL-ALLOT-AMT-4;VOLUNTARY ALLOTMENTS-4 AMT;1;6;VALLOT;8;D SIGN^PRSDUTIL;9;9;439.3
24 ;;GRP 24;1;6;
+1 ;;VCS-ALLOT-AMT;VCS ALLOTMENT AMT;1;6;VCS;22;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;10;586.1
25 ;;GRP 25;1;9;
+1 ;;AWARD-TRAVEL-SAVINGS;TRAVEL SAVINGS AWARD;1;9;AWARDS;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;11;587.2
26 ;;GRP 26;1;4;
+1 ;;LD-CODE1;LABOR DIST CODE-1;1;4;LD;2;S MULT=1,MFLD=1;LD;2;450.0757-1
27 ;;GRP 27;1;3;
+1 ;;LD-PERCENT1;LABOR DIST CODE-1 PCT;1;3;LD;3;S MULT=1,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;LD;3;450.0757-2
28 ;;GRP 28;1;4
+1 ;;LD-MXORGCOD;LABOR DIST CODE-1 COST CENTER;1;4;LD;4;S MULT=1,MFLD=3;LD;4;450.0757-3
29 ;;GRP 29;1;3
+1 ;;LD-MXFUNDCP;LABOR DIST CODE-1 FUND CTRL PNT;1;3;LD;5;S MULT=1,MFLD=4;LD;5;450.0757-4
30 ;;GRP 30;1;4
+1 ;;LD-CODE2;LABOR DIST CODE-2;1;4;LD;2;S MULT=2,MFLD=1;LD;2;450.0757-1
31 ;;GRP 31;1;3
+1 ;;LD-PERCENT2;LABOR DIST CODE-2 PCT;1;3;LD;3;S MULT=2,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;LD;3;450.0757-2
32 ;;GRP 32;1;4
+1 ;;LD-MHORGCOD2;LABOR DIST CODE-2 COST CENTER;1;4;LD;4;S MULT=2,MFLD=3;LD;4;450.0757-3
33 ;;GRP 33;1;3
+1 ;;LD-MHFUNDCP2;LABOR DIST CODE-2 FUND CTRL PNT;1;3;LD;5;S MULT=2,MFLD=4;LD;5;450.0757-4
34 ;;GRP 34;1;4
+1 ;;LD-CODE3;LABOR DIST CODE-3;1;4;LD;2;S MULT=3,MFLD=1;LD;2;450.0757-1
35 ;;GRP 35;1;3
+1 ;;LD-PERCENT3;LABOR DIST CODE-3 PCT;1;3;LD;3;S MULT=3,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;LD;3;450.0757-2
36 ;;GRP 36;1;4
+1 ;;LD-MHORGCOD3;LABOR DIST CODE-3 COST CENTER;1;4;LD;4;S MULT=3,MFLD=3;LD;4;450.0757-3
37 ;;GRP 37;1;3
+1 ;;LD-MHFUNDCP3;LABOR DIST CODE-3 FUND CTRL PNT;1;3;LD;5;S MULT=3,MFLD=4;LD;5;450.0757-4
38 ;;GRP 38;1;4
+1 ;;LD-CODE4;LABOR DIST CODE-4;1;4;LD;2;S MULT=4,MFLD=1;LD;2;450.0757-1
39 ;;GRP 39;1;3
+1 ;;LD-PERCENT4;LABOR DIST CODE-4 PCT;1;3;LD;3;S MULT=4,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;LD;3;450.0757-2
40 ;;GRP 40;1;4
+1 ;;LD-MHORGCOD4;LABOR DIST CODE-4 COST CENTER;1;4;LD;4;S MULT=4,MFLD=3;LD;4;450.0757-3
41 ;;GRP 41;1;3
+1 ;;LD-MHFUNDCP4;LABOR DIST CODE-4 FUND CTRL PNT;1;3;LD;5;S MULT=4,MFLD=4;LD;5;450.0757-4
42 ;;GRP 42;1;6
+1 ;;FSA-HEALTH-CARE;HLTH CARE FLX SPEND ACCT CPPD;1;6;FSA;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;13;759
43 ;;GRP 43;1;6
+1 ;;FSA-HEALTH-CARE-YTD;HLTH CARE FLX SPEND ACCT YTD;1;6;FSA;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;12;758
44 ;;GRP 44;1;1
+1 ;;MFCOURT-ORDERED-FEHB;FED EMP HLTH BENE CRT ORD IND;1;1;FED;12;;9;16;752
45 ;;GRP 45;1;1
+1 ;;MX-EANDL-PRINT-IND;EARNINGS & LEAVE PRT SELECTION;1;1;ADD;11;;9;17;753
+2 QUIT
