Schedule of Changes to Pennsylvania newkeys
Note: changes are in order by CITY, not FSCSKEY.
/* 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';
December 16, 2022