- 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 Feb 18, 2025@23:52:26 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