Note: changes are in order by CITY, not FSCSKEY.

FY 2005 Changes

There are changes in the FY 2005 data with LAMONT and LEESPORT-BERKS COUNTY. These changes had been missed in earlier years.


/* ALEXANDRIA */ if year = 1988 and FSCSKEY = 'PA0171' then newkey = 'PA0463'; /* ALTOONA */ if year = 1988 and FSCSKEY = 'PA0123' then newkey = 'PA0518'; if year = 1989 and FSCSKEY = 'PA0123' then newkey = 'PA0518'; if year = 1990 and FSCSKEY = 'PA0123' then newkey = 'PA0518'; if year = 1991 and FSCSKEY = 'PA0123' then newkey = 'PA0518'; if year = 1992 and FSCSKEY = 'PA0123' then newkey = 'PA0518'; if year = 1993 and FSCSKEY = 'PA0123' then newkey = 'PA0518'; if year = 1994 and FSCSKEY = 'PA0123' then newkey = 'PA0518'; if year = 1995 and FSCSKEY = 'PA0123' then newkey = 'PA0518'; /* ARDMORE is not LOWER MERION */ /* AVONMORE */ if year = 1987 and FSCSKEY = 'PA0100' then newkey = 'PA0102'; /* BEDFORD */ if year = 1987 and FSCSKEY = 'PA0117' then newkey = 'PA0120'; /* BELLE VERNON */ if year = 1987 and FSCSKEY = 'PA0112' then newkey = 'PA0114'; /* BENTLEYVILLE */ if year = 1987 and FSCSKEY = 'PA0009' then newkey = 'PA0008'; /* BESSEMER */ if year = 1987 and FSCSKEY = 'PA0064' then newkey = 'PA0061'; /* BLACK LICK-BURRELL TOWNSHIP */ if year = 1988 and FSCSKEY = 'PA0395' then newkey = 'PA0479'; if year = 1989 and FSCSKEY = 'PA0395' then newkey = 'PA0479'; /* BRIDGEVILLE */ if year = 1987 and FSCSKEY = 'PA0026' then newkey = 'PA0025'; /* BROCKWAY */ if year = 1987 and FSCSKEY = 'PA0093' then newkey = 'PA0095'; /* BROOKVILLE */ if year = 1987 and FSCSKEY = 'PA0094' then newkey = 'PA0096'; /* BROWNSVILLE */ if year = 1987 and FSCSKEY = 'PA0002' then newkey = 'PA0001'; /* BUTLER */ if year = 1987 and FSCSKEY = 'PA0057' then newkey = 'PA0055'; /* BUTLER COUNTY FLS */ if year = 1990 and FSCSKEY = 'PA0461' then newkey = 'PA0489'; if year = 1991 and FSCSKEY = 'PA0461' then newkey = 'PA0489'; /* BUTLER COUNTY TRAVELING LIBRARY */ if year = 1987 and FSCSKEY = 'PA0058' then newkey = 'PA0056'; /* CALIFORNIA */ if year = 1987 and FSCSKEY = 'PA0010' then newkey = 'PA0009'; /* CAMBRIDGE SPRINGS */ if year = 1987 and FSCSKEY = 'PA0072' then newkey = 'PA0069'; /* [GREATER] CANONSBUR(G)-CANONSBURG */ if year = 1987 and FSCSKEY = 'PA0011' then newkey = 'PA0010'; /* CARMICHAELS */ if year = 1987 and FSCSKEY = 'PA0007' then newkey = 'PA0006'; /* CARNEGIE */ if year = 1987 and FSCSKEY = 'PA0027' then newkey = 'PA0026'; /* CASTLE SHANNON */ if year = 1987 and FSCSKEY = 'PA0053' then newkey = 'PA0051'; /* CHAMBERSBURG */ if year = 1989 and FSCSKEY = 'PA0437' then newkey = 'PA9037'; if year = 1990 and FSCSKEY = 'PA0437' then newkey = 'PA9037'; if year = 1991 and FSCSKEY = 'PA0437' then newkey = 'PA9037'; if year = 1992 and FSCSKEY = 'PA0437' then newkey = 'PA9037'; if year = 1993 and FSCSKEY = 'PA0437' then newkey = 'PA9037'; if year = 1994 and FSCSKEY = 'PA0437' then newkey = 'PA9037'; if year = 1995 and FSCSKEY = 'PA0437' then newkey = 'PA9037'; if year = 1996 and FSCSKEY = 'PA0437' then newkey = 'PA9037'; if year = 1997 and FSCSKEY = 'PA0437' then newkey = 'PA9037'; if year = 1999 and FSCSKEY = 'PA9013' then newkey = 'PA9037'; /* CHARLEROI */ if year = 1987 and FSCSKEY = 'PA0012' then newkey = 'PA0011'; /* CHELTENHAM-EAST CHELTENHAM */ if year = 1988 and FSCSKEY = 'PA0321' then newkey = 'PA9017'; /* CLAIRTON-CLAIRTON PL */ if year = 1987 and FSCSKEY = 'PA0028' then newkey = 'PA0027'; /* CLAIRTON-JEFFERSON BORO */ if year = 1987 and FSCSKEY = 'PA0034' then newkey = 'PA0033'; /* CLARION */ if year = 1987 and FSCSKEY = 'PA0086' then newkey = 'PA0088'; /* CONNELLSVILLE */ if year = 1987 and FSCSKEY = 'PA0003' then newkey = 'PA0002'; /* CORAOPOLIS-MEMORIAL LIBRARY */ if year = 1987 and FSCSKEY = 'PA0029' then newkey = 'PA0028'; /* CORAOPOLIS-MOON TOWNSHIP */ if year = 1987 and FSCSKEY = 'PA0037' then newkey = 'PA0036'; /* CRAFTON */ if year = 1987 and FSCSKEY = 'PA0030' then newkey = 'PA0029'; /* DELMONT */ if year = 1987 and FSCSKEY = 'PA0101' then newkey = 'PA0427'; /* DONORA */ if year = 1987 and FSCSKEY = 'PA0013' then newkey = 'PA0012'; /* DORMONT */ if year = 1987 and FSCSKEY = 'PA0031' then newkey = 'PA0030'; /* DUBOIS */ if year = 1987 and FSCSKEY = 'PA0091' then newkey = 'PA0093'; /* ELKINS PARK */ if year = 1988 and FSCSKEY = 'PA0324' then newkey = 'PA9015'; /* ELLWOOD CITY */ if year = 1987 and FSCSKEY = 'PA0065' then newkey = 'PA0062'; /* EVANS CITY */ if year = 1987 and FSCSKEY = 'PA0060' then newkey = 'PA0057'; /* GIRARD */ if year = 1987 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1988 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; /* FACTORYVILLE */ if year = 1988 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 1989 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 1990 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 1991 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 1992 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 1993 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 1994 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 1995 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 1996 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 1997 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; if year = 2001 and FSCSKEY = 'PA0284' then newkey = 'PA9050'; /* FARRELL */ if year = 1987 and FSCSKEY = 'PA0067' then newkey = 'PA0064'; /* FOXBURG */ if year = 1987 and FSCSKEY = 'PA0087' then newkey = 'PA0089'; /* FRANKLIN */ if year = 1987 and FSCSKEY = 'PA0098' then newkey = 'PA0100'; /* FREEPORT */ if year = 1988 and FSCSKEY = 'PA0393' then newkey = 'PA0528'; if year = 1989 and FSCSKEY = 'PA0393' then newkey = 'PA0528'; if year = 1990 and FSCSKEY = 'PA0393' then newkey = 'PA0528'; if year = 1991 and FSCSKEY = 'PA0393' then newkey = 'PA0528'; if year = 1995 and FSCSKEY = 'PA0512' then newkey = 'PA0528'; /* GIBSONIA */ if year = 1987 and FSCSKEY = 'PA0044' then newkey = 'PA0043'; /* GIRARD */ if year = 1987 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1988 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1989 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1990 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1991 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1992 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1993 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1994 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1995 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1996 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1997 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1998 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; if year = 1999 and FSCSKEY = 'PA0078' then newkey = 'PA9035'; /* GLENSHAW-GLENSHAW PL */ if year = 1987 and FSCSKEY = 'PA0056' then newkey = 'PA0460'; if year = 1988 and FSCSKEY = 'PA0054' then newkey = 'PA0460'; /* GLENSHAW-SHALER */ if year = 1987 and FSCSKEY = 'PA0046' then newkey = 'PA0045'; /* GLENSIDE */ if year = 1988 and FSCSKEY = 'PA0326' then newkey = 'PA0447'; /* GREENSBURG */ if year = 1987 and FSCSKEY = 'PA0102' then newkey = 'PA0104'; /* GREENVILLE */ if year = 1987 and FSCSKEY = 'PA0068' then newkey = 'PA0065'; /* GROVE CITY */ if year = 1987 and FSCSKEY = 'PA0069' then newkey = 'PA0066'; /* HERIMIE */ if year = 1988 and FSCSKEY = 'PA0117' then newkey = 'PA9051'; if year = 1989 and FSCSKEY = 'PA0117' then newkey = 'PA9051'; if year = 1990 and FSCSKEY = 'PA0117' then newkey = 'PA9051'; if year = 1991 and FSCSKEY = 'PA0117' then newkey = 'PA9051'; if year = 1993 and FSCSKEY = 'PA0490' then newkey = 'PA9051'; /* HOUSTON */ if year = 1987 and FSCSKEY = 'PA0014' then newkey = 'PA0015'; /* HYDE PARK */ if year = 1987 and FSCSKEY = 'PA0103' then newkey = 'PA0105'; /* IRWIN */ if year = 1987 and FSCSKEY = 'PA0104' then newkey = 'PA0106'; /* JEANNETTE */ if year = 1987 and FSCSKEY = 'PA0105' then newkey = 'PA0107'; /* KNOX */ if year = 1987 and FSCSKEY = 'PA0088' then newkey = 'PA0090'; /* LACEYVILLE */ if year = 1992 and FSCSKEY = 'PA0485' then newkey = 'PA0508'; if year = 1993 and FSCSKEY = 'PA0493' then newkey = 'PA0508'; /* LAKE CITY */ if year = 1987 and FSCSKEY = 'PA0078' then newkey = 'PA9032'; if year = 1988 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1989 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1990 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1991 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1992 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1993 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1994 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1995 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1996 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1997 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; if year = 1998 and FSCSKEY = 'PA0079' then newkey = 'PA9032'; /* ------------------- 2005---------------------------------*/ /* LAMOTT */ if year = 1988 and FSCSKEY = 'PA0330' then newkey = 'PA9016'; /* ------------------- 2005---------------------------------*/ /* LATROBE */ if year = 1987 and FSCSKEY = 'PA0106' then newkey = 'PA0108'; /* LANSDALE */ if year = 1988 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1989 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1990 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1991 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1992 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1993 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1994 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1995 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1996 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1997 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1998 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; if year = 1999 and FSCSKEY = 'PA0329' then newkey = 'PA9038'; /* ------------------- 2005---------------------------------*/ /* LEESPORT-BERKS COUNTY */ if year = 1988 and FSCSKEY = 'PA0206' then newkey = 'PA9002'; if year = 2000 and FSCSKEY = 'PA9030' then newkey = 'PA9002'; if year = 2001 and FSCSKEY = 'PA9030' then newkey = 'PA9002'; /* ------------------- 2005---------------------------------*/ /* LIGONIER */ if year = 1987 and FSCSKEY = 'PA0107' then newkey = 'PA0109'; /* LIBRARY */ if year = 1987 and FSCSKEY = 'PA0047' then newkey = 'PA0046'; /* MCDONALD */ if year = 1987 and FSCSKEY = 'PA0016' then newkey = 'PA0017'; /* MCKEESPORT */ if year = 1987 and FSCSKEY = 'PA0035' then newkey = 'PA0034'; /* MCMURRAY */ if year = 1987 and FSCSKEY = 'PA0018' then newkey = 'PA0019'; /* MANOR */ if year = 1989 and FSCSKEY = 'PA0428' then newkey = 'PA0515'; if year = 1990 and FSCSKEY = 'PA0428' then newkey = 'PA0515'; if year = 1991 and FSCSKEY = 'PA0428' then newkey = 'PA0515'; if year = 1992 and FSCSKEY = 'PA0428' then newkey = 'PA0515'; if year = 1993 and FSCSKEY = 'PA0428' then newkey = 'PA0515'; /* MARIANNA */ if year = 1987 and FSCSKEY = 'PA0015' then newkey = 'PA0016'; /* MARS AREA PL */ if year = 1987 and FSCSKEY = 'PA0061' then newkey = 'PA0058'; /* MARS-CRANBERRY PL */ if year = 1987 and FSCSKEY = 'PA0059' then newkey = 'PA0418'; /* MASONTOWN */ if year = 1987 and FSCSKEY = 'PA0004' then newkey = 'PA0003'; /* MERCER */ if year = 1987 and FSCSKEY = 'PA0070' then newkey = 'PA0067'; /* MESHOPPEN */ if year = 1995 and FSCSKEY = 'PA0509' then newkey = 'PA9045'; if year = 1996 and FSCSKEY = 'PA0509' then newkey = 'PA9045'; if year = 1997 and FSCSKEY = 'PA0509' then newkey = 'PA9045'; if year = 1998 and FSCSKEY = 'PA0509' then newkey = 'PA9045'; if year = 1999 and FSCSKEY = 'PA0509' then newkey = 'PA9045'; /* MERCERSBURG */ if year = 1989 and FSCSKEY = 'PA0438' then newkey = 'PA0492'; if year = 1990 and FSCSKEY = 'PA0438' then newkey = 'PA0492'; if year = 1991 and FSCSKEY = 'PA0438' then newkey = 'PA0492'; if year = 1992 and FSCSKEY = 'PA0438' then newkey = 'PA0492'; /* MONACA */ if year = 1989 and FSCSKEY = 'PA0456' then newkey = 'PA9005'; if year = 1990 and FSCSKEY = 'PA0456' then newkey = 'PA9005'; if year = 1991 and FSCSKEY = 'PA0456' then newkey = 'PA9005'; if year = 1992 and FSCSKEY = 'PA0456' then newkey = 'PA9005'; if year = 1993 and FSCSKEY = 'PA0456' then newkey = 'PA9005'; if year = 1994 and FSCSKEY = 'PA0456' then newkey = 'PA9005'; if year = 1995 and FSCSKEY = 'PA0456' then newkey = 'PA9005'; if year = 1996 and FSCSKEY = 'PA0456' then newkey = 'PA9005'; if year = 1997 and FSCSKEY = 'PA0456' then newkey = 'PA9005'; /* MONESSEN */ if year = 1987 and FSCSKEY = 'PA0108' then newkey = 'PA0110'; /* MONONGAHELA */ if year = 1987 and FSCSKEY = 'PA0017' then newkey = 'PA0018'; /* MONROEVILLE */ if year = 1987 and FSCSKEY = 'PA0036' then newkey = 'PA0035'; /* MOUNT PLEASANT */ if year = 1987 and FSCSKEY = 'PA0109' then newkey = 'PA0111'; /* NEW BETHLEHEM */ if year = 1987 and FSCSKEY = 'PA0089' then newkey = 'PA0091'; /* NEW CASTLE */ if year = 1987 and FSCSKEY = 'PA0066' then newkey = 'PA0063'; /* NEW FLORENCE */ if year = 1987 and FSCSKEY = 'PA0110' then newkey = 'PA0112'; /* NEW KENSINGTON */ if year = 1987 and FSCSKEY = 'PA0111' then newkey = 'PA0113'; /* NEWFOUNDLAND */ if year = 1988 and FSCSKEY = 'PA0280' then newkey = 'PA0504'; if year = 1989 and FSCSKEY = 'PA0280' then newkey = 'PA0504'; /* NORTH EAST */ if year = 1987 and FSCSKEY = 'PA0079' then newkey = 'PA0080'; /* NORTH VERSAILLES */ if year = 1987 and FSCSKEY = 'PA0039' then newkey = 'PA0038'; /* NORTH WALES */ if year = 1988 and FSCSKEY = 'PA0337' then newkey = 'PA9034'; if year = 1989 and FSCSKEY = 'PA0337' then newkey = 'PA9034'; if year = 1990 and FSCSKEY = 'PA0337' then newkey = 'PA9034'; if year = 1991 and FSCSKEY = 'PA0337' then newkey = 'PA9034'; if year = 1992 and FSCSKEY = 'PA0337' then newkey = 'PA9034'; if year = 1993 and FSCSKEY = 'PA0337' then newkey = 'PA9034'; if year = 1994 and FSCSKEY = 'PA0337' then newkey = 'PA9034'; if year = 1995 and FSCSKEY = 'PA0337' then newkey = 'PA9034'; if year = 1996 and FSCSKEY = 'PA0337' then newkey = 'PA9034'; /* OAKMONT */ if year = 1987 and FSCSKEY = 'PA0040' then newkey = 'PA0039'; /* OIL CITY */ if year = 1987 and FSCSKEY = 'PA0099' then newkey = 'PA0101'; /* PITTSBURGH-BRENTWOOD */ if year = 1987 and FSCSKEY = 'PA0025' then newkey = 'PA0415'; /* PITTSBURGH-C C MELLOR */ if year = 1987 and FSCSKEY = 'PA0032' then newkey = 'PA0031'; /* PITTSBURGH-CARNEGIE LIBRARY */ if year = 1987 and FSCSKEY = 'PA0043' then newkey = 'PA0042'; /* PITTSBURGH-GREEN TREE */ if year = 1987 and FSCSKEY = 'PA0033' then newkey = 'PA0032'; /* PITTSBURGH-LAURI ANN WEST */ if year = 1987 and FSCSKEY = 'PA0041' then newkey = 'PA0040'; /* PITTSBURGH-MT LEBANON */ if year = 1987 and FSCSKEY = 'PA0038' then newkey = 'PA0037'; /* PITTSBURGH-NORTHLAND */ if year = 1987 and FSCSKEY = 'PA0045' then newkey = 'PA0044'; /* PITTSBURGH-PENN HILLS */ if year = 1987 and FSCSKEY = 'PA0042' then newkey = 'PA0041'; /* PITTSBURGH-PLEASANT HILLS */ if year = 1987 and FSCSKEY = 'PA0054' then newkey = 'PA0052'; /* PITTSBURGH-(SWISSVALE) */ if year = 1987 and FSCSKEY = 'PA0049' then newkey = 'PA0048'; /* PITTSBURGH-WHITEHALL */ if year = 1987 and FSCSKEY = 'PA0051' then newkey = 'PA0308'; /* PLEASANT MOUNT */ if year = 1988 and FSCSKEY = 'PA0282' then newkey = 'PA0507'; if year = 1989 and FSCSKEY = 'PA0282' then newkey = 'PA0507'; /* POINT MARION */ if year = 1987 and FSCSKEY = 'PA0005' then newkey = 'PA0004'; /* PROSPECT */ if year = 1989 and FSCSKEY = 'PA0419' then newkey = 'PA0514'; /* REYNOLDSVILLE */ if year = 1987 and FSCSKEY = 'PA0095' then newkey = 'PA0098'; /* RIMERSBURG */ if year = 1987 and FSCSKEY = 'PA0090' then newkey = 'PA0092'; /* RINGTOWN */ if year = 1988 and FSCSKEY = 'PA0406' then newkey = 'PA9046'; /* ROYERSFORD */ if year = 1990 and FSCSKEY = 'PA0469' then newkey = 'PA0487'; /* SAXONBURG */ if year = 1987 and FSCSKEY = 'PA0062' then newkey = 'PA0059'; /* SCOTTDALE */ if year = 1987 and FSCSKEY = 'PA0114' then newkey = 'PA0116'; /* SEWICKLEY */ if year = 1987 and FSCSKEY = 'PA0055' then newkey = 'PA0053'; /* SHARON */ if year = 1987 and FSCSKEY = 'PA0071' then newkey = 'PA0068'; /* SHEFFIELD */ if year = 1987 and FSCSKEY = 'PA0081' then newkey = 'PA0083'; /* SLICKVILLE */ if year = 1987 and FSCSKEY = 'PA0113' then newkey = 'PA0462'; if year = 1988 and FSCSKEY = 'PA0115' then newkey = 'PA0462'; /* SPRINGBORO */ if year = 1987 and FSCSKEY = 'PA0074' then newkey = 'PA0422'; /* SPRINGDALE */ if year = 1987 and FSCSKEY = 'PA0048' then newkey = 'PA0047'; /* SUGAR GROVE */ if year = 1987 and FSCSKEY = 'PA0082' then newkey = 'PA0084'; /* SUMMERVILLE */ if year = 1987 and FSCSKEY = 'PA0096' then newkey = 'PA0099'; /* SYKESVILLE */ if year = 1987 and FSCSKEY = 'PA0097' then newkey = 'PA0426'; /* TIDIOUTE */ if year = 1987 and FSCSKEY = 'PA0083' then newkey = 'PA0085'; /* TIONESTA */ if year = 1987 and FSCSKEY = 'PA0092' then newkey = 'PA0424'; if year = 1988 and FSCSKEY = 'PA0094' then newkey = 'PA0424'; /* TITUSVILLE */ if year = 1987 and FSCSKEY = 'PA0075' then newkey = 'PA0074'; /* TRAFFORD */ if year = 1987 and FSCSKEY = 'PA0115' then newkey = 'PA0118'; /* UNIONTOWN */ if year = 1987 and FSCSKEY = 'PA0006' then newkey = 'PA0005'; /* UPPER ST CLAIR */ if year = 1987 and FSCSKEY = 'PA0050' then newkey = 'PA0049'; /* VANDERGRIFT */ if year = 1987 and FSCSKEY = 'PA0116' then newkey = 'PA0119'; /* WARREN */ if year = 1987 and FSCSKEY = 'PA0084' then newkey = 'PA0086'; /* WASHINGTON */ if year = 1987 and FSCSKEY = 'PA0019' then newkey = 'PA0013'; /* WATERFORD */ if year = 1987 and FSCSKEY = 'PA0080' then newkey = 'PA0082'; /* WAYNESBURG */ if year = 1987 and FSCSKEY = 'PA0008' then newkey = 'PA0007'; /* WILKINSBURG */ if year = 1987 and FSCSKEY = 'PA0052' then newkey = 'PA0050'; /* WILLIAMSPORT */ if year = 1987 and FSCSKEY = 'PA0001' then newkey = 'PA0251'; /* WOMELSDORF */ if year = 1988 and FSCSKEY = 'PA0212' then newkey = 'PA0527'; if year = 1989 and FSCSKEY = 'PA0212' then newkey = 'PA0527'; if year = 1990 and FSCSKEY = 'PA0212' then newkey = 'PA0527'; if year = 1991 and FSCSKEY = 'PA0212' then newkey = 'PA0527'; if year = 1992 and FSCSKEY = 'PA0212' then newkey = 'PA0527'; if year = 1993 and FSCSKEY = 'PA0494' then newkey = 'PA0527'; /* YOUNGSVILLE */ if year = 1987 and FSCSKEY = 'PA0085' then newkey = 'PA0087'; /* ZELIENOPLE */ if year = 1987 and FSCSKEY = 'PA0063' then newkey = 'PA0060';