/* ALTUS */ if year = 1987 and FSCSKEY = 'OK0121' then newkey = 'OK0002'; /* ARDMORE PL */ if year = 1987 and FSCSKEY = 'OK0007' then newkey = 'OK0006'; /* ARDMORE (CHICKASAW) */ if year = 1987 and FSCSKEY = 'OK0116' then newkey = 'OK0007'; /* CARMEN */ if year = 1987 and FSCSKEY = 'OK0017' then newkey = 'OK0016'; /* CARNEGIE */ if year = 1987 and FSCSKEY = 'OK0018' then newkey = 'OK0017'; /* CHANDLER */ if year = 1987 and FSCSKEY = 'OK0019' then newkey = 'OK0018'; /* CHELSEA */ if year = 1987 and FSCSKEY = 'OK0020' then newkey = 'OK0019'; /* CHEROKEE */ if year = 1987 and FSCSKEY = 'OK0021' then newkey = 'OK0020'; /* CHICKASHA */ if year = 1987 and FSCSKEY = 'OK0022' then newkey = 'OK0021'; /* CLAREMORE */ if year = 1987 and FSCSKEY = 'OK0023' then newkey = 'OK0112'; if year = 1988 and FSCSKEY = 'OK0022' then newkey = 'OK0112'; if year = 1989 and FSCSKEY = 'OK0022' then newkey = 'OK0112'; if year = 1990 and FSCSKEY = 'OK0022' then newkey = 'OK0112'; if year = 1991 and FSCSKEY = 'OK0022' then newkey = 'OK0112'; if year = 1992 and FSCSKEY = 'OK0022' then newkey = 'OK0112'; if year = 1993 and FSCSKEY = 'OK0022' then newkey = 'OK0112'; /* CLEVELAND */ if year = 1987 and FSCSKEY = 'OK0024' then newkey = 'OK0023'; /* CLINTON */ if year = 1987 and FSCSKEY = 'OK0123' then newkey = 'OK0024'; /* COWETA */ if year = 1987 and FSCSKEY = 'OK0026' then newkey = 'OK0025'; /* CRESCENT */ if year = 1987 and FSCSKEY = 'OK0027' then newkey = 'OK0026'; /* CUSHING */ if year = 1987 and FSCSKEY = 'OK0028' then newkey = 'OK0027'; /* DEWEY */ if year = 1987 and FSCSKEY = 'OK0030' then newkey = 'OK0029'; /* DRUMRIGHT */ if year = 1987 and FSCSKEY = 'OK0031' then newkey = 'OK0030'; /* DUNCAN */ if year = 1987 and FSCSKEY = 'OK0032' then newkey = 'OK0031'; /* DURANT */ if year = 1987 and FSCSKEY = 'OK0033' then newkey = 'OK0032'; /* EL RENO */ if year = 1987 and FSCSKEY = 'OK0034' then newkey = 'OK0033'; /* ELK CITY */ if year = 1987 and FSCSKEY = 'OK0035' then newkey = 'OK0034'; /* ENID */ if year = 1987 and FSCSKEY = 'OK0036' then newkey = 'OK0035'; /* FAIRFAX */ if year = 1987 and FSCSKEY = 'OK0038' then newkey = 'OK0036'; /* FAIRVIEW */ if year = 1987 and FSCSKEY = 'OK0039' then newkey = 'OK0037'; /* FREDERICK */ if year = 1987 and FSCSKEY = 'OK0040' then newkey = 'OK0038'; /* GEARY */ if year = 1987 and FSCSKEY = 'OK0042' then newkey = 'OK0039'; /* GRANDFIELD */ if year = 1987 and FSCSKEY = 'OK0043' then newkey = 'OK0040'; /* GUTHRIE */ if year = 1987 and FSCSKEY = 'OK0044' then newkey = 'OK0041'; /* GUYMON */ if year = 1987 and FSCSKEY = 'OK0045' then newkey = 'OK0042'; /* HENNESSEY */ if year = 1987 and FSCSKEY = 'OK0046' then newkey = 'OK0043'; /* HENRYETTA */ if year = 1987 and FSCSKEY = 'OK0047' then newkey = 'OK0044'; /* HINTON */ if year = 1987 and FSCSKEY = 'OK0048' then newkey = 'OK0045'; /* HOBART */ if year = 1987 and FSCSKEY = 'OK0049' then newkey = 'OK0046'; /* HOLDENVILLE */ if year = 1987 and FSCSKEY = 'OK0050' then newkey = 'OK0047'; /* HOMINY */ if year = 1987 and FSCSKEY = 'OK0051' then newkey = 'OK0048'; /* HOOKER */ if year = 1987 and FSCSKEY = 'OK0052' then newkey = 'OK0049'; /* INOLA */ if year = 1987 and FSCSKEY = 'OK0053' then newkey = 'OK0050'; /* KINGFISHER */ if year = 1987 and FSCSKEY = 'OK0055' then newkey = 'OK0052'; /* KONAWA */ if year = 1987 and FSCSKEY = 'OK0056' then newkey = 'OK0053'; /* LAWTON */ if year = 1987 and FSCSKEY = 'OK0058' then newkey = 'OK0054'; /* LINDSAY */ if year = 1987 and FSCSKEY = 'OK0059' then newkey = 'OK0055'; /* LOCUST GROVE */ if year = 1987 and FSCSKEY = 'OK0060' then newkey = 'OK0056'; /* MADILL */ if year = 1987 and FSCSKEY = 'OK0062' then newkey = 'OK0057'; /* MANGUM */ if year = 1987 and FSCSKEY = 'OK0063' then newkey = 'OK0058'; /* MANNFORD */ if year = 1987 and FSCSKEY = 'OK0064' then newkey = 'OK0059'; /* MARLOW */ if year = 1987 and FSCSKEY = 'OK0065' then newkey = 'OK0060'; /* MAYSVILLE */ if year = 1987 and FSCSKEY = 'OK0067' then newkey = 'OK0061'; /* MCALESTER */ if year = 1987 and FSCSKEY = 'OK0120' then newkey = 'OK0062'; /* MEDFORD */ if year = 1987 and FSCSKEY = 'OK0068' then newkey = 'OK0063'; /* MIAMI */ if year = 1987 and FSCSKEY = 'OK0069' then newkey = 'OK0064'; /* MT VIEW */ if year = 1987 and FSCSKEY = 'OK0070' then newkey = 'OK0065'; /* MUSKOGEE */ if year = 1987 and FSCSKEY = 'OK0117' then newkey = 'OK0066'; /* MUSTANG */ if year = 1987 and FSCSKEY = 'OK0072' then newkey = 'OK0067'; /* NASH */ if year = 1987 and FSCSKEY = 'OK0073' then newkey = 'OK0068'; /* NEWKIRK */ if year = 1987 and FSCSKEY = 'OK0074' then newkey = 'OK0069'; /* NORMAN */ if year = 1987 and FSCSKEY = 'OK0119' then newkey = 'OK0070'; /* NOWATA */ if year = 1987 and FSCSKEY = 'OK0075' then newkey = 'OK0071'; /* OILTON */ if year = 1987 and FSCSKEY = 'OK0076' then newkey = 'OK0072'; /* OKEENE */ if year = 1987 and FSCSKEY = 'OK0077' then newkey = 'OK0073'; /* OKLAHOMA CITY */ if year = 1987 and FSCSKEY = 'OK0118' then newkey = 'OK0074'; /* OKMULGEE */ if year = 1987 and FSCSKEY = 'OK0079' then newkey = 'OK0075'; /* PAULS VALLEY */ if year = 1987 and FSCSKEY = 'OK0080' then newkey = 'OK0076'; /* PAWHUSKA */ if year = 1987 and FSCSKEY = 'OK0081' then newkey = 'OK0077'; /* PAWNEE */ if year = 1987 and FSCSKEY = 'OK0082' then newkey = 'OK0078'; /* PERKINS */ if year = 1987 and FSCSKEY = 'OK0083' then newkey = 'OK0079'; /* PERRY */ if year = 1987 and FSCSKEY = 'OK0084' then newkey = 'OK0080'; /* PONCA CITY */ if year = 1987 and FSCSKEY = 'OK0085' then newkey = 'OK0081'; /* PRAGUE */ if year = 1987 and FSCSKEY = 'OK0087' then newkey = 'OK0082'; /* PRYOR */ if year = 1987 and FSCSKEY = 'OK0088' then newkey = 'OK0083'; /* RUSH SPRINGS */ if year = 1987 and FSCSKEY = 'OK0089' then newkey = 'OK0084'; /* SUPULPA */ if year = 1987 and FSCSKEY = 'OK0090' then newkey = 'OK0085'; /* SAYRE */ if year = 1987 and FSCSKEY = 'OK0091' then newkey = 'OK0086'; /* SEMINOLE */ if year = 1987 and FSCSKEY = 'OK0092' then newkey = 'OK0087'; /* SHATTUCK */ if year = 1987 and FSCSKEY = 'OK0093' then newkey = 'OK0088'; /* STILLWATER */ if year = 1987 and FSCSKEY = 'OK0096' then newkey = 'OK0113'; if year = 1988 and FSCSKEY = 'OK0089' then newkey = 'OK0113'; if year = 1989 and FSCSKEY = 'OK0089' then newkey = 'OK0113'; if year = 1990 and FSCSKEY = 'OK0089' then newkey = 'OK0113'; if year = 1991 and FSCSKEY = 'OK0089' then newkey = 'OK0113'; if year = 1992 and FSCSKEY = 'OK0089' then newkey = 'OK0113'; if year = 1993 and FSCSKEY = 'OK0089' then newkey = 'OK0113'; /* STRATFORD */ if year = 1987 and FSCSKEY = 'OK0097' then newkey = 'OK0090'; /* STROUD */ if year = 1987 and FSCSKEY = 'OK0098' then newkey = 'OK0091'; /* TONKAWA */ if year = 1987 and FSCSKEY = 'OK0102' then newkey = 'OK0092'; /* TULSA */ if year = 1987 and FSCSKEY = 'OK0122' then newkey = 'OK0093'; /* VINITA */ if year = 1987 and FSCSKEY = 'OK0104' then newkey = 'OK0094'; /* WAGONER */ if year = 1987 and FSCSKEY = 'OK0105' then newkey = 'OK0095'; /* WALTERS */ if year = 1987 and FSCSKEY = 'OK0106' then newkey = 'OK0096'; /* WATONGA */ if year = 1987 and FSCSKEY = 'OK0107' then newkey = 'OK0097'; /* WAURIKA */ if year = 1987 and FSCSKEY = 'OK0108' then newkey = 'OK0098'; /* WAYNOKA */ if year = 1987 and FSCSKEY = 'OK0109' then newkey = 'OK0099'; /* WETUMKA */ if year = 1987 and FSCSKEY = 'OK0110' then newkey = 'OK0100'; /* WEWOKA */ if year = 1987 and FSCSKEY = 'OK0111' then newkey = 'OK0101'; /* WOODWARD */ if year = 1987 and FSCSKEY = 'OK0112' then newkey = 'OK0102'; /* WYNNEWOOD */ if year = 1987 and FSCSKEY = 'OK0113' then newkey = 'OK0103'; /* YALE */ if year = 1987 and FSCSKEY = 'OK0114' then newkey = 'OK0104'; /* YUKON */ if year = 1987 and FSCSKEY = 'OK0115' then newkey = 'OK0105'; /*--------2003---------*/ /* KAW CITY */ if year = 1987 and FSCSKEY = 'OK0054' then newkey = 'OK8005'; if year = 1988 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1989 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1990 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1991 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1992 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1993 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1994 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1995 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1996 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1997 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1998 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; if year = 1999 and FSCSKEY = 'OK0051' then newkey = 'OK8005'; /*-------2011---------------------------------------------------------------*/ if year = 1991 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 1992 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 1993 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 1994 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 1995 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 1996 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 1997 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 1998 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 1999 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 2000 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; if year = 2001 and FSCSKEY = 'OK0108' then newkey = 'OK0124'; /*-------2011---------------------------------------------------------------*/ /*-------2012---------------------------------------------------------------*/ /* Elgin Community Library elginlibrary.org */ if year = 1994 and FSCSKEY = 'OK0115' then newkey = 'OK0125'; if year = 1995 and FSCSKEY = 'OK0115' then newkey = 'OK0125'; if year = 1996 and FSCSKEY = 'OK0115' then newkey = 'OK0125'; if year = 1997 and FSCSKEY = 'OK0115' then newkey = 'OK0125'; if year = 1998 and FSCSKEY = 'OK0115' then newkey = 'OK0125'; if year = 1999 and FSCSKEY = 'OK0115' then newkey = 'OK0125'; if year = 2000 and FSCSKEY = 'OK0115' then newkey = 'OK0125'; if year = 2001 and FSCSKEY = 'OK0115' then newkey = 'OK0125'; /*-------2012---------------------------------------------------------------*/