PRSDLD06 ;HISC/GWB-PAID INITIAL DOWNLOAD RECORD 6 LAYOUT ;04/03/2003
;;4.0;PAID;**82**;Sep 21, 1995
F CC=1:1 S FLD=$T(RECORD+CC) Q:FLD="" D LDSET^PRSDSET
Q
RECORD ;;Record 6;62
;;MAAGEDAT;SPECIAL PAY AGREEMENT DATE;T38;25;D DATE^PRSDUTIL;;;;;143
;;MAAGELNG;SPECIAL PAY AGREEMENT LENGTH;T38;26;;;;;;144
;;MAC7FUE1;FUNCTIONAL EXPERIENCE 1;PCD;5;S:DATA=0 DATA="";;;;;172
;;MAC7FUE2;FUNCTIONAL EXPERIENCE 2;PCD;6;S:DATA=0 DATA="";;;;;173
;;MASPPAYC;SPECIAL CALC INDICATOR;T38;31;;;;;;149
;;MADPCC1;DIPLOMATE;T38;21;S:DATA="00" DATA="";;;;;139
;;MADPCC2;ADDL DIPLOMATE SPECIALTY A;T38;2;S:DATA="00" DATA="";;;;;120
;;MADPCC3;ADDL DIPLOMATE SPECIALTY B;T38;14;S:DATA="00" DATA="";;;;;132
;;MAANVERP;ANNUAL REVIEW IND;T38;4;;;;;;122
;;MABRDCD1;BOARD ELIGIBLE SPECIALTY A;T38;5;S:DATA="00" DATA="";;;;;123
;;MABRDCD2;BOARD ELIGIBLE SPECIALTY B;T38;6;S:DATA="00" DATA="";;;;;124
;;MAACDTIT;ACADEMIC TITLE;T38;1;S:DATA=0 DATA="";;;;;119
;;MACBRTH;COUNTRY OF BIRTH;T38;9;;;;;;127
;;MACMEDD;COUNTRY OF MEDICAL SCHOOL;T38;10;;;;;;128
;;MACPOST;COUNTRY OF POST GR TRAINING;T38;11;;;;;;129
;;MAQLDATE;SPECIAL PAY AGREEMENT QUAL APT;T38;27;;;;;;145
;;MAQLCURR;SPECIAL PAY AGREEMENT QUAL CUR;T38;28;;;;;;146
;;MACEDDAT;CONTINUING EDUC CODE (AT APPT);T38;7;;;;;;125
;;MACEDCUR;CONTINUING EDUC CODE (CURRENT);T38;8;;;;;;126
;;MANAGDAT;NO AGREEMENT REASON (AT APPT);T38;16;;;;;;134
;;MANAGCUR;NO AGREEMENT REASON (CURRENT);T38;17;;;;;;135
;;MAPRVAST;PRIOR VA EXPERIENCE (S/I/R);PVAE;;D PVAE^PRSDUTIL;;;;;
;;MAPRVAOT;PRIOR VA EXPERIENCE (OTHER);PVAE;;D PVAE^PRSDUTIL;;;;;
;;MAADVTEN;ANNUAL TENURE CHANGE;T38;3;;;;;;121
;;MAPPOSRF;POSITION PREFERENCE;PCD;9;;;;;;176
;;MAPGEO1;GEOGRAPHIC PREFERENCE 1;PCD;7;;;;;;174
;;MAPGEO2;GEOGRAPHIC PREFERENCE 2;PCD;8;;;;;;175
;;MAPDATEA;DATE AVAILABLE;PCD;4;D DATE^PRSDUTIL;;;;;171
;;MAPDATAS;DATE ASSIGNED PRESENT POSITION;PCD;3;D DATE^PRSDUTIL;;;;;170
;;MAPSTAT;STATUS CODE;PCD;12;S:DATA=2 DATA="";;;;;179
;;MARETPAY;SPECIAL PAY RET DED;T38;29;;;;;;147
;;MAC7SPPG;SPECIAL PROGRAM;PCD;10;S:DATA=0 DATA="";;;;;177
;;MAC7YRCM;YEAR COMPLETED;PCD;11;S:DATA="0000" DATA="";;;;;178
;;MAC7TRPG;TRAINING PROGRAM;PCD;13;S:DATA=0 DATA="";;;;;180
;;MBMNAUN;MONTHLY ANNUITY;MISC4;17;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;456
;;MBSLCODE;LIMITATION CODE;1;29;S:DATA=0 DATA="";;;;;76
;;MBSLHRD;HOURS/SALARY LIMITATION;1;31;D SIGN^PRSDUTIL S DATA=+DATA;;;;;78
;;MBSLHRDA;LIMITATION HOURS TO DATE;1;32;D SIGN^PRSDUTIL S DATA=+DATA;;;;;79
;;MBSLANNV;LIMITATION EXP DATE;1;30;D DATE^PRSDUTIL;;;;;77
;;MBUNCOD2;UNION CODE-2;UNION;2;;;;;;429
;;MBUNDES2;UNION DUES-2 DEDUCTION EPPD;UNION;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;434
;;MBQTRCOD;QUARTERS CODE;QSGP;6;D SIGN^PRSDUTIL;;;;;323
;;MBQTRDED;QUARTERS DEDUCTION EPPD;QSGP;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;324
;;MBQTRQS;QUARTERS STATION;QSGP;9;;;;;;326
;;MBSUBSIS;SUBSISTANCE DEDUCTION EPPD;QSGP;11;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;328
;;MBGARAGE;GARAGE DEDUCTION EPPD;QSGP;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;319
;;MBPARK;PARKING DEDUCTION EPPD;QSGP;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;322
;;MBSTATFR;VA STATION TRANSFERRED FROM;1;40;;;;;;87
;;MBSEPAR;SEPARATION IND;1;33;D SEPIND^PRSDMISC;;;;;80
;;MBAPDISB;DISABILITY RETIREMENT;1;11;;;;;;58
;;MBBECBEN;OWCP BENEFICIARY IND;1;21;;;;;;68
;;MBSACODE;ACCESSION/SEPARATION CODE;1;1;;;;;;48
;;MBSADATE;ACCESSION/SEPARATION EFF DATE;1;2;D DATE^PRSDUTIL,ACCSEP^PRSDMISC;;;;;49
;;MBSANOAC;ACCESSION/SEPARATION NOA CODE;1;3;;;;;;50
;;MBSAELG;RETIREMENT ANN SURV ELIG CODE;1;28;;;;;;75
;;MBFINPAY;FINAL PAY IND;MISC4;10;;;;;;449
;;MBPRBSUP;SUPV APPT PROBATION PERIOD IND;1;37;;;;;;84
;;MBPRBSES;SES APPT PROBATION PERIOD IND;1;34;;;;;;81
;;MCSTX-GSACODE;STATE TAX-2 GSA CODE;STATE;21;;;;;;392
;;MCSTX-MARITAL-STATUS;STATE TAX-2 MARITAL STATUS;STATE;22;;;;;;393
;;MCSTX-RESIDENCE;STATE TAX-2 RESIDENCE STATE;STATE;23;;;;;;394
;;MCSTX-EXEMPTION-1;STATE TAX-2 EXEMPTION CODE-1;STATE;17;D SIGN^PRSDUTIL,D^PRSDUTIL S DATA=+DATA;;;;;388
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPRSDLD06 4040 printed Nov 22, 2024@17:35:35 Page 2
PRSDLD06 ;HISC/GWB-PAID INITIAL DOWNLOAD RECORD 6 LAYOUT ;04/03/2003
+1 ;;4.0;PAID;**82**;Sep 21, 1995
+2 FOR CC=1:1
SET FLD=$TEXT(RECORD+CC)
if FLD=""
QUIT
DO LDSET^PRSDSET
+3 QUIT
RECORD ;;Record 6;62
+1 ;;MAAGEDAT;SPECIAL PAY AGREEMENT DATE;T38;25;D DATE^PRSDUTIL;;;;;143
+2 ;;MAAGELNG;SPECIAL PAY AGREEMENT LENGTH;T38;26;;;;;;144
+3 ;;MAC7FUE1;FUNCTIONAL EXPERIENCE 1;PCD;5;S:DATA=0 DATA="";;;;;172
+4 ;;MAC7FUE2;FUNCTIONAL EXPERIENCE 2;PCD;6;S:DATA=0 DATA="";;;;;173
+5 ;;MASPPAYC;SPECIAL CALC INDICATOR;T38;31;;;;;;149
+6 ;;MADPCC1;DIPLOMATE;T38;21;S:DATA="00" DATA="";;;;;139
+7 ;;MADPCC2;ADDL DIPLOMATE SPECIALTY A;T38;2;S:DATA="00" DATA="";;;;;120
+8 ;;MADPCC3;ADDL DIPLOMATE SPECIALTY B;T38;14;S:DATA="00" DATA="";;;;;132
+9 ;;MAANVERP;ANNUAL REVIEW IND;T38;4;;;;;;122
+10 ;;MABRDCD1;BOARD ELIGIBLE SPECIALTY A;T38;5;S:DATA="00" DATA="";;;;;123
+11 ;;MABRDCD2;BOARD ELIGIBLE SPECIALTY B;T38;6;S:DATA="00" DATA="";;;;;124
+12 ;;MAACDTIT;ACADEMIC TITLE;T38;1;S:DATA=0 DATA="";;;;;119
+13 ;;MACBRTH;COUNTRY OF BIRTH;T38;9;;;;;;127
+14 ;;MACMEDD;COUNTRY OF MEDICAL SCHOOL;T38;10;;;;;;128
+15 ;;MACPOST;COUNTRY OF POST GR TRAINING;T38;11;;;;;;129
+16 ;;MAQLDATE;SPECIAL PAY AGREEMENT QUAL APT;T38;27;;;;;;145
+17 ;;MAQLCURR;SPECIAL PAY AGREEMENT QUAL CUR;T38;28;;;;;;146
+18 ;;MACEDDAT;CONTINUING EDUC CODE (AT APPT);T38;7;;;;;;125
+19 ;;MACEDCUR;CONTINUING EDUC CODE (CURRENT);T38;8;;;;;;126
+20 ;;MANAGDAT;NO AGREEMENT REASON (AT APPT);T38;16;;;;;;134
+21 ;;MANAGCUR;NO AGREEMENT REASON (CURRENT);T38;17;;;;;;135
+22 ;;MAPRVAST;PRIOR VA EXPERIENCE (S/I/R);PVAE;;D PVAE^PRSDUTIL;;;;;
+23 ;;MAPRVAOT;PRIOR VA EXPERIENCE (OTHER);PVAE;;D PVAE^PRSDUTIL;;;;;
+24 ;;MAADVTEN;ANNUAL TENURE CHANGE;T38;3;;;;;;121
+25 ;;MAPPOSRF;POSITION PREFERENCE;PCD;9;;;;;;176
+26 ;;MAPGEO1;GEOGRAPHIC PREFERENCE 1;PCD;7;;;;;;174
+27 ;;MAPGEO2;GEOGRAPHIC PREFERENCE 2;PCD;8;;;;;;175
+28 ;;MAPDATEA;DATE AVAILABLE;PCD;4;D DATE^PRSDUTIL;;;;;171
+29 ;;MAPDATAS;DATE ASSIGNED PRESENT POSITION;PCD;3;D DATE^PRSDUTIL;;;;;170
+30 ;;MAPSTAT;STATUS CODE;PCD;12;S:DATA=2 DATA="";;;;;179
+31 ;;MARETPAY;SPECIAL PAY RET DED;T38;29;;;;;;147
+32 ;;MAC7SPPG;SPECIAL PROGRAM;PCD;10;S:DATA=0 DATA="";;;;;177
+33 ;;MAC7YRCM;YEAR COMPLETED;PCD;11;S:DATA="0000" DATA="";;;;;178
+34 ;;MAC7TRPG;TRAINING PROGRAM;PCD;13;S:DATA=0 DATA="";;;;;180
+35 ;;MBMNAUN;MONTHLY ANNUITY;MISC4;17;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;456
+36 ;;MBSLCODE;LIMITATION CODE;1;29;S:DATA=0 DATA="";;;;;76
+37 ;;MBSLHRD;HOURS/SALARY LIMITATION;1;31;D SIGN^PRSDUTIL S DATA=+DATA;;;;;78
+38 ;;MBSLHRDA;LIMITATION HOURS TO DATE;1;32;D SIGN^PRSDUTIL S DATA=+DATA;;;;;79
+39 ;;MBSLANNV;LIMITATION EXP DATE;1;30;D DATE^PRSDUTIL;;;;;77
+40 ;;MBUNCOD2;UNION CODE-2;UNION;2;;;;;;429
+41 ;;MBUNDES2;UNION DUES-2 DEDUCTION EPPD;UNION;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;434
+42 ;;MBQTRCOD;QUARTERS CODE;QSGP;6;D SIGN^PRSDUTIL;;;;;323
+43 ;;MBQTRDED;QUARTERS DEDUCTION EPPD;QSGP;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;324
+44 ;;MBQTRQS;QUARTERS STATION;QSGP;9;;;;;;326
+45 ;;MBSUBSIS;SUBSISTANCE DEDUCTION EPPD;QSGP;11;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;328
+46 ;;MBGARAGE;GARAGE DEDUCTION EPPD;QSGP;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;319
+47 ;;MBPARK;PARKING DEDUCTION EPPD;QSGP;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;322
+48 ;;MBSTATFR;VA STATION TRANSFERRED FROM;1;40;;;;;;87
+49 ;;MBSEPAR;SEPARATION IND;1;33;D SEPIND^PRSDMISC;;;;;80
+50 ;;MBAPDISB;DISABILITY RETIREMENT;1;11;;;;;;58
+51 ;;MBBECBEN;OWCP BENEFICIARY IND;1;21;;;;;;68
+52 ;;MBSACODE;ACCESSION/SEPARATION CODE;1;1;;;;;;48
+53 ;;MBSADATE;ACCESSION/SEPARATION EFF DATE;1;2;D DATE^PRSDUTIL,ACCSEP^PRSDMISC;;;;;49
+54 ;;MBSANOAC;ACCESSION/SEPARATION NOA CODE;1;3;;;;;;50
+55 ;;MBSAELG;RETIREMENT ANN SURV ELIG CODE;1;28;;;;;;75
+56 ;;MBFINPAY;FINAL PAY IND;MISC4;10;;;;;;449
+57 ;;MBPRBSUP;SUPV APPT PROBATION PERIOD IND;1;37;;;;;;84
+58 ;;MBPRBSES;SES APPT PROBATION PERIOD IND;1;34;;;;;;81
+59 ;;MCSTX-GSACODE;STATE TAX-2 GSA CODE;STATE;21;;;;;;392
+60 ;;MCSTX-MARITAL-STATUS;STATE TAX-2 MARITAL STATUS;STATE;22;;;;;;393
+61 ;;MCSTX-RESIDENCE;STATE TAX-2 RESIDENCE STATE;STATE;23;;;;;;394
+62 ;;MCSTX-EXEMPTION-1;STATE TAX-2 EXEMPTION CODE-1;STATE;17;D SIGN^PRSDUTIL,D^PRSDUTIL S DATA=+DATA;;;;;388