- PRSDLD10 ;HISC/GWB-PAID INITIAL DOWNLOAD RECORD 10 LAYOUT ;7/8/93 15:45
- ;;4.0;PAID;;Sep 21, 1995
- F CC=1:1 S FLD=$T(RECORD+CC) Q:FLD="" D LDSET^PRSDSET
- Q
- RECORD ;;Record 10;31
- ;;MMDTENT2;MSD DATE ENTERED MIL SVC-2;MSD1;11;D DATE^PRSDUTIL;;;;;268
- ;;MMDTSEP2;MSD DATE SEPARATED MIL SVC-2;MSD1;14;D DATE^PRSDUTIL;;;;;271
- ;;MMBRSV2;MSD BRANCH OF SERVICE-2;MSD1;8;;;;;;265
- ;;MMLOST2;MSD LOST TIME-2;MSD1;17;D SIGN^PRSDUTIL S DATA=+DATA;;;;;274
- ;;MMAMTDU2;MSD AMT DUE THIS PERIOD-2;MSD1;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;262
- ;;MMPDMS3;MSD ACTION CODE-3;MSD1;3;S:DATA="D" DATA="";;;;;260
- ;;MMDTENT3;MSD DATE ENTERED MIL SVC-3;MSD1;12;D DATE^PRSDUTIL;;;;;269
- ;;MMDTSEP3;MSD DATE SEPARATED MIL SVC-3;MSD1;15;D DATE^PRSDUTIL;;;;;272
- ;;MMBRSV3;MSD BRANCH OF SERVICE-3;MSD1;9;;;;;;266
- ;;MMLOST3;MSD LOST TIME-3;MSD1;18;D SIGN^PRSDUTIL S DATA=+DATA;;;;;275
- ;;MMAMTDU3;MSD AMT DUE THIS PERIOD-3;MSD1;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;263
- ;;MMSAVAM2;SAVINGS ALLOTMENT-2 AMT EPPD;SALLOT;3;D SIGN^PRSDUTIL S DATA=+DATA;;;;;341
- ;;MNPPAMT;MSD DEDUCTION EPPD;MSD2;5;D SIGN^PRSDUTIL S DATA=+DATA;;;;;280
- ;;MNTOTDUE;MSD TOTAL AMT DUE;MSD2;13;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;288
- ;;MNTOTCOL;MSD TOTAL AMT COLLECTED;MSD2;12;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;287
- ;;MNICDATE;MSD INTEREST COMP DATE;MSD2;9;D DATE^PRSDUTIL;;;;;284
- ;;MNCYRCOL;MSD AMT PAID YTD;MSD2;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;277
- ;;MNINTCHG;MSD TOTAL INTEREST AMT;MSD2;14;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;289
- ;;MNPAYDAT;MSD CASH PAYMENT DATE;MSD2;3;D DATE^PRSDUTIL;;;;;278
- ;;MNINTAMT;MSD AMT FOR INTEREST COMP;MSD2;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;276
- ;;MNINTCY;MSD INTEREST AMT CCY;MSD2;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;282
- ;;MNCYRATE;MSD INTEREST RATE CCY;MSD2;10;S L=5 D LZ^PRSDUTIL,SIGN^PRSDUTIL,DDDDD^PRSDUTIL;;;;;285
- ;;MNINTPY;MSD INTEREST AMT PCY;MSD2;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;283
- ;;MNPYRATE;MSD INTEREST RATE PCY;MSD2;11;S L=5 D LZ^PRSDUTIL,SIGN^PRSDUTIL,DDDDD^PRSDUTIL;;;;;286
- ;;MOALCBAL;BAYLOR PLAN AL CURRENT BAL;BAYLOR;1;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;473
- ;;MOALUSED;BAYLOR PLAN AL USED LYTD;BAYLOR;3;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;475
- ;;MOALEOPY;BAYLOR PLAN AL EOPY BAL;BAYLOR;2;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;474
- ;;MOSLCBAL;BAYLOR PLAN SL CURRENT BAL;BAYLOR;13;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;485
- ;;MOSLUSED;BAYLOR PLAN SL USED LYTD;BAYLOR;15;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;487
- ;;MOSLEOPY;BAYLOR PLAN SL EOPY BAL;BAYLOR;14;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;486
- ;;MORALCD1;BAYLOR PLAN RESTORED AL YEAR-1;BAYLOR;11;;;;;;483
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPRSDLD10 2566 printed Mar 13, 2025@21:30:38 Page 2
- PRSDLD10 ;HISC/GWB-PAID INITIAL DOWNLOAD RECORD 10 LAYOUT ;7/8/93 15:45
- +1 ;;4.0;PAID;;Sep 21, 1995
- +2 FOR CC=1:1
- SET FLD=$TEXT(RECORD+CC)
- if FLD=""
- QUIT
- DO LDSET^PRSDSET
- +3 QUIT
- RECORD ;;Record 10;31
- +1 ;;MMDTENT2;MSD DATE ENTERED MIL SVC-2;MSD1;11;D DATE^PRSDUTIL;;;;;268
- +2 ;;MMDTSEP2;MSD DATE SEPARATED MIL SVC-2;MSD1;14;D DATE^PRSDUTIL;;;;;271
- +3 ;;MMBRSV2;MSD BRANCH OF SERVICE-2;MSD1;8;;;;;;265
- +4 ;;MMLOST2;MSD LOST TIME-2;MSD1;17;D SIGN^PRSDUTIL S DATA=+DATA;;;;;274
- +5 ;;MMAMTDU2;MSD AMT DUE THIS PERIOD-2;MSD1;5;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;262
- +6 ;;MMPDMS3;MSD ACTION CODE-3;MSD1;3;S:DATA="D" DATA="";;;;;260
- +7 ;;MMDTENT3;MSD DATE ENTERED MIL SVC-3;MSD1;12;D DATE^PRSDUTIL;;;;;269
- +8 ;;MMDTSEP3;MSD DATE SEPARATED MIL SVC-3;MSD1;15;D DATE^PRSDUTIL;;;;;272
- +9 ;;MMBRSV3;MSD BRANCH OF SERVICE-3;MSD1;9;;;;;;266
- +10 ;;MMLOST3;MSD LOST TIME-3;MSD1;18;D SIGN^PRSDUTIL S DATA=+DATA;;;;;275
- +11 ;;MMAMTDU3;MSD AMT DUE THIS PERIOD-3;MSD1;6;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;263
- +12 ;;MMSAVAM2;SAVINGS ALLOTMENT-2 AMT EPPD;SALLOT;3;D SIGN^PRSDUTIL S DATA=+DATA;;;;;341
- +13 ;;MNPPAMT;MSD DEDUCTION EPPD;MSD2;5;D SIGN^PRSDUTIL S DATA=+DATA;;;;;280
- +14 ;;MNTOTDUE;MSD TOTAL AMT DUE;MSD2;13;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;288
- +15 ;;MNTOTCOL;MSD TOTAL AMT COLLECTED;MSD2;12;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;287
- +16 ;;MNICDATE;MSD INTEREST COMP DATE;MSD2;9;D DATE^PRSDUTIL;;;;;284
- +17 ;;MNCYRCOL;MSD AMT PAID YTD;MSD2;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;277
- +18 ;;MNINTCHG;MSD TOTAL INTEREST AMT;MSD2;14;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;289
- +19 ;;MNPAYDAT;MSD CASH PAYMENT DATE;MSD2;3;D DATE^PRSDUTIL;;;;;278
- +20 ;;MNINTAMT;MSD AMT FOR INTEREST COMP;MSD2;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;276
- +21 ;;MNINTCY;MSD INTEREST AMT CCY;MSD2;7;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;282
- +22 ;;MNCYRATE;MSD INTEREST RATE CCY;MSD2;10;S L=5 D LZ^PRSDUTIL,SIGN^PRSDUTIL,DDDDD^PRSDUTIL;;;;;285
- +23 ;;MNINTPY;MSD INTEREST AMT PCY;MSD2;8;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;283
- +24 ;;MNPYRATE;MSD INTEREST RATE PCY;MSD2;11;S L=5 D LZ^PRSDUTIL,SIGN^PRSDUTIL,DDDDD^PRSDUTIL;;;;;286
- +25 ;;MOALCBAL;BAYLOR PLAN AL CURRENT BAL;BAYLOR;1;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;473
- +26 ;;MOALUSED;BAYLOR PLAN AL USED LYTD;BAYLOR;3;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;475
- +27 ;;MOALEOPY;BAYLOR PLAN AL EOPY BAL;BAYLOR;2;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;474
- +28 ;;MOSLCBAL;BAYLOR PLAN SL CURRENT BAL;BAYLOR;13;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;485
- +29 ;;MOSLUSED;BAYLOR PLAN SL USED LYTD;BAYLOR;15;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;487
- +30 ;;MOSLEOPY;BAYLOR PLAN SL EOPY BAL;BAYLOR;14;D SIGN^PRSDUTIL,DDD^PRSDUTIL;;;;;486
- +31 ;;MORALCD1;BAYLOR PLAN RESTORED AL YEAR-1;BAYLOR;11;;;;;;483
