PRSDLD04 ;HISC/GWB-PAID INITIAL DOWNLOAD RECORD 4 LAYOUT ;7/1/93  09:18
 ;;4.0;PAID;;Sep 21, 1995
 F CC=1:1 S FLD=$T(RECORD+CC) Q:FLD=""  D LDSET^PRSDSET
 Q
RECORD ;;Record 4;40
 ;;MXCTX-YTD-GROSS;CITY TAX-1 GROSS PAY YTD;CITY;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;194
 ;;MXSTX-PR-EXEMPTION;PUERTO RICO STATE TAX EXEMPT;STATE;1;D SIGN^PRSDUTIL S DATA=+DATA;;;;;372
 ;;MXVALTNO;VOLUNTARY ALLOTMENT-1 CTRL NO;VALLOT;3;;;;;;437
 ;;MXVALAMT;VOLUNTARY ALLOTMENT-1 AMT;VALLOT;1;D SIGN^PRSDUTIL S DATA=+DATA;;;;;435
 ;;MXCFCCOD;CFC CODE;CFC;2;;;;;;210
 ;;MXCFCBIW;CFC BIWEEKLY DEDUCTION;CFC;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;209
 ;;MXHRUNAL;UNIFORM ALLOWANCE HOURLY RATE;UNIFORM;3;D SIGN^PRSDUTIL S DATA=$E(DATA,1,4) D DDDD^PRSDUTIL;;;;;565
 ;;MXUNRID1;BUS CODE;1;5;;;;;;52
 ;;MXUNCOD1;UNION CODE-1;UNION;1;;;;;;428
 ;;MXUNDES1;UNION DUES-1 DEDUCTION EPPD;UNION;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;432
 ;;MXFLCD-1;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-1;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-2;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-2;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-3;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-3;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-4;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-4;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-5;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-5;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-6;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-6;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-7;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-7;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-8;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-8;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-9;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-9;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-10;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-10;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-11;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-11;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-12;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-12;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-13;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-13;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-14;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-14;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL
 ;;MXFLCD-15;FOLLOWUP CODE;;;S F=DATA D:F="DT" ^PRSDFOLL
 ;;MXFLYD-15;FOLLOWUP DATE;;;S DATA=F_DATA D ^PRSDFOLL