4410 EVAL AVL-TRANS FILE LAYOUT 03/15/2000 200 FD CNTY-EVAL-AVL-FILE 300 RECORD CONTAINS 210 CHARACTERS 400 BLOCK CONTAINS 30 RECORDS 500 DATA RECORD IS CNTY-EVAL-AVL-REC. 600 01 CNTY-EVAL-AVL-REC. 650 03 C-EVAL-AVL-LINE-DATA. 660 05 C-COUNTY PIC XX. 01-02 670 05 C-REF-NUM. 680 07 C- YEAR PIC XX. 03-04 690 07 C-PERIOD PIC XX. 05-06 700 05 C-EVAL-ID 710 07 C-STAC-ID PIC X(6) 07-12 720 07 C-ID-YEAR PIC XX. 13-14 730 07 C-ID-NUM-EVAL PIC XX. 15-16 800 05 C-NAME. 900 07 C-LAST PIC X(13). 17-29 1000 07 C-FIRST PIC X(11). 30-40 1010 05 C-PROVIDER PIC X(12). 41-52 1800 05 C-PRO-COST PIC S9(5)V99. 53-59 1900 05 C-YTD-PAID PIC S9(5)V99. 60-66 2100 05 C-AMT-AVAIL PIC S9(5)V99. 67-73 2110 05 C-ISSUE-DATE PIC X(8). 74-81 4200 05 C-DATE-RETURN. 4300 07 C-RET-CC PIC XX. 82-83 4300 07 C-RET-YY PIC XX. 84-85 4400 07 C-RET-MM PIC XX. 86-87 4500 07 C-RET-DD PIC XX. 88-89 ****************************** 4550 03 C-RET-AVAL-DATA 4700 05 C-RET-PAID-THRU. 4710 07 C-RET-PD-THRU-CC PIC XX. 90-91 4800 07 C-RET-PD-THRU-YY PIC XX. 92-93 4900 07 C-RET-PD-THRU-MM PIC XX. 94-95 5000 07 C-RET-PD-THRU-DD PIC XX. 96-97 5200 05 C-RET-AMT-PAID PIC S9(5)V99. 98-104 6700 05 C-RET-DATE-PAID OCCURS 10 TIMES. 105-184 6760 07 C-RET-DT-PD-CC PIC XX. 6800 07 C-RET-DT-PD-YY PIC XX. 6900 07 C-RET-DT-PD-MM PIC XX. 7000 07 C-RET-DT-PD-DD PIC XX. 7100 05 C-RET-VERIFICATION PIC X. 185 ************ 7110 03 C-AVL-LINE-DATA-REST. 7400 05 C-RCP-WTHD-STATUS PIC X. 186 7500 05 C-PAGE PIC 9999. 187-190 7600 05 C-OCCURRENCE PIC 99. 191-192 7700 05 C-OUTSIDE-ID PIC X(9). 193-201 7800 05 C-OUTSIDE-ID-R REDEFINES C-OUTSIDE-ID. 7900 07 C-OUTSIDE-ID-6 PIC X(6). 8000 07 FILLER PIC XXX 8200 05 C-DATE-OF-BIRTH. 8210 07 C-DOB-CC PIC XX. 202-203 8220 07 C-DOB-YY PIC XX. 204-205 8300 07 C-DOB-MMDD PIC X(4). 206-209 8390 05 END-OF-REC-MARKER PIC X. 210.