PRSDLD08 ;HISC/GWB-PAID INITIAL DOWNLOAD RECORD 8 LAYOUT ;08/13/01
;;4.0;PAID;**34,69**;Sep 21, 1995
F CC=1:1 S FLD=$T(RECORD+CC) Q:FLD="" D LDSET^PRSDSET
Q
RECORD ;;Record 8;33
;;MELWPCAL;LWOP CCY;LWOP;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;517
;;MELWPSTP;LWOP THIS STEP;LWOP;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;523
;;MELWPPRB;LWOP PROB PD;LWOP;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;521
;;MELWPPRO;LWOP SINCE PROM;LWOP;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;522
;;MEPTIHRS;PART TIME/INTERMIT HRS TOTAL;1;23;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;70
;;MECRCALY;INTMT EMP DAYS WORKED YTD;MISC4;15;D SIGN^PRSDUTIL,D^PRSDUTIL;;;;;454
;;MECRISTP;INTMT EMP DAYS WORKED STEP;MISC4;14;D SIGN^PRSDUTIL,D^PRSDUTIL;;;;;453
;;MECRPRB;INTMT EMP DAYS WORKED PROB PD;MISC4;13;D SIGN^PRSDUTIL,D^PRSDUTIL;;;;;452
;;MEANNLVP;PAYABLE ANNUAL LEAVE;T38;19;D SIGN^PRSDUTIL S DATA=+DATA;;;;;137
;;MEANRYR1;RESTORED ANNUAL LEAVE YEAR-1;ANNUAL;12;;;;;;471
;;MEANRLV1;RESTORED ANNUAL LEAVE BAL-1;ANNUAL;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;469
;;MEANRYR2;RESTORED ANNUAL LEAVE YEAR-2;ANNUAL;13;;;;;;472
;;MEANRLV2;RESTORED ANNUAL LEAVE BAL-2;ANNUAL;11;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;470
;;MENPANNL;NON-PAYABLE ANNUAL LEAVE;T38;18;D SIGN^PRSDUTIL S DATA=+DATA;;;;;136
;;MEBPAYRT;BASE PAY AMT PRIOR TO RET COV;PAY;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;534
;;MEINDMIL;MILITARY LEAVE ELIGIBILITY IND;MILITARY;2;S:DATA=0 DATA="";;;;;507
;;MEMILLEV;MILITARY LEAVE BALANCE;MILITARY;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;506
;;MFCNTLNO;ACSB CONTROL NUMBER-1;ACSB;9;;;;;;244
;;MFACIND;ACSB CODE-1;ACSB;7;;;;;;242
;;MFPERFAC;ACSB FED/STATE PCT FACTOR-1;ACSB;13;D SIGN^PRSDUTIL,DDDD^PRSDUTIL;;;;;248
;;MFCURDED;ACSB CURRENT ALLOTMENT-1;ACSB;11;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;246
;;MFBPBAL;ACSB BACK PAY BALANCE-1;ACSB;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;237
;;MFBPDED;ACSB BACK PAY DEDUCTION-1;ACSB;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;239
;;MFODCOD1;OTHER DEDUCTION CODE-1;OTHER;11;;;;;;310
;;MFODBID1;OTHER DEDUCTION BIWEEKLY AMT-1;OTHER;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;308
;;MFODBAL1;OTHER DEDUCTION BALANCE-1;OTHER;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;306
;;MFODCOD2;OTHER DEDUCTION CODE-2;OTHER;12;;;;;;311
;;MFODBID2;OTHER DEDUCTION BIWEEKLY AMT-2;OTHER;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;309
;;MFODBAL2;OTHER DEDUCTION BALANCE-2;OTHER;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;307
;;MFCOLAPC;COLA;COLA;3;S L=3 D LZ^PRSDUTIL,SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;529
;;MFCOLAYD;COLA AMT YTD;COLA;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;528
;;MGCKAD1;CHECK MAILING ADDRESS LINE 1;ADD;1;;;;;;181
;;MGCKAD2;CHECK MAILING ADDRESS LINE 2;ADD;2;;;;;;182
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPRSDLD08 2635 printed Nov 22, 2024@17:35:37 Page 2
PRSDLD08 ;HISC/GWB-PAID INITIAL DOWNLOAD RECORD 8 LAYOUT ;08/13/01
+1 ;;4.0;PAID;**34,69**;Sep 21, 1995
+2 FOR CC=1:1
SET FLD=$TEXT(RECORD+CC)
if FLD=""
QUIT
DO LDSET^PRSDSET
+3 QUIT
RECORD ;;Record 8;33
+1 ;;MELWPCAL;LWOP CCY;LWOP;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;517
+2 ;;MELWPSTP;LWOP THIS STEP;LWOP;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;523
+3 ;;MELWPPRB;LWOP PROB PD;LWOP;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;521
+4 ;;MELWPPRO;LWOP SINCE PROM;LWOP;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;522
+5 ;;MEPTIHRS;PART TIME/INTERMIT HRS TOTAL;1;23;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;70
+6 ;;MECRCALY;INTMT EMP DAYS WORKED YTD;MISC4;15;D SIGN^PRSDUTIL,D^PRSDUTIL;;;;;454
+7 ;;MECRISTP;INTMT EMP DAYS WORKED STEP;MISC4;14;D SIGN^PRSDUTIL,D^PRSDUTIL;;;;;453
+8 ;;MECRPRB;INTMT EMP DAYS WORKED PROB PD;MISC4;13;D SIGN^PRSDUTIL,D^PRSDUTIL;;;;;452
+9 ;;MEANNLVP;PAYABLE ANNUAL LEAVE;T38;19;D SIGN^PRSDUTIL S DATA=+DATA;;;;;137
+10 ;;MEANRYR1;RESTORED ANNUAL LEAVE YEAR-1;ANNUAL;12;;;;;;471
+11 ;;MEANRLV1;RESTORED ANNUAL LEAVE BAL-1;ANNUAL;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;469
+12 ;;MEANRYR2;RESTORED ANNUAL LEAVE YEAR-2;ANNUAL;13;;;;;;472
+13 ;;MEANRLV2;RESTORED ANNUAL LEAVE BAL-2;ANNUAL;11;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;470
+14 ;;MENPANNL;NON-PAYABLE ANNUAL LEAVE;T38;18;D SIGN^PRSDUTIL S DATA=+DATA;;;;;136
+15 ;;MEBPAYRT;BASE PAY AMT PRIOR TO RET COV;PAY;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;534
+16 ;;MEINDMIL;MILITARY LEAVE ELIGIBILITY IND;MILITARY;2;S:DATA=0 DATA="";;;;;507
+17 ;;MEMILLEV;MILITARY LEAVE BALANCE;MILITARY;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;506
+18 ;;MFCNTLNO;ACSB CONTROL NUMBER-1;ACSB;9;;;;;;244
+19 ;;MFACIND;ACSB CODE-1;ACSB;7;;;;;;242
+20 ;;MFPERFAC;ACSB FED/STATE PCT FACTOR-1;ACSB;13;D SIGN^PRSDUTIL,DDDD^PRSDUTIL;;;;;248
+21 ;;MFCURDED;ACSB CURRENT ALLOTMENT-1;ACSB;11;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;246
+22 ;;MFBPBAL;ACSB BACK PAY BALANCE-1;ACSB;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;237
+23 ;;MFBPDED;ACSB BACK PAY DEDUCTION-1;ACSB;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;239
+24 ;;MFODCOD1;OTHER DEDUCTION CODE-1;OTHER;11;;;;;;310
+25 ;;MFODBID1;OTHER DEDUCTION BIWEEKLY AMT-1;OTHER;9;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;308
+26 ;;MFODBAL1;OTHER DEDUCTION BALANCE-1;OTHER;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;306
+27 ;;MFODCOD2;OTHER DEDUCTION CODE-2;OTHER;12;;;;;;311
+28 ;;MFODBID2;OTHER DEDUCTION BIWEEKLY AMT-2;OTHER;10;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;309
+29 ;;MFODBAL2;OTHER DEDUCTION BALANCE-2;OTHER;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;307
+30 ;;MFCOLAPC;COLA;COLA;3;S L=3 D LZ^PRSDUTIL,SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;529
+31 ;;MFCOLAYD;COLA AMT YTD;COLA;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;528
+32 ;;MGCKAD1;CHECK MAILING ADDRESS LINE 1;ADD;1;;;;;;181
+33 ;;MGCKAD2;CHECK MAILING ADDRESS LINE 2;ADD;2;;;;;;182