01 PPS-SSRFBN-TABLE-10. 02 WK-SSRFBN-DATA-10. 05 FILLER PIC X(57) VALUE '01 099835 01 ALABAMA '. 05 FILLER PIC X(57) VALUE '02 099835 02 ALASKA '. 05 FILLER PIC X(57) VALUE '03 099835 03 ARIZONA '. 05 FILLER PIC X(57) VALUE '04 099835 04 ARKANSAS '. 05 FILLER PIC X(57) VALUE '05 099415 05 CALIFORNIA '. 05 FILLER PIC X(57) VALUE '06 099413 06 COLORADO '. 05 FILLER PIC X(57) VALUE '07 097887 07 CONNECTICUT '. 05 FILLER PIC X(57) VALUE '08 099835 08 DELAWARE '. 05 FILLER PIC X(57) VALUE '09 099835 09 DISTRICT OF CO '. 05 FILLER PIC X(57) VALUE '10 099755 10 FLORIDA '. 05 FILLER PIC X(57) VALUE '11 099835 11 GEORGIA '. 05 FILLER PIC X(57) VALUE '12 099835 12 HAWAII '. 05 FILLER PIC X(57) VALUE '13 099835 13 IDAHO '. 05 FILLER PIC X(57) VALUE '14 099835 14 ILLINOIS '. 05 FILLER PIC X(57) VALUE '15 099813 15 INDIANA '. 05 FILLER PIC X(57) VALUE '16 099767 16 IOWA '. 05 FILLER PIC X(57) VALUE '17 099829 17 KANSAS '. 05 FILLER PIC X(57) VALUE '18 099835 18 KENTUCKY '. 05 FILLER PIC X(57) VALUE '19 099835 19 LOUISIANA '. 05 FILLER PIC X(57) VALUE '20 099835 20 MAINE '. 05 FILLER PIC X(57) VALUE '21 100000 21 MARYLAND '. 05 FILLER PIC X(57) VALUE '22 099835 22 MASSACHUSETTS '. 05 FILLER PIC X(57) VALUE '23 099835 23 MICHIGAN '. 05 FILLER PIC X(57) VALUE '24 099835 24 MINNESOTA '. 05 FILLER PIC X(57) VALUE '25 099835 25 MISSISSIPPI '. 05 FILLER PIC X(57) VALUE '26 099835 26 MISSOURI '. 05 FILLER PIC X(57) VALUE '27 099835 27 MONTANA '. 05 FILLER PIC X(57) VALUE '28 099835 28 NEBRASKA '. 05 FILLER PIC X(57) VALUE '29 099835 29 NEVADA '. 05 FILLER PIC X(57) VALUE '30 099698 30 NEW HAMPSHIRE '. 05 FILLER PIC X(57) VALUE '31 098437 31 NEW JERSEY '. 05 FILLER PIC X(57) VALUE '32 099576 32 NEW MEXICO '. 05 FILLER PIC X(57) VALUE '33 099836 33 NEW YORK '. 05 FILLER PIC X(57) VALUE '34 099833 34 NORTH CAROLINA '. 05 FILLER PIC X(57) VALUE '35 099668 35 NORTH DAKOTA '. 05 FILLER PIC X(57) VALUE '36 099783 36 OHIO '. 05 FILLER PIC X(57) VALUE '37 099835 37 OKLAHOMA '. 05 FILLER PIC X(57) VALUE '38 099705 38 OREGON '. 05 FILLER PIC X(57) VALUE '39 099812 39 PENNSYLVANIA '. 05 FILLER PIC X(57) VALUE '40 099835 40 PUERTO RICO '. 05 FILLER PIC X(57) VALUE '41 099835 41 RHODE ISLAND '. 05 FILLER PIC X(57) VALUE '42 099778 42 SOUTH CAROLINA '. 05 FILLER PIC X(57) VALUE '43 099835 43 SOUTH DAKOTA '. 05 FILLER PIC X(57) VALUE '44 099691 44 TENNESSEE '. 05 FILLER PIC X(57) VALUE '45 099835 45 TEXAS '. 05 FILLER PIC X(57) VALUE '46 099835 46 UTAH '. 05 FILLER PIC X(57) VALUE '47 099835 47 VERMONT '. 05 FILLER PIC X(57) VALUE '48 100000 48 VIRGIN ISLANDS '. 05 FILLER PIC X(57) VALUE '49 099835 49 VIRGINIA '. 05 FILLER PIC X(57) VALUE '50 099792 50 WASHINGTON '. 05 FILLER PIC X(57) VALUE '51 099714 51 WEST VIRGINIA '. 05 FILLER PIC X(57) VALUE '52 099816 52 WISCONSIN '. 05 FILLER PIC X(57) VALUE '53 099835 53 WYOMING '. 05 FILLER PIC X(57) VALUE '55 099415 55 CALIFORNIA '. 05 FILLER PIC X(57) VALUE '56 100000 56 CANADA '. 05 FILLER PIC X(57) VALUE '59 100000 59 MEXICO '. 05 FILLER PIC X(57) VALUE '64 100000 64 AMERICAN SAMOA '. 05 FILLER PIC X(57) VALUE '65 100000 65 GUAM '. 05 FILLER PIC X(57) VALUE '66 100000 66 MARIANAS ISLANDS '. 05 FILLER PIC X(57) VALUE '67 099835 67 TEXAS '. 05 FILLER PIC X(57) VALUE '68 099755 68 FLORIDA '. 05 FILLER PIC X(57) VALUE '69 099755 69 FLORIDA '. 05 FILLER PIC X(57) VALUE '70 099829 70 KANSAS '. 05 FILLER PIC X(57) VALUE '71 099835 71 LOUISIANA '. 05 FILLER PIC X(57) VALUE '72 099783 72 OHIO '. 05 FILLER PIC X(57) VALUE '73 099812 73 PENNSYLVANIA '. 05 FILLER PIC X(57) VALUE '74 099835 74 TEXAS '. 05 FILLER PIC X(57) VALUE '75 099415 75 CALIFORNIA '. 05 FILLER PIC X(57) VALUE '76 099767 76 IOWA '. 05 FILLER PIC X(57) VALUE '77 099835 77 MINNESOTA '. 05 FILLER PIC X(57) VALUE '78 099835 78 ILLINOIS '. 05 FILLER PIC X(57) VALUE '80 100000 80 MARYLAND '. 02 WK-SSRFBN-DATA2-10 REDEFINES WK-SSRFBN-DATA-10. 05 SSRFBN-TAB-10 OCCURS 72 ASCENDING KEY IS WK-SSRFBN-STATE-10 INDEXED BY SSRFBN-IDX10. 10 WK-SSRFBN-REASON-ALL-10. 15 WK-SSRFBN-STATE-10 PIC 99. 15 FILLER PIC XX. 15 WK-SSRFBN-RATE-10 PIC 9(1)V9(5). 15 FILLER PIC XX. 15 WK-SSRFBN-CODE2-10 PIC 99. 15 FILLER PIC X. 15 WK-SSRFBN-STNAM-10 PIC X(20). 15 WK-SSRFBN-REST-10 PIC X(22). 01 MES-ADD-PROV-10 PIC X(53) VALUE SPACES. 01 MES-CHG-PROV-10 PIC X(53) VALUE SPACES. 01 MES-PPS-STATE-10 PIC X(02). 01 MES-INTRO-10 PIC X(53) VALUE SPACES. 01 MES-TOT-PAY-10 PIC 9(07)V9(02) VALUE 0. 01 MES-SSRFBN-10. 05 MES-SSRFBN-STATE-10 PIC 99. 05 FILLER PIC XX. 05 MES-SSRFBN-RATE-10 PIC 9(1)V9(5). 05 FILLER PIC XX. 05 MES-SSRFBN-CODE2-10 PIC 99. 05 FILLER PIC X. 05 MES-SSRFBN-STNAM-10 PIC X(20). 05 MES-SSRFBN-REST-10 PIC X(22).