source: WorldVistAEHR/trunk/r/PAID-PRS/PRSDPR07.m@ 846

PRSDPR07 ;HISC/MGD-PAID PAYRUN DOWNLOAD RECORD 7 LAYOUT ;05/13/04
 ;;4.0;PAID;**86,73**;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 7;28
 ;;
1 ;;Group 1;1;7;9
 ;;AFICAGWG-D;OASDI TAX GROSS PAY CPPD;1;7;OASDI;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;9;293;A
 ;;
2 ;;Group 2;1;5;9
 ;;AADDLI;FEGLI ADDNL DEDUCTION CPPD;1;5;FEGLI;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;11;223;A
 ;;
3 ;;Group 3;1;7;9
 ;;AGARNAC;ACSB ACS AMT CPPD;1;7;ACSB;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;27;236;A
 ;;
4 ;;Group 4;1;7;9
 ;;AGARNBNK;ACSB BANKRUPTCY AMT CPPD;1;7;ACSB;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;28;241;A
 ;;
5 ;;Group 5;1;7;9
 ;;AVOLALLOT;VOLUNTARY ALLOTMENT AMT CPPD;1;7;VALLOT;2;D SIGN^PRSDUTIL S DATA=+DATA;2;24;436;A
 ;;
6 ;;Group 6;1;6;9
 ;;ASAVAMT1;SAVINGS ALLOTMENT-1 AMT CPPD;1;6;SALLOT;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;22;340;A
 ;;
7 ;;Group 7;1;6;9
 ;;ASAVAMT2;SAVINGS ALLOTMENT-2 AMT CPPD;1;6;SALLOT;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;23;342;A
 ;;
8 ;;Group 8;1;7;9
 ;;ASES-AWARD;SES PERFORMANCE AWARD AMT CPPD;1;7;AWARDS;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;25;589;A
 ;;
9 ;;Group 9;1;7;9
 ;;AMVTAX;MOVING EXPENSES CPPD;1;7;MISC;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;28;532;A
 ;;
10 ;;Group 10;1;6;9
 ;;ACTAX;CITY TAX-1 AMT WITHHELD CPPD;1;6;CITY;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;1;4;188;A
 ;;
11 ;;Group 11;1;6;9
 ;;AONCLHRS;ON CALL HRS CPPD;1;6;PREMIUM;11;S DATA=$E(DATA,1,$L(DATA)-2) D AHRS^PRSDUTIL;5;12;553;A
 ;;
12 ;;Group 12;1;7;9
 ;;AONCLPAY;ON CALL AMT CPPD;1;7;PREMIUM;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;13;552;A
 ;;
13 ;;Group 13;1;2;9
 ;;ANPAL;NONPAY ANNUAL LEAVE USED CPPD;1;2;ANNUAL;9;D SIGN^PRSDUTIL S DATA=+DATA;4;6;468;O
 ;;
14 ;;Group 14;1;1;X
 ;;AFLSAWK12B;FLSA OVERTIME WEEK CODE CPPD;1;1;MISC;2;;5;21;531;O
 ;;
15 ;;Group 15;1;4;9
 ;;AENVIRON;ENVIRONMENTAL HAZARD HRS CPPD;1;4;PREMIUM;3;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;5;7;545;A
 ;;
16 ;;Group 16;1;7;9
 ;;APDSPEC;SPECIAL SALARY ADJUSTMENT;1;7;T38;32;D SIGN^PRSDUTIL,DD^PRSDUTIL;6;3;150;A
 ;;
17 ;;Group 17;2;8;X
 ;;MXOPMSER/MXTITCOD;OCCUPATION SERIES & TITLE;1;6;0;17;D TITLE^PRSDUTIL;;;16
 ;;MXASSGCD;ASSIGNMENT;7;8;0;4;;;;3
 ;;
18 ;;Group 18;1;6;9
 ;;AANNU;REEMP ANNUITANT BASE PAY REDUC;1;6;PAY;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;5;4;538;A
 ;;
19 ;;Group 19;1;5;9
 ;;AEIC;EARNED INCOME CREDIT AMT CPPD;1;5;MISC4;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;3;1;445;A
 ;;
20 ;;Group 20;1;6;9
 ;;AVCCOST;VCS LEAVE COST ADJUSTMENT AMT;1;6;VCS;18;D SIGN^PRSDUTIL,DD^PRSDUTIL;7;1;583;A
 ;;
21 ;;Grroup 21;1;5;9
 ;;AVCSSALES;VCS SALE SUM PW CPPD;1;5;VCS;21;D SIGN^PRSDUTIL,DD^PRSDUTIL;7;3;586;A
 ;;
22 ;;Group 22;1;1;X
 ;;AVCSPW;VCS MINWAGE CD PW CPPD;1;1;VCS;20;;7;2;585;O
 ;;
23 ;;Group 23;11;71;X
 ;;ATSPEMP-G;TSP GSF EMP DED CPPD;1;7;TSP2;11;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;12;423;A
 ;;ATSPEMP-F;TSP FIF EMP DED CPPD;8;14;TSP2;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;11;418;A
 ;;ATSPEMP-C;TSP CSF EMP DED CPPD;15;21;TSP2;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;10;413;A
 ;;ATSPVAB-G;TSP GSF GOV BASIC CONTRIB;22;28;TSP2;13;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;15;425;A
 ;;ATSPVAM-G;TSP GSF GOV MATCH CONTRIB;29;35;TSP2;15;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;18;427;A
 ;;ATSPVAB-F;TSP FIF GOV BASIC CONTRIB;36;42;TSP2;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;14;420;A
 ;;ATSPVAM-F;TSP FIF GOV MATCH CONTRIB;43;49;TSP2;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;17;422;A
 ;;ATSPVAB-C;TSP CSF GOV BASIC CONTRIB;50;56;TSP2;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;13;415;A
 ;;ATSPVAM-C;TSP CSF GOV MATCH CONTRIB;57;63;TSP2;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;16;417;A
 ;;ATSPLOAN;TSP LOAN DED CPPD;64;70;TSP1;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;2;8;401;A
 ;;ATSPTXCD;TSP PRIOR TAX YEAR ADJ CODE;71;71;TSP1;11;;2;9;405;O
 ;;
24 ;;Group 24;1;1;X
 ;;TPSTATUS;TSP STATUS;1;1;TSP1;15;;;;409
 ;;
25 ;;Group 25;1;8;X
 ;;TPSTADTE;TSP STATUS DATE;1;8;TSP1;16;D DATE^PRSDUTIL;;;410
 ;;
26 ;;Group 26;1;8;X
 ;;TPELIGDTE;TSP ELIG;1;8;TSP1;5;D DATE^PRSDUTIL;;;399
 ;;
27 ;;Group 27;1;6;
 ;;FSA-DEP-CARE-AMT;DPNDT CARE FLX SPEND ACCT CPPD;1;6;FSA;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;15;761
 ;;
28 ;;Group 28;1;6;
 ;;FSA-DEP-CARE-AMT-YTD;DPNDT CARE FLX SPEND ACCT YTD;1;6;FSA;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;9;14;760