PRSDLD14.m

PRSDLD14 ;HISC/GWB-PAID INITIAL DOWNLOAD RECORD 14 LAYOUT ;7/8/93  16:00

 ;;4.0;PAID;**34**;Sep 21, 1995

 F CC=1:1 S FLD=$T(RECORD+CC) Q:FLD=""  D LDSET^PRSDSET

 Q

RECORD ;;Record 14;32

 ;;ASCITTAX;CITY TAX-2 AMT WITHHELD CPPD;CITY;15;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;201

 ;;AUGFDED;CFC DEDUCTION CPPD;CFC;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;211

 ;;ACOMP;COMPTIME/CREDIT HRS BALANCE;COMP;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;496

 ;;AUNIONDUE1;UNION DUES-1 DEDUCTION CPPD;UNION;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;431

 ;;AUNIONDUE2;UNION DUES-2 DEDUCTION CPPD;UNION;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;433

 ;;AB1BAL;SAVINGS BOND-1 BALANCE;BOND1;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;347

 ;;AB2BAL;SAVINGS BOND-2 BALANCE;BOND2;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;361

 ;;ABASE;BASE PAY CPPD;PAY;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;537

 ;;AGROSS;GROSS PAY CPPD;PAY;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;540

 ;;ARETEMP;CSRS REEMP ANNUITANT DED CPPD;RETIRE;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;336

 ;;ANET;NET PAY CPPD;PAY;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;541

 ;;AWHTAX;FEDERAL TAX AMT WITHHELD CPPD;FED;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;216

 ;;ARETIREVA;RETIREMENT VA SHARE CPPD;RETIRE;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;338

 ;;AFICAVA;OASDI TAX VA SHARE CPPD;OASDI;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;296

 ;;AB1DED;SAVINGS BOND DED SUM CPPD;BOND1;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;343

 ;;ACOMPUSED;COMPTIME/CREDIT HRS USED CPPD;COMP;18;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;;;;;505

 ;;ASTAX;STATE TAX-1 AMT WITHHELD CPPD;STATE;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;376

 ;;ALIDEDEMP;FEGLI BASIC DEDUCTION CPPD;FEGLI;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;225

 ;;ALIDEDVA;FEGLI VA SHARE CPPD;FEGLI;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;229

 ;;AFAMLI;FEGLI FAMILY DEDUCTION CPPD;FEGLI;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;227

 ;;AMEDTAX;MEDICARE AMT WITHHELD CPPD;MEDICARE;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;250

 ;;AMEDWAGE;MEDICARE GROSS PAY CPPD;MEDICARE;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;253

 ;;AHIDEDEMP;HEALTH BENEFITS DEDUCTION CPPD;FEHB;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;230

 ;;AHIDEDVA;HEALTH BENEFITS VA SHARE CPPD;FEHB;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;235

 ;;ASEVPAY;SEVERANCE PAY AMT CPPD;MISC4;18;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;457

 ;;ANITEPAY;NIGHT DIFF AMT CPPD;PREMIUM;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;549

 ;;AHOLPAY;HOLIDAY AMT;PREMIUM;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;546

 ;;ASTDBY;STANDBY AMT CPPD;PREMIUM;17;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;559

 ;;AUNIF;UNIFORM ALLOWANCE AMT CPPD;UNIFORM;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;563

 ;;AQTRS;QUARTERS DEDUCTION CPPD;QSGP;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;325

 ;;ASUBSIST;SUBSISTANCE DEDUCTION CPPD;QSGP;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;327

 ;;AGAR;GARAGE DEDUCTION CPPD;QSGP;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;318

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---PRSDLD14   2760     printed  Apr 09, 2024@21:31:34                                                                                                                                                                                                    Page 2

PRSDLD14  ;HISC/GWB-PAID INITIAL DOWNLOAD RECORD 14 LAYOUT ;7/8/93  16:00

 +1       ;;4.0;PAID;**34**;Sep 21, 1995

 +2        FOR CC=1:1

               SET FLD=$TEXT(RECORD+CC)

               if FLD=""

                   QUIT 

               DO LDSET^PRSDSET

 +3        QUIT 

RECORD    ;;Record 14;32

 +1       ;;ASCITTAX;CITY TAX-2 AMT WITHHELD CPPD;CITY;15;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;201

 +2       ;;AUGFDED;CFC DEDUCTION CPPD;CFC;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;211

 +3       ;;ACOMP;COMPTIME/CREDIT HRS BALANCE;COMP;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;496

 +4       ;;AUNIONDUE1;UNION DUES-1 DEDUCTION CPPD;UNION;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;431

 +5       ;;AUNIONDUE2;UNION DUES-2 DEDUCTION CPPD;UNION;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;433

 +6       ;;AB1BAL;SAVINGS BOND-1 BALANCE;BOND1;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;347

 +7       ;;AB2BAL;SAVINGS BOND-2 BALANCE;BOND2;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;361

 +8       ;;ABASE;BASE PAY CPPD;PAY;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;537

 +9       ;;AGROSS;GROSS PAY CPPD;PAY;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;540

 +10      ;;ARETEMP;CSRS REEMP ANNUITANT DED CPPD;RETIRE;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;336

 +11      ;;ANET;NET PAY CPPD;PAY;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;541

 +12      ;;AWHTAX;FEDERAL TAX AMT WITHHELD CPPD;FED;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;216

 +13      ;;ARETIREVA;RETIREMENT VA SHARE CPPD;RETIRE;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;338

 +14      ;;AFICAVA;OASDI TAX VA SHARE CPPD;OASDI;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;296

 +15      ;;AB1DED;SAVINGS BOND DED SUM CPPD;BOND1;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;343

 +16      ;;ACOMPUSED;COMPTIME/CREDIT HRS USED CPPD;COMP;18;D SIGN^PRSDUTIL,AHRS^PRSDUTIL;;;;;505

 +17      ;;ASTAX;STATE TAX-1 AMT WITHHELD CPPD;STATE;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;376

 +18      ;;ALIDEDEMP;FEGLI BASIC DEDUCTION CPPD;FEGLI;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;225

 +19      ;;ALIDEDVA;FEGLI VA SHARE CPPD;FEGLI;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;229

 +20      ;;AFAMLI;FEGLI FAMILY DEDUCTION CPPD;FEGLI;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;227

 +21      ;;AMEDTAX;MEDICARE AMT WITHHELD CPPD;MEDICARE;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;250

 +22      ;;AMEDWAGE;MEDICARE GROSS PAY CPPD;MEDICARE;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;253

 +23      ;;AHIDEDEMP;HEALTH BENEFITS DEDUCTION CPPD;FEHB;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;230

 +24      ;;AHIDEDVA;HEALTH BENEFITS VA SHARE CPPD;FEHB;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;235

 +25      ;;ASEVPAY;SEVERANCE PAY AMT CPPD;MISC4;18;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;457

 +26      ;;ANITEPAY;NIGHT DIFF AMT CPPD;PREMIUM;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;549

 +27      ;;AHOLPAY;HOLIDAY AMT;PREMIUM;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;546

 +28      ;;ASTDBY;STANDBY AMT CPPD;PREMIUM;17;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;559

 +29      ;;AUNIF;UNIFORM ALLOWANCE AMT CPPD;UNIFORM;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;563

 +30      ;;AQTRS;QUARTERS DEDUCTION CPPD;QSGP;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;325

 +31      ;;ASUBSIST;SUBSISTANCE DEDUCTION CPPD;QSGP;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;327

 +32      ;;AGAR;GARAGE DEDUCTION CPPD;QSGP;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;318