Schedule of Changes to Nebraska newkeys

There were duplicate records for Alma (FSKSKEYs NE0006 and NE0258*), Fremont (NE0090 and NE0259*), Genoa (NE0094 and NE0260*) in 1988. In addition, Creighton (NE0062 and NE9014*) was duplicated in 2000. The asterisks indicate the observations that are deleted in PLDF3. In the three for 1988, the data were the same except for one trivial difference in one but the three duplicated entries all had the text string 'ZZ' in front of the state's LIBID--the state assigned library identification number. (Extraneous 'ZZs' in CITY are discussed elsewhere.) Creighton's case is a bit different because it appears that the library moved in this year. The two records are the same but for one variable but the street address in NE9014 is the same as that in the 2001 record in NE0062. However, the record for VIDEOs held was 324 in NE0062 and 624 in NE9014. The latter number does not fit with the series with the other years as the following table shows. Hence, the record for Creighton in NE9014 was discarded.

Table 1: VIDEOs Held in Creighton, Nebraska for Sample Years
Years VIDEOS Held
1997 245
1998 260
1999 267
2000 624 or 324
2001 356

In August, 2006, a rather more complicated duplicate was discovered. In 1991, there were two entries for NE0274 (Indianola). The two entries are complete and differ in detail on 5 variables. Consulting the years before and after give few clues about which one might be correct. Table 2 below shows the problem—neither entry shows itself to be obviously correct based on the numbers in subsequent years and 1991 is the first year of reporting for this library. It appears that in this first year, the short staff must have had enough on the table to keep the doors open and we also see signs of a boom and bust cycle in the following years that even the disparate values between these two entries seems well within range. An internal relationship one would expect is that Total Income would be slightly larger than Total Operating Expenditure so that one might suppose the observation with the Total Income of $9,091 would be the more accurate number. But, that expectation is violated in 1993 and 1994 when total income is twice total expenditures.

There is really no good solution for this kind of problem. Throwing either away is arbitrary while leaving both in could upset analysis in unpredictable ways because few people are likely to examine these data in this detail. The Hippocratic admonition to "do no harm" applies to data compilers, too. It was decided to split the difference by taking the mean value of these five variables that differ and replace the original with these mean values. Table 3, then, shows the values that appear in PLDF3. The code below shows how these changes were done.

Table 2: Six Values for Indianola Public Library
Year Local Govenment
Income		 Other
Income		 Total
Income		 Hours
Open		 Annual Visits
To the Library		 Total
Expenditures
1991 6,606 2,485 9,091 780 4,108 7,934
1991 21,606 4,788 26,394 750 3,950 7,934
1992 5,216 3,941 9,157 780 1,7160 8,263
1993 16,278 4,369 20,647 780 1,300 9,891
1994 19,202 1,199 20,401 780 676 9,940
1995 5,765 1,097 7,522 780 1,196 7,985

Table 3: Final Values for Indianola Public Library in PLDF3
Year Local Government
Income		 Other
Income		 Total
Income		 Hours
Open		 Annual Visits
To the Library		 Total
Expenditures
1991 14,106 3,637 17,743 765 4,029 7,934
1992 5,216 3,941 9,157 780 1,7160 8,263
1993 16,278 4,369 20,647 780 1,300 9,891
1994 19,202 1,199 20,401 780 676 9,940
1995 5,765 1,097 7,522 780 1,196 7,985

Here is the code for these and other changes

/* ALEXANDRIA           */
if year = 1988 and FSCSKEY = 'NE0003' then newkey = 'NE9047';
if year = 1989 and FSCSKEY = 'NE0003' then newkey = 'NE9047';
if year = 1990 and FSCSKEY = 'NE0003' then newkey = 'NE9047';
if year = 1991 and FSCSKEY = 'NE0003' then newkey = 'NE9047';
if year = 1992 and FSCSKEY = 'NE0003' then newkey = 'NE9047';
if year = 1993 and FSCSKEY = 'NE0003' then newkey = 'NE9047';
if year = 1994 and FSCSKEY = 'NE0003' then newkey = 'NE9047';
if year = 1995 and FSCSKEY = 'NE0003' then newkey = 'NE9047';

/* ALLEN                */
if year = 1988 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1989 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1990 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1991 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1992 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1993 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1994 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1995 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1996 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1997 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1998 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 1999 and FSCSKEY = 'NE0004' then newkey = 'NE9041';
if year = 2000 and FSCSKEY = 'NE0004' then newkey = 'NE9041';

/* ALMA (DUP NE0006)    */
if year = 1988 and FSCSKEY = 'NE0258' then delete;

/* ANSELMO              */
if year = 1988 and FSCSKEY = 'NE0007' then newkey = 'NE0004';
if year = 1989 and FSCSKEY = 'NE0007' then newkey = 'NE0004';
if year = 1990 and FSCSKEY = 'NE0007' then newkey = 'NE0004';
if year = 1991 and FSCSKEY = 'NE0007' then newkey = 'NE0004';
if year = 1992 and FSCSKEY = 'NE0007' then newkey = 'NE0004';
if year = 1993 and FSCSKEY = 'NE0007' then newkey = 'NE0004';
if year = 1994 and FSCSKEY = 'NE0007' then newkey = 'NE0004';
if year = 1995 and FSCSKEY = 'NE0007' then newkey = 'NE0004';

/* ALLIANCE             */
if year = 1988 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1989 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1990 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1991 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1992 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1993 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1994 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1995 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1996 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1997 and FSCSKEY = 'NE0005' then newkey = 'NE9007';
if year = 1998 and FSCSKEY = 'NE0005' then newkey = 'NE9007';

/* ARNOLD               */
if year = 1988 and FSCSKEY = 'NE0012' then newkey = 'NE9024';
if year = 1989 and FSCSKEY = 'NE0012' then newkey = 'NE9024';
if year = 1990 and FSCSKEY = 'NE0012' then newkey = 'NE9024';
if year = 1991 and FSCSKEY = 'NE0012' then newkey = 'NE9024';
if year = 1992 and FSCSKEY = 'NE0012' then newkey = 'NE9024';
if year = 1993 and FSCSKEY = 'NE0012' then newkey = 'NE9024';
if year = 1994 and FSCSKEY = 'NE0012' then newkey = 'NE9024';
if year = 1995 and FSCSKEY = 'NE0012' then newkey = 'NE9024';

/* BENKLEMAN            */
if year = 1988 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1989 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1990 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1991 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1992 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1993 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1994 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1995 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1996 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1997 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1998 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 1999 and FSCSKEY = 'NE0029' then newkey = 'NE9022';
if year = 2000 and FSCSKEY = 'NE0029' then newkey = 'NE9022';

/* BUTTE                */
if year = 1988 and FSCSKEY = 'NE0040' then newkey = 'NE9021';
if year = 1989 and FSCSKEY = 'NE0040' then newkey = 'NE9021';
if year = 1990 and FSCSKEY = 'NE0040' then newkey = 'NE9021';
if year = 1991 and FSCSKEY = 'NE0040' then newkey = 'NE9021';
if year = 1992 and FSCSKEY = 'NE0040' then newkey = 'NE9021';
if year = 1993 and FSCSKEY = 'NE0040' then newkey = 'NE9021';
if year = 1994 and FSCSKEY = 'NE0040' then newkey = 'NE9021';
if year = 1995 and FSCSKEY = 'NE0040' then newkey = 'NE9021';

/* CARLETON             */
if year = 1988 and FSCSKEY = 'NE0044' then newkey = 'NE9018';
if year = 1989 and FSCSKEY = 'NE0044' then newkey = 'NE9018';
if year = 1990 and FSCSKEY = 'NE0044' then newkey = 'NE9018';
if year = 1991 and FSCSKEY = 'NE0044' then newkey = 'NE9018';
if year = 1992 and FSCSKEY = 'NE0044' then newkey = 'NE9018';
if year = 1993 and FSCSKEY = 'NE0044' then newkey = 'NE9018';
if year = 1994 and FSCSKEY = 'NE0044' then newkey = 'NE9018';
if year = 1995 and FSCSKEY = 'NE0044' then newkey = 'NE9018';

/* CHESTER              */
if year = 1988 and FSCSKEY = 'NE0052' then newkey = 'NE9019';
if year = 1989 and FSCSKEY = 'NE0052' then newkey = 'NE9019';
if year = 1990 and FSCSKEY = 'NE0052' then newkey = 'NE9019';
if year = 1991 and FSCSKEY = 'NE0052' then newkey = 'NE9019';
if year = 1992 and FSCSKEY = 'NE0052' then newkey = 'NE9019';
if year = 1993 and FSCSKEY = 'NE0052' then newkey = 'NE9019';
if year = 1994 and FSCSKEY = 'NE0052' then newkey = 'NE9019';
if year = 1995 and FSCSKEY = 'NE0052' then newkey = 'NE9019';

/* CREIGHTON (DUP NE0062) */
if year = 2000 and FSCSKEY = 'NE9014' then delete;

/* DALTON               */
if year = 1988 and FSCSKEY = 'NE0068' then newkey = 'NE9020';
if year = 1989 and FSCSKEY = 'NE0068' then newkey = 'NE9020';
if year = 1990 and FSCSKEY = 'NE0068' then newkey = 'NE9020';
if year = 1991 and FSCSKEY = 'NE0068' then newkey = 'NE9020';
if year = 1992 and FSCSKEY = 'NE0068' then newkey = 'NE9020';
if year = 1993 and FSCSKEY = 'NE0068' then newkey = 'NE9020';
if year = 1994 and FSCSKEY = 'NE0068' then newkey = 'NE9020';
if year = 1995 and FSCSKEY = 'NE0068' then newkey = 'NE9020';

/* DAVID CITY           */
if year = 1988 and FSCSKEY = 'NE0070' then newkey = 'NE0278';
if year = 1989 and FSCSKEY = 'NE0070' then newkey = 'NE0278';
if year = 1990 and FSCSKEY = 'NE0070' then newkey = 'NE0278';
if year = 1991 and FSCSKEY = 'NE0070' then newkey = 'NE0278';
if year = 1992 and FSCSKEY = 'NE0070' then newkey = 'NE0278';
if year = 1993 and FSCSKEY = 'NE0070' then newkey = 'NE0278';
if year = 1994 and FSCSKEY = 'NE0070' then newkey = 'NE0278';
if year = 1995 and FSCSKEY = 'NE0070' then newkey = 'NE0278';

/* DEWITT               */
if year = 1988 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1989 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1990 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1991 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1992 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1993 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1994 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1995 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1996 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1997 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1998 and FSCSKEY = 'NE0073' then newkey = 'NE9012';
if year = 1999 and FSCSKEY = 'NE0073' then newkey = 'NE9012';

/* ELKHORN              */
if year = 1988 and FSCSKEY = 'NE0077' then newkey = 'NE0280';
if year = 1989 and FSCSKEY = 'NE0077' then newkey = 'NE0280';
if year = 1990 and FSCSKEY = 'NE0077' then newkey = 'NE0280';
if year = 1991 and FSCSKEY = 'NE0077' then newkey = 'NE0280';
if year = 1992 and FSCSKEY = 'NE0077' then newkey = 'NE0280';
if year = 1993 and FSCSKEY = 'NE0077' then newkey = 'NE0280';
if year = 1994 and FSCSKEY = 'NE0077' then newkey = 'NE0280';
if year = 1995 and FSCSKEY = 'NE0077' then newkey = 'NE0280';

/* FREMONT (DUP NE0090) */
if year = 1988 and FSCSKEY = 'NE0259' then delete;

/* GENOA (DUP NE0094)   */
if year = 1988 and FSCSKEY = 'NE0260' then delete;

/* GIBBON               */
if year = 1988 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1989 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1990 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1991 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1992 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1993 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1994 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1995 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1996 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1997 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1998 and FSCSKEY = 'NE0096' then newkey = 'NE9013';
if year = 1999 and FSCSKEY = 'NE0096' then newkey = 'NE9013';

/* GREELEY              */
if year = 1988 and FSCSKEY = 'NE0101' then newkey = 'NE9053';
if year = 1989 and FSCSKEY = 'NE0101' then newkey = 'NE9053';
if year = 1990 and FSCSKEY = 'NE0101' then newkey = 'NE9053';
if year = 1991 and FSCSKEY = 'NE0101' then newkey = 'NE9053';
if year = 1992 and FSCSKEY = 'NE0101' then newkey = 'NE9053';
if year = 1993 and FSCSKEY = 'NE0101' then newkey = 'NE9053';
if year = 1994 and FSCSKEY = 'NE0101' then newkey = 'NE9053';
if year = 1995 and FSCSKEY = 'NE0101' then newkey = 'NE9053';

/* HOOPER               */
if year = 1988 and FSCSKEY = 'NE0115' then newkey = 'NE0282';
if year = 1989 and FSCSKEY = 'NE0115' then newkey = 'NE0282';
if year = 1990 and FSCSKEY = 'NE0115' then newkey = 'NE0282';
if year = 1991 and FSCSKEY = 'NE0115' then newkey = 'NE0282';
if year = 1992 and FSCSKEY = 'NE0115' then newkey = 'NE0282';
if year = 1993 and FSCSKEY = 'NE0115' then newkey = 'NE0282';
if year = 1994 and FSCSKEY = 'NE0115' then newkey = 'NE0282';
if year = 1995 and FSCSKEY = 'NE0115' then newkey = 'NE0282';

/* LYNCH                */
if year = 1988 and FSCSKEY = 'NE0133' then newkey = 'NE9029';
if year = 1989 and FSCSKEY = 'NE0133' then newkey = 'NE9029';
if year = 1990 and FSCSKEY = 'NE0133' then newkey = 'NE9029';
if year = 1991 and FSCSKEY = 'NE0133' then newkey = 'NE9029';
if year = 1992 and FSCSKEY = 'NE0133' then newkey = 'NE9029';
if year = 1993 and FSCSKEY = 'NE0133' then newkey = 'NE9029';
if year = 1994 and FSCSKEY = 'NE0133' then newkey = 'NE9029';
if year = 1995 and FSCSKEY = 'NE0133' then newkey = 'NE9029';

/* MILLIGAN             */
if year = 1988 and FSCSKEY = 'NE0143' then newkey = 'NE0281';
if year = 1989 and FSCSKEY = 'NE0143' then newkey = 'NE0281';
if year = 1990 and FSCSKEY = 'NE0143' then newkey = 'NE0281';
if year = 1991 and FSCSKEY = 'NE0143' then newkey = 'NE0281';
if year = 1992 and FSCSKEY = 'NE0143' then newkey = 'NE0281';
if year = 1993 and FSCSKEY = 'NE0143' then newkey = 'NE0281';
if year = 1994 and FSCSKEY = 'NE0143' then newkey = 'NE0281';
if year = 1995 and FSCSKEY = 'NE0143' then newkey = 'NE0281';

/* PAPILLION            */
if year = 1988 and FSCSKEY = 'NE0173' then newkey = 'NE0276';
if year = 1989 and FSCSKEY = 'NE0173' then newkey = 'NE0276';
if year = 1990 and FSCSKEY = 'NE0173' then newkey = 'NE0276';
if year = 1991 and FSCSKEY = 'NE0173' then newkey = 'NE0276';
if year = 1992 and FSCSKEY = 'NE0173' then newkey = 'NE0276';
if year = 1993 and FSCSKEY = 'NE0173' then newkey = 'NE0276';
if year = 1994 and FSCSKEY = 'NE0173' then newkey = 'NE0276';
if year = 1995 and FSCSKEY = 'NE0173' then newkey = 'NE0276';

/* PETERSBURG           */
if year = 1988 and FSCSKEY = 'NE0177' then newkey = 'NE9034';
if year = 1989 and FSCSKEY = 'NE0177' then newkey = 'NE9034';
if year = 1990 and FSCSKEY = 'NE0177' then newkey = 'NE9034';
if year = 1991 and FSCSKEY = 'NE0177' then newkey = 'NE9034';
if year = 1992 and FSCSKEY = 'NE0177' then newkey = 'NE9034';
if year = 1993 and FSCSKEY = 'NE0177' then newkey = 'NE9034';
if year = 1994 and FSCSKEY = 'NE0177' then newkey = 'NE9034';
if year = 1995 and FSCSKEY = 'NE0177' then newkey = 'NE9034';

/* RALSTON              */
if year = 1988 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1989 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1990 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1991 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1992 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1993 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1994 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1995 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1996 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1997 and FSCSKEY = 'NE0186' then newkey = 'NE9009';
if year = 1998 and FSCSKEY = 'NE0186' then newkey = 'NE9009';

/* ROYAL                */
if year = 1988 and FSCSKEY = 'NE0191' then newkey = 'NE9036';
if year = 1989 and FSCSKEY = 'NE0191' then newkey = 'NE9036';
if year = 1990 and FSCSKEY = 'NE0191' then newkey = 'NE9036';
if year = 1991 and FSCSKEY = 'NE0191' then newkey = 'NE9036';
if year = 1992 and FSCSKEY = 'NE0191' then newkey = 'NE9036';
if year = 1993 and FSCSKEY = 'NE0191' then newkey = 'NE9036';
if year = 1994 and FSCSKEY = 'NE0191' then newkey = 'NE9036';
if year = 1995 and FSCSKEY = 'NE0191' then newkey = 'NE9036';

/*-------------------2007----------------------------------------------------*/                                                         
                                                                                                                                        
/* RUSKIN               */                                                                                                              
/* Ruskin PL did not report from FY 1996 through FY 2000 and was moved from  */                                                         
/* NE0193 (FY 1988 through FY 1995) to NE9037 from FY 2001 through FY 2006.  */                                                         
/* in FY 2007 it was moved back to NE0193.                                   */                                                         
                                                                                                                                        
if year = 2001 and FSCSKEY = 'NE9037' then newkey = 'NE0193';                                                                           
if year = 2002 and FSCSKEY = 'NE9037' then newkey = 'NE0193';                                                                           
if year = 2003 and FSCSKEY = 'NE9037' then newkey = 'NE0193';                                                                           
if year = 2004 and FSCSKEY = 'NE9037' then newkey = 'NE0193';                                                                           
if year = 2006 and FSCSKEY = 'NE9037' then newkey = 'NE0193';                                                                           
if year = 2006 and FSCSKEY = 'NE9037' then newkey = 'NE0193';                                                                           
                                                                                                                                        
/*-------------------2007----------------------------------------------------*/                                                         
                                                                                  
/* SCOTIA               */
if year = 1988 and FSCSKEY = 'NE0198' then newkey = 'NE9038';
if year = 1989 and FSCSKEY = 'NE0198' then newkey = 'NE9038';
if year = 1990 and FSCSKEY = 'NE0198' then newkey = 'NE9038';
if year = 1991 and FSCSKEY = 'NE0198' then newkey = 'NE9038';
if year = 1992 and FSCSKEY = 'NE0198' then newkey = 'NE9038';
if year = 1993 and FSCSKEY = 'NE0198' then newkey = 'NE9038';
if year = 1994 and FSCSKEY = 'NE0198' then newkey = 'NE9038';
if year = 1995 and FSCSKEY = 'NE0198' then newkey = 'NE9038';

/* SPALDING             */
if year = 1988 and FSCSKEY = 'NE0209' then newkey = 'NE9040';
if year = 1989 and FSCSKEY = 'NE0209' then newkey = 'NE9040';
if year = 1990 and FSCSKEY = 'NE0209' then newkey = 'NE9040';
if year = 1991 and FSCSKEY = 'NE0209' then newkey = 'NE9040';
if year = 1992 and FSCSKEY = 'NE0209' then newkey = 'NE9040';
if year = 1993 and FSCSKEY = 'NE0209' then newkey = 'NE9040';
if year = 1994 and FSCSKEY = 'NE0209' then newkey = 'NE9040';
if year = 1995 and FSCSKEY = 'NE0209' then newkey = 'NE9040';

/* STERLING             */
if year = 1988 and FSCSKEY = 'NE0214' then newkey = 'NE9043';
if year = 1989 and FSCSKEY = 'NE0214' then newkey = 'NE9043';
if year = 1990 and FSCSKEY = 'NE0214' then newkey = 'NE9043';
if year = 1991 and FSCSKEY = 'NE0214' then newkey = 'NE9043';
if year = 1992 and FSCSKEY = 'NE0214' then newkey = 'NE9043';
if year = 1993 and FSCSKEY = 'NE0214' then newkey = 'NE9043';
if year = 1994 and FSCSKEY = 'NE0214' then newkey = 'NE9043';
if year = 1995 and FSCSKEY = 'NE0214' then newkey = 'NE9043';

/* STRANG               */
if year = 1988 and FSCSKEY = 'NE0215' then newkey = 'NE9044';
if year = 1989 and FSCSKEY = 'NE0215' then newkey = 'NE9044';
if year = 1990 and FSCSKEY = 'NE0215' then newkey = 'NE9044';
if year = 1991 and FSCSKEY = 'NE0215' then newkey = 'NE9044';
if year = 1992 and FSCSKEY = 'NE0215' then newkey = 'NE9044';
if year = 1993 and FSCSKEY = 'NE0215' then newkey = 'NE9044';
if year = 1994 and FSCSKEY = 'NE0215' then newkey = 'NE9044';
if year = 1995 and FSCSKEY = 'NE0215' then newkey = 'NE9044';

/* SUPERIOR             */
if year = 1988 and FSCSKEY = 'NE0219' then newkey = 'NE0277';
if year = 1989 and FSCSKEY = 'NE0219' then newkey = 'NE0277';
if year = 1990 and FSCSKEY = 'NE0219' then newkey = 'NE0277';
if year = 1991 and FSCSKEY = 'NE0219' then newkey = 'NE0277';
if year = 1992 and FSCSKEY = 'NE0219' then newkey = 'NE0277';
if year = 1993 and FSCSKEY = 'NE0219' then newkey = 'NE0277';
if year = 1994 and FSCSKEY = 'NE0219' then newkey = 'NE0277';
if year = 1995 and FSCSKEY = 'NE0219' then newkey = 'NE0277';

/* TALMAGE              */
if year = 1988 and FSCSKEY = 'NE0224' then newkey = 'NE9045';
if year = 1989 and FSCSKEY = 'NE0224' then newkey = 'NE9045';
if year = 1990 and FSCSKEY = 'NE0224' then newkey = 'NE9045';
if year = 1991 and FSCSKEY = 'NE0224' then newkey = 'NE9045';
if year = 1992 and FSCSKEY = 'NE0224' then newkey = 'NE9045';
if year = 1993 and FSCSKEY = 'NE0224' then newkey = 'NE9045';
if year = 1994 and FSCSKEY = 'NE0224' then newkey = 'NE9045';
if year = 1995 and FSCSKEY = 'NE0224' then newkey = 'NE9045';

/* THEDFORD             */
if year = 1988 and FSCSKEY = 'NE0228' then newkey = 'NE9046';
if year = 1989 and FSCSKEY = 'NE0228' then newkey = 'NE9046';
if year = 1990 and FSCSKEY = 'NE0228' then newkey = 'NE9046';
if year = 1991 and FSCSKEY = 'NE0228' then newkey = 'NE9046';
if year = 1992 and FSCSKEY = 'NE0228' then newkey = 'NE9046';
if year = 1993 and FSCSKEY = 'NE0228' then newkey = 'NE9046';
if year = 1994 and FSCSKEY = 'NE0228' then newkey = 'NE9046';
if year = 1995 and FSCSKEY = 'NE0228' then newkey = 'NE9046';

/* WILSONVILLE          */
if year = 1988 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1989 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1990 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1991 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1992 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1993 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1994 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1995 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1996 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1997 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1998 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 1999 and FSCSKEY = 'NE0249' then newkey = 'NE9048';
if year = 2000 and FSCSKEY = 'NE0249' then newkey = 'NE9048';

/* ADAMS                */
if year = 1988 and FSCSKEY = 'NE0263' then newkey = 'NE9015';
if year = 1989 and FSCSKEY = 'NE0263' then newkey = 'NE9015';
if year = 1990 and FSCSKEY = 'NE0263' then newkey = 'NE9015';
if year = 1991 and FSCSKEY = 'NE0263' then newkey = 'NE9015';
if year = 1992 and FSCSKEY = 'NE0263' then newkey = 'NE9015';
if year = 1993 and FSCSKEY = 'NE0263' then newkey = 'NE9015';
if year = 1994 and FSCSKEY = 'NE0263' then newkey = 'NE9015';
if year = 1995 and FSCSKEY = 'NE0263' then newkey = 'NE9015';

/* LA VISTA             */
if year = 1988 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1989 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1990 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1991 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1992 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1993 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1994 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1995 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1996 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1997 and FSCSKEY = 'NE0264' then newkey = 'NE9008';
if year = 1998 and FSCSKEY = 'NE0264' then newkey = 'NE9008';

/* BIG SPRINGS          */
if year = 1990 and FSCSKEY = 'NE0269' then newkey = 'NE9016';
if year = 1991 and FSCSKEY = 'NE0269' then newkey = 'NE9016';
if year = 1992 and FSCSKEY = 'NE0269' then newkey = 'NE9016';
if year = 1993 and FSCSKEY = 'NE0269' then newkey = 'NE9016';
if year = 1994 and FSCSKEY = 'NE0269' then newkey = 'NE9016';
if year = 1995 and FSCSKEY = 'NE0269' then newkey = 'NE9016';

/* GILTNER              */
if year = 1991 and FSCSKEY = 'NE0271' then newkey = 'NE9025';
if year = 1992 and FSCSKEY = 'NE0271' then newkey = 'NE9025';
if year = 1993 and FSCSKEY = 'NE0271' then newkey = 'NE9025';
if year = 1994 and FSCSKEY = 'NE0271' then newkey = 'NE9025';
if year = 1995 and FSCSKEY = 'NE0271' then newkey = 'NE9025';

/* OVERTON              */
if year = 1991 and FSCSKEY = 'NE0272' then newkey = 'NE9032';
if year = 1992 and FSCSKEY = 'NE0272' then newkey = 'NE9032';
if year = 1993 and FSCSKEY = 'NE0272' then newkey = 'NE9032';
if year = 1994 and FSCSKEY = 'NE0272' then newkey = 'NE9032';
if year = 1995 and FSCSKEY = 'NE0272' then newkey = 'NE9032';

/* INDIANOLA            */
if year = 1991 and FSCSKEY = 'NE0274' and LOCGVT = 6606 then delete;
if year = 1991 and FSCSKEY = 'NE0274' and LOCGVT = 21606 then LOCGVT = 14106;
if year = 1991 and FSCSKEY = 'NE0274' then OTHINCM  = 3637;
if year = 1991 and FSCSKEY = 'NE0274' then TOTINCM  = 17743;
if year = 1991 and FSCSKEY = 'NE0274' then HRS_OPEN = 765;
if year = 1991 and FSCSKEY = 'NE0274' then VISITS  = 4029;

December 16, 2022