if SecurityLevelID > 2 then
						Qty1 = 0
						Qty2 = 0
						Qty3 = 0
						Qty4 = 0
						Qty5 = 0
				        Set oCmd2 = Server.CreateObject("ADODB.Command")
        				oCmd2.ActiveConnection = ConnectString
        				oCmd2.CommandType = adCmdStoredProc
        				oCmd2.CommandText = "getRatingsDistribution"
        				oCmd2.Parameters.Append oCmd2.CreateParameter("@BeerID", adInteger, adParamInput,, BeerID)
        				oCmd2.Parameters.Append oCmd2.CreateParameter("@Qty1", adDouble, adParamInputOutput,, Qty1)
        				oCmd2.Parameters.Append oCmd2.CreateParameter("@Qty2", adDouble, adParamInputOutput,, Qty2)
        				oCmd2.Parameters.Append oCmd2.CreateParameter("@Qty3", adDouble, adParamInputOutput,, Qty3)
        				oCmd2.Parameters.Append oCmd2.CreateParameter("@Qty4", adDouble, adParamInputOutput,, Qty4)        				
						oCmd2.Parameters.Append oCmd2.CreateParameter("@Qty5", adDouble, adParamInputOutput,, Qty5)
        				oCmd2.Execute 

						Qty1 = oCmd2.Parameters("@Qty1").Value        
						Qty2 = oCmd2.Parameters("@Qty2").Value        
						Qty3 = oCmd2.Parameters("@Qty3").Value        
						Qty4 = oCmd2.Parameters("@Qty4").Value        
						Qty5 = oCmd2.Parameters("@Qty5").Value        
						
        				Set oCmd2 = Nothing
						
						response.write "<table width=100 height=100 cellpadding=0 cellspacing=1 border=0>"
						response.write  "<tr><td colspan=5 align=center bgcolor=#003366 class=whitebeerfoot>rating distribution</td></tr>"
						response.write  "<tr bgcolor=#CCCCCC><td width=15 valign=bottom><IMG width=15 height=" & CInt(100 * Qty1) & " SRC=/images/003388.gif></td>"
						response.write  "<td width=15 valign=bottom><IMG width=15 height=" & CInt(100 * Qty2) & " SRC=/images/003388.gif></td>"
						response.write  "<td width=15 valign=bottom><IMG width=15 height=" & CInt(100 * Qty3) & " SRC=/images/003388.gif></td>"
						response.write  "<td width=15 valign=bottom><IMG width=15 height=" & CInt(100 * Qty4) & " SRC=/images/003388.gif></td>"
						response.write  "<td width=15 valign=bottom><IMG width=15 height=" & CInt(100 * Qty5) & " SRC=/images/003388.gif></td>"
						response.write  "</tr></table>"
					end if