VistA-FOIAVistA/r/PAID-PRS/PRSDPRIN.m

123 lines
4.2 KiB
Mathematica

PRSDPRIN ;HISC/MGD-INITIALIZE PAID EMPLOYEE ACCOUNTING FIELDS ;11/19/2003
;;4.0;PAID;**2,34,82,86**;Sep 21, 1995
F CC=1:1 S FLD=$T(TABLE+CC) Q:FLD="" S NODE=$P(FLD,";",4),PIECE=$P(FLD,";",5) S:$D(^PRSPC(IEN,NODE)) $P(^PRSPC(IEN,NODE),U,PIECE)=""
S ^PRSPC(IEN,"PREMIUM1")=""
Q
TABLE ;;
;;CITY TAX-2 AMT WITHHELD CPPD;CITY;15
;;CFC DEDUCTION CPPD;CFC;3
;;UNION DUES-1 DEDUCTION CPPD;UNION;4
;;UNION DUES-2 DEDUCTION CPPD;UNION;6
;;BASE PAY CPPD;PAY;4
;;GROSS PAY CPPD;PAY;7
;;CSRS REEMP ANN DEDUCTION CPPD;RETIRE;8
;;NET PAY CPPD;PAY;8
;;FEDERAL TAX AMT WITHHELD CPPD;FED;5
;;RET VA SHARE CPPD;RETIRE;10
;;OASDI TAX VA SHARE CPPD;OASDI;7
;;SAVINGS BOND DED SUM CPPD;BOND1;1
;;COMPTIME/CREDIT HRS USED CPPD;COMP;18
;;STATE TAX-1 AMT WITHHELD CPPD;STATE;5
;;FEGLI BASIC DEDUCTION CPPD;FEGLI;3
;;FEGLI VA SHARE CPPD;FEGLI;7
;;FEGLI FAMILY DEDUCTION CPPD;FEGLI;5
;;MEDICARE AMT WITHHELD CPPD;MEDICARE;1
;;MEDICARE GROSS PAY CPPD;MEDICARE;4
;;FEHB DEDUCTION CPPD;FEHB;1
;;FEHB VA SHARE CPPD;FEHB;6
;;SEVERANCE PAY AMT CPPD;MISC4;18
;;NIGHT DIFFERENTIAL AMT CPPD;PREMIUM;7
;;HOLIDAY AMT CPPD;PREMIUM;4
;;STANDBY AMT CPPD;PREMIUM;17
;;UNIFORM ALLOWANCE AMT CPPD;UNIFORM;1
;;QSGP QUARTERS DEDUCTION CPPD;QSGP;8
;;QSGP SUBSIST DEDUCTION CPPD;QSGP;10
;;QSGP GARAGE DEDUCTION CPPD;QSGP;1
;;SATURDAY AMT CPPD;PREMIUM;16
;;SUNDAY AMT CPPD;PREMIUM;18
;;STATE TAX-2 AMT WITHHELD CPPD;STATE;16
;;COLA AMT CPPD;COLA;1
;;POST DIFFERENTIAL AMT CPPD;PREMIUM;15
;;INCENTIVE AWARD;AWARDS;1
;;PERFORMANCE AWARD;AWARDS;4
;;DEBT REFUND ACCT 36X6875 CPPD;OTHER;4
;;NET PAY OUT-OF-SYSTEM AMT CPPD;PAY;9
;;DEBT DEPOSIT ACCT 36X6875 CPPD;OTHER;2
;;QSGP NON-HSKP DEDUCTION CPPD;QSGP;3
;;FEGLI STANDARD DEDUCTION CPPD;FEGLI;6
;;MSD DEDUCTION CPPD;MSD2;4
;;OASDI TAX AMT WITHHELD CPPD;OASDI;1
;;RET DEDUCTION CPPD;RETIRE;9
;;OVERTIME AMT CPPD;PREMIUM;12
;;AUO AMT CPPD;PREMIUM;1
;;ANNUAL LEAVE USED CPPD;ANNUAL;6
;;TOTAL SICK LEAVE USED CPPD;SICK;6
;;NIGHT DIFFERENTIAL HRS CPPD;PREMIUM;8
;;OVERTIME HRS CPPD;PREMIUM;13
;;HOLIDAY HRS CPPD;PREMIUM;5
;;LWOP HOURS/DAYS CPPD;LWOP;5
;;LWOP HOURS CPPD;LWOP;11
;;NONPAY HOURS/DAYS CPPD;1;19
;;NONPAY HOURS CPPD;1;43
;;UNSCHEDULED HOURS;MISC;1
;;REGULAR HOURS AT OT RATE CPPD;PREMIUM;20
;;SUNDAY HRS CPPD;PREMIUM;19
;;FEGLI AGE CODE CPPD;FEGLI;2
;;DEBT REFUND ACCT 36F3875 CPPD;OTHER;3
;;DEBT DEPOSIT ACCT 36F3875 CPPD;OTHER;1
;;QSGP PARKING DEDUCTION CPPD;QSGP;4
;;OASDI TAX GROSS PAY CPPD;OASDI;4
;;FEGLI ADDNL DEDUCTION CPPD;FEGLI;1
;;ACSB ACS AMT CPPD;ACSB;1
;;ACSB BANKRUPTCY AMT CPPD;ACSB;6
;;VOLUNTARY ALLOTMENT AMT CPPD;VALLOT;2
;;SAVINGS ALLOTMENT-1 AMT CPPD;SALLOT;2
;;SAVINGS ALLOTMENT-2 AMT CPPD;SALLOT;4
;;SES PERFORMANCE AWARD AMT CPPD;AWARDS;3
;;CITY TAX-1 AMT WITHHELD CPPD;CITY;2
;;ON CALL HRS CPPD;PREMIUM;11
;;ON CALL AMT CPPD;PREMIUM;10
;;NONPAY ANNUAL LEAVE USED CPPD;ANNUAL;9
;;FLSA OVERTIME WEEK CODE CPPD;MISC;2
;;MOVING EXPENSES CPPD;MISC;3
;;ENVIRONMENTAL HAZARD HRS CPPD;PREMIUM;3
;;T38 SPECIAL SALARY ADJ CPPD;T38;32
;;REEMP ANN BASE PAY REDUCT CPPD;PAY;5
;;EARNED INCOME CREDIT AMT CPPD;MISC4;6
;;VCS LEAVE COST ADJUSTMENT AMT;VCS;18
;;VCS SALE SUM PW CPPD;VCS;21
;;VCS MINWAGE CD PW CPPD;VCS;20
;;TSP GSF EMP DED CPPD;TSP2;11
;;TSP FIF EMP DED CPPD;TSP2;6
;;TSP CSF EMP DED CPPD;TSP2;1
;;TSP GSF GOV BASIC CONTRIB;TSP2;13
;;TSP GSF GOV MATCH CONTRIB;TSP2;15
;;TSP FIF GOV BASIC CONTRIB;TSP2;8
;;TSP FIF GOV MATCH CONTRIB;TSP2;10
;;TSP CSF GOV BASIC CONTRIB;TSP2;3
;;TSP CSF GOV MATCH CONTRIB;TSP2;5
;;TSP LOAN DED CPPD;TSP1;7
;;GROSS PAY PLUS BENEFITS CPPD;PAY;10
;;ANNUAL LEAVE USED CPPD (HOURS);ANNUAL;14
;;TOTAL SICK LEAVE HRS USED CPPD;SICK;8
;;GAP AMT CPPD;MISC;20
;;RELOCATION BONUS;MISC;17
;;RECRUITMENT BONUS;MISC;18
;;RETENTION ALLOWANCE;MISC;16
;;HAZARD PAY DIFF;MISC;19
;;STAFFING DIFF;MISC;14
;;SUPERVISORY DIFF;MISC;15
;;LOCALITY PAY CPPD;MISC;21
;;TAX GARNISHMENT-1;ACSB;15
;;TAX GARNISHMENT-2;ACSB;16
;;COMMERCIAL GARNISHMENT-1;ACSB;17
;;COMMERCIAL GARNISHMENT-S;ACSB;18
;;CARE/BEREAVE LEAVE USED CPPD;SICK;9
;;ADOPTION LEAVE USED CPPD;SICK;11
;;OTHER SICK LEAVE USED CPPD;SICK;13
;;DONOR LEAVE USED CPPD;SICK;15
;;SPECIAL PAY RATE DIFFERENCE;1;35
;;FLTCIP CPPD;FLTCIP;2
;;HLTH CARE FLEX SPEND ACCT CPPD;FSA;2
;;DPNT CARE FLEX SPEND ACCT CPPD;FSA;4