>Count to JanCount for ; > INLIST(Alltrim(Crimetype), "B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) ; > and Month(CrimeDate)= 1 > > >>>Thanks for the feedback Sergey. I'll kick my computer a few times and see if that will fix it. :=) I'll also change the code. Thanks sir.
GraphTitle = "All B&E" JanCount = 0 FebCount = 0 MarCount = 0 AprCount = 0 MayCount = 0 JunCount = 0 JulCount = 0 AugCount = 0 SepCount = 0 OctCount = 0 NovCount = 0 DecCount = 0 Select localcrime1 Count to JanCount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 1 Select Analyse Goto 1 Replace statvalue with JanCount Select localcrime1 Count to FebCount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 2 Select analyse Goto 2 Replace statvalue with FebCount Select localcrime1 Count to MarCount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 3 Select Analyse Goto 3 Replace statvalue with MarCount Select localcrime1 Count to AprCount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 4 Select Analyse Goto 4 Replace statvalue with AprCount Select localcrime1 Count to MayCount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 5 Select Analyse Goto 5 Replace statvalue with MayCount Select localcrime1 Count to JunCount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 6 Select Analyse Goto 6 Replace statvalue with JunCount Select localcrime1 Count to Julcount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 7 Select Analyse Goto 7 Replace statvalue with JulCount Select localcrime1 Count to AugCount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 8 Select Analyse Goto 8 Replace statvalue with AugCount Select localcrime1 Count to Sepcount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 9 Select Analyse Goto 9 Replace statvalue with SepCount Select localcrime1 Count to Octcount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 10 Select Analyse Goto 10 Replace statvalue with OctCount Select localcrime1 Count to Novcount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 11 Select Analyse Goto 11 Replace statvalue with NovCount Select localcrime1 Count to Deccount for Alltrim(Crimetype) INLIST("B&E Garage", "B&E Home", "Home invasion", "B&E Business", "B&E Cabin" ) and Month(CrimeDate)= 12 Select Analyse Goto 12 Replace statvalue with DecCount Do form analtemp